%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
set Conn = server.createobject("ADODB.Connection")
set rs = server.createobject("ADODB.Recordset")
conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("access_db/waterdog.mdb")
SQL="Select * from referrer where 1=2"
rs.open SQL, conn, 3, 3
rs.addnew
rs("referrer")=request.ServerVariables("SERVER_NAME")
rs("ip")=request.ServerVariables("REMOTE_ADDR")
rs("date")=date
rs("time")=time
rs("page")="getProduct_Waterdog.asp"
rs.update
rs.close
conn.close
'add to Tracking Table
page="getProduct_Waterdog.asp"
friendlypage="Waterdog Order Page"
referer=request.ServerVariables("HTTP_REFERER")
notes=""
ip=request.ServerVariables("REMOTE_ADDR")
sessid=session.SessionID
cookie=request.ServerVariables("HTTP_COOKIE")
'AddTracking=Tracking(page,friendlypage,referer,notes)
AddTracking=Tracking2(page,friendlypage,referer,notes,ip,sessid,cookie)
%>
WaterDog-The Automatic Outdoor Pet Fountain
|
| WaterDog Order Page |
| WaterDog |
Order your WaterDog Pet Fountain today and never worry about your dogs water needs again. |
Remote Location Kit |
| |
|
|
| |
|
|
| |
|
|
|