<% ' FP_ASP ASP Automatically generated by a Frontpage Component. Do not Edit. On Error Resume Next Session("FP_OldCodePage") = Session.CodePage Session("FP_OldLCID") = Session.LCID Session.CodePage = 1252 Err.Clear strErrorUrl = "" If Request.ServerVariables("REQUEST_METHOD") = "POST" Then If Request.Form("VTI-GROUP") = "0" Then Err.Clear Set fp_conn = Server.CreateObject("ADODB.Connection") FP_DumpError strErrorUrl, "Cannot create connection" Set fp_rs = Server.CreateObject("ADODB.Recordset") FP_DumpError strErrorUrl, "Cannot create record set" fp_conn.Open Application("vetspac_ConnectionString") FP_DumpError strErrorUrl, "Cannot open database" fp_rs.Open "VETSPAC", fp_conn, 1, 3, 2 ' adOpenKeySet, adLockOptimistic, adCmdTable FP_DumpError strErrorUrl, "Cannot open record set" fp_rs.AddNew FP_DumpError strErrorUrl, "Cannot add new record set to the database" Dim arFormFields0(19) Dim arFormDBFields0(19) Dim arFormValues0(19) arFormFields0(0) = "addr3" arFormDBFields0(0) = "addr3" arFormValues0(0) = Request("addr3") arFormFields0(1) = "prefix" arFormDBFields0(1) = "prefix" arFormValues0(1) = Request("prefix") arFormFields0(2) = "lname" arFormDBFields0(2) = "lname" arFormValues0(2) = Request("lname") arFormFields0(3) = "fax" arFormDBFields0(3) = "fax" arFormValues0(3) = Request("fax") arFormFields0(4) = "hphone" arFormDBFields0(4) = "hphone" arFormValues0(4) = Request("hphone") arFormFields0(5) = "wphone" arFormDBFields0(5) = "wphone" arFormValues0(5) = Request("wphone") arFormFields0(6) = "email" arFormDBFields0(6) = "email" arFormValues0(6) = Request("email") arFormFields0(7) = "zip4" arFormDBFields0(7) = "zip4" arFormValues0(7) = Request("zip4") arFormFields0(8) = "province" arFormDBFields0(8) = "province" arFormValues0(8) = Request("province") arFormFields0(9) = "zip" arFormDBFields0(9) = "zip" arFormValues0(9) = Request("zip") arFormFields0(10) = "employer" arFormDBFields0(10) = "employer" arFormValues0(10) = Request("employer") arFormFields0(11) = "cphone" arFormDBFields0(11) = "cphone" arFormValues0(11) = Request("cphone") arFormFields0(12) = "city" arFormDBFields0(12) = "city" arFormValues0(12) = Request("city") arFormFields0(13) = "state" arFormDBFields0(13) = "state" arFormValues0(13) = Request("state") arFormFields0(14) = "mi" arFormDBFields0(14) = "mi" arFormValues0(14) = Request("mi") arFormFields0(15) = "fname" arFormDBFields0(15) = "fname" arFormValues0(15) = Request("fname") arFormFields0(16) = "addr1" arFormDBFields0(16) = "addr1" arFormValues0(16) = Request("addr1") arFormFields0(17) = "addr2" arFormDBFields0(17) = "addr2" arFormValues0(17) = Request("addr2") arFormFields0(18) = "suffix" arFormDBFields0(18) = "suffix" arFormValues0(18) = Request("suffix") FP_SaveFormFields fp_rs, arFormFields0, arFormDBFields0 fp_rs.Update FP_DumpError strErrorUrl, "Cannot update the database" fp_rs.Close fp_conn.Close Session("FP_SavedFields")=arFormFields0 Session("FP_SavedValues")=arFormValues0 Session.CodePage = Session("FP_OldCodePage") Session.LCID = Session("FP_OldLCID") Response.Redirect "paypal.asp" End If End If Session.CodePage = Session("FP_OldCodePage") Session.LCID = Session("FP_OldLCID") %> Join VETSPAC

The American Veterans Political Action Committee
Home | About VETSPAC | Announcements | VETSPAC Forums | Join VETSPAC | Contacts | FAQ | Site Map | Links
   
Join VETSPAC - Yes!

I want to support Armed Forces Personnel injured in combat by contributing to VETSPAC, who will represent me in working with legislators who support legislation that provides compensation to disabled combat veterans.

Membership Programs

Membership transfers from CRLegislation.com at the level of contribution each individual has made.

There are seventeen Founding members, sixty-five Century members and more than one thousand Veterans have expressed interest in membership.

Our plan is pass legislation to CRSC eligibility for combat disabled veterans with between 8-20 years service through the Armed Services Committees.

To date, we have support in the Senate and the American Legion, MOAA, NAUS, and TREA VSO also support this legislative change.

VETSPAC Membership Levels

Membership Levels Fee Program Access
Annual Subscriber $50 VETSPAC Forum Access
Century Member
(Two Year Membership)		 $100 VETSPAC Weekly Legislative Progress Updates
Founding Member $500 Real-time VETSPAC Political Progress Reports

Yes, I want to support combat disabled soldiers and veterans by contributing to legislators who pass programs that provide direct compensation to disabled combat veterans.

Please submit the following information along with your membership.
Your information will remain private. * required
 
* Email Address
Prefix
* First Name

Middle Initial
* Last Name
Suffix
* Address 1 
Address 2 
Address 3 
* City
* State (US/Canada)
  

Province
* Zip

Zip+4

* Country
* Home Phone
 (xxx-xxx-xxxx)
Work Phone
(xxx-xxx-xxxx)
Cell Phone

(xxx-xxx-xxxx)
Fax
(xxx-xxx-xxxx)
Employer
 Annual Subscriber - $50  Includes - VETSPAC Forum Access
 Century Member - $100 Includes - VETSPAC Weekly Legislative Progress Updates
 Founding Member - $500 Includes - Real-time VETSPAC Political Progress Reports

  (You will be directed to PayPal Donation page to make your payment)

 

© 2005 VETSPAC |  Copyright  |   Disclaimer  |  Privacy Policy