%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% ' FileName="Connection_odbc_conn_dsn.htm" ' Type="ADO" ' DesigntimeType="ADO" ' HTTP="true" ' Catalog="" ' Schema="" Dim MM_lakemead_STRING MM_lakemead_STRING = "dsn=lakemead;" %> <% FirstName=Request.Querystring("FirstName") LastName=Request.Querystring("LastName") Email=Request.Querystring ("Email") Street=Request.Querystring("Street") City=Request.Querystring("City") Zip=Request.Querystring("Zip") Refered_By=Request.Querystring("Refered_By") License1999=Request.Querystring("License1999") License2000=Request.Querystring("License2000") License2001=Request.Querystring("License2001") License2002=Request.Querystring("License2002") License2003=Request.Querystring("License2003") License2004=Request.Querystring("License2004") Days_Fished=Request.Querystring("Days_Fished") Clinic=Request.Querystring("Clinic") Clinic_Largemouth=Request.Querystring("Clinic_Largemouth") Clinic_Striped=Request.Querystring("Clinic_Striped") Clinic_Catfish=Request.Querystring("Clinic_Catfish") Clinic_Trout=Request.Querystring("Clinic_Trout") Clinic_Flyfish=Request.Querystring("Clinic_Flyfish") Area_Mead=Request.Querystring("Area_Mead") Area_Mohave=Request.Querystring("Area_Mohave") Area_Sunset=Request.Querystring("Area_Sunset") Area_Floyd=Request.Querystring("Area_Floyd") Area_Lorenzi=Request.Querystring("Area_Lorenzi") Area_Boulder=Request.Querystring("Area_Boulder") Area_ColdCreek=Request.Querystring("Area_ColdCreek") Area_Echo=Request.Querystring("Area_Echo") Area_SpringValley=Request.Querystring("Area_SpringValley") Area_Kirch=Request.Querystring("Area_Kirch") Area_Other=Request.Querystring("Area_Other") Area_OutofState=Request.Querystring("Area_OutofState") Reason_More=Request.Querystring("Reason_More") Reason_Bigger=Request.Querystring("Reason_Bigger") Reason_Scenic=Request.Querystring("Reason_Scenic") Reason_Experience=Request.Querystring("Reason_Experience") Reason_Family=Request.Querystring("Reason_Family") Reason_Tradtion=Request.Querystring("Reason_Tradition") Reason_Convenient=Request.Querystring("Reason_Convenient") Reason_Unaware=Request.Querystring("Reason_Unaware") Reason_Other=Request.Querystring("Reason_Other") Info_Mead=Request.Querystring("Info_Mead") Info_Mohave=Request.Querystring("Info_Mohave") Info_Sunset=Request.Querystring("Info_Sunset") Info_Floyd=Request.Querystring("Info_Floyd") Info_Lorenzi=Request.Querystring("Info_Lorenzi") Info_Boulder=Request.Querystring("Info_Boulder") Info_ColdCreek=Request.Querystring("Info_ColdCreek") Info_Echo=Request.Querystring("Info_Echo") Info_SpringValley=Request.Querystring("Info_SpringValley") Info_Kirch=Request.Querystring("Info_Kirch") Info_Other=Request.Querystring("Info_Other") Info_None=Request.Querystring("Info_None") Fish_FamilyLicense=Request.Querystring("Fish_FamilyLicense") Fish_CampClinics=Request.Querystring("Fish_CampsClinics") Fish_Newsletter=Request.Querystring("Fish_Newsletter") Fish_GetStarted=Request.Querystring("Fish_GetStarted") Fish_Other=Request.Querystring("Fish_Other") TroutSize_Urban=Request.Querystring("TroutSize_Urban") TroutSize_Mead=Request.Querystring("TroutSize_Mead") TroutSize_Mohave=Request.Querystring("TroutSize_Mohave") TroutSize_Eagle=Request.Querystring("TroutSize_Eagle") TroutSize_Echo=Request.Querystring("TroutSize_Echo") InfoPrefer_Newspaper=Request.Querystring("InfoPrefer_Newspaper") InfoPrefer_Magazine=Request.Querystring("InfoPrefer_Magazine") InfoPrefer_Mail=Request.Querystring("InfoPrefer_Mail") InfoPrefer_Radio=Request.Querystring("InfoPrefer_Radio") InfoPrefer_TV=Request.Querystring("InfoPrefer_TV") InfoPrefer_Email=Request.Querystring("InfoPrefer_Email") InfoPrefer_Web=Request.Querystring("InfoPrefer_Web") InfoPrefer_Other=Request.Querystring("InfoPrefer_Other") Age=Request.Querystring("Age") Income=Request.Querystring("Income") Race=Request.Querystring("Race") SQL = "INSERT INTO Tpostcard (FirstName, LastName, Email, Street, City, State, Zip, Refered_By,License1999, License2000, License2001, License2002, License2003, License2004, Days_Fished, Clinic, Clinic_Largemouth, Clinic_Striped, Clinic_Catfish, Clinic_Trout, Clinic_Flyfish, Area_Mead, Area_Mohave, Area_Sunset, Area_Floyd, Area_Lorenzi, Area_Boulder, Area_ColdCreek, Area_Echo, Area_SpringValley, Area_Kirch, Area_Other, Area_OutofState, Reason_More, Reason_Bigger, Reason_Scenic, Reason_Experience, Reason_Family, Reason_Tradition, Reason_Convenient, Reason_Unaware, Reason_Other, Info_Mead, Info_Mohave, Info_Sunset, Info_Floyd, Info_Lorenzi, Info_Boulder, Info_ColdCreek, Info_Echo, Info_SpringValley, Info_Kirch, Info_Other, Info_None, Fish_FamilyLicense, Fish_CampsClinics, Fish_Newsletter, Fish_GetStarted, Fish_Other, TroutSize_Urban, TroutSize_Mead, TroutSize_Mohave, TroutSize_Echo, TroutSize_Eagle, InfoPrefer_Newspaper, InfoPrefer_Magazine, InfoPrefer_Mail, InfoPrefer_Radio, InfoPrefer_TV, InfoPrefer_Email, InfoPrefer_Web, InfoPrefer_Other, Age, Income, Race)" SQL= SQL & " VALUES ('" & request.form("FirstName") & "','" & request.form("LastName") & "','" & request.form("Email") & "','" & request.form("Street") & "', '" & request.form("City") & "','" & request.form("State") & "', '" & request.form("Zip") & "','" & request.form("Refered_By") & "','" & request.form("License1999") & "','" & request.form("License2000") & "','" & request.form("License2001") & "','" & request.form("License2002") & "','" & request.form("License2003") & "','" & request.form("License2004") & "','" & request.form("Days_Fished") & "','" & request.form("Clinic") & "','" & request.form("Clinic_Largemouth") & "','" & request.form("Clinic_Striped") & "','" & request.form("Clinic_Catfish") & "','" & request.form("Clinic_Trout") & "','" & request.form("Clinic_Flyfish") & "','" & request.form("FirstName") & "','" & request.form("Area_Mead") & "', '" & request.form("Area_Mohave") & "', '" & request.form("Area_Sunset") & "','" & request.form("Area_Floyd") & "','" & request.form("Area_Lorenzi") & "','" & request.form("Area_Boulder") & "','" & request.form("Area_ColdCreek") & "','" & request.form("Area_SpringValley") & "','" & request.form("Area_Kirch") & "','" & request.form("Area_Other") & "','" & request.form("Area_OutofState") & "','" & request.form("FirstName") & "','" & request.form("Reason_More") & "','" & request.form("Reason_Bigger") & "','" & request.form("Reason_Scenic") & "','" & request.form("Reason_Experience") & "','" & request.form("Reason_Family") & "','" & request.form("Reason_Tradition") & "','" & request.form("Reason_Convenient") & "','" & request.form("Reason_Unaware") & "','" & request.form("Reason_Other") & "','" & request.form("Info_Mead") & "','" & request.form("Info_Mohave") & "','" & request.form("Info_Sunset") & "','" & request.form("Info_Floyd") & "','" & request.form("Info_Lorenzi") & "','" & request.form("Info_Boulder") & "','" & request.form("Info_ColdCreek") & "', '" & request.form("Info_Echo") & "','" & request.form("Info_SpringValley") & "','" & request.form("Info_Kirch") & "','" & request.form("Info_Other") & "','" & request.form("Info_None") & "','" & request.form("Fish_FamilyLicense") & "','" & request.form("Fish_CampsClinics") & "','" & request.form("Fish_Newsletter") & "','" & request.form("Fish_GetStarted") & "','" & request.form("Fish_Other") & "','" & request.form("TroutSize_Urban") & "','" & request.form("TroutSize_Mead") & "','" & request.form("TroutSize_Mohave") & "','" & request.form("TroutSize_Echo") & "','" & request.form("TroutSize_Eagle") & "','" & request.form("InfoPrefer_Newspaper") & "','" & request.form("InfoPrefer_Magazine") & "','" & request.form("InfoPrefer_Mail") & "','" & request.form("InfoPrefer_Radio") & "','" & request.form("InfoPrefer_TV") & "','" & request.form("InfoPrefer_Email") & "','" & request.form("InfoPrefer_Web") & "','" & request.form("Age") & "','" & request.form("Income") & "','" & request.form("Race") & "')" set conn = server.createobject ("ADODB.Connection") conn.open "lakemead" conn.execute(SQL) conn.close %>
| Fish | Boat
| Hunt | Wildlife
& Habitat | Learn & Participate | Licenses
& Laws | Our Agency | Contact
Us | Commissions & Boards
| Wildlife Calendar | |
||