Corey Bryant
08-20-2003, 02:51 AM
I have this code that creates a cookie:
<%
'******************************************
' declare variables
'******************************************
dim affID
dim arriveDate
dim sql
dim oRs
dim signupDate
dim Company
dim amount
dim IPAddress
dim paid
'******************************************
'Collecting and giving the variables values
'******************************************
affID = trim(Request.QueryString("affID"))
arriveDate = FixDate(date())
'******************************************
'tasks to perform
'******************************************
If affID <> "" then
' cookie creation
Response.Cookies("AffInfo") = affID
Response.Cookies("AffInfo").Expires = Now() + 30
'session creation
Session("affID") = affID
'data functions
Call OpenDB()
sql = "ins_spAffLog '" & affID & "','" & arriveDate & "','" & signupDate & "','" & Company & "','" & amount & "','" & IPAddress & "','" & paid & "'"
Set oRs = dbConn.Execute(sql)
'oRs.Close
'Set oRs = Nothiing
Call CloseDB()
End if
%>
When they finally get to the form to submit an application, what code for the input should I use to retrieve the value?
Thank you!
<%
'******************************************
' declare variables
'******************************************
dim affID
dim arriveDate
dim sql
dim oRs
dim signupDate
dim Company
dim amount
dim IPAddress
dim paid
'******************************************
'Collecting and giving the variables values
'******************************************
affID = trim(Request.QueryString("affID"))
arriveDate = FixDate(date())
'******************************************
'tasks to perform
'******************************************
If affID <> "" then
' cookie creation
Response.Cookies("AffInfo") = affID
Response.Cookies("AffInfo").Expires = Now() + 30
'session creation
Session("affID") = affID
'data functions
Call OpenDB()
sql = "ins_spAffLog '" & affID & "','" & arriveDate & "','" & signupDate & "','" & Company & "','" & amount & "','" & IPAddress & "','" & paid & "'"
Set oRs = dbConn.Execute(sql)
'oRs.Close
'Set oRs = Nothiing
Call CloseDB()
End if
%>
When they finally get to the form to submit an application, what code for the input should I use to retrieve the value?
Thank you!