<%
Set conn = Server.CreateObject("ADODB.Connection")
Set oRS = Server.CreateObject("ADODB.Recordset")
conn.Open = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("epaiges.mdb")
SQL = "INSERT INTO HitTrakker (REMOTE_ADDR, HTTP_REFERER, DateWhen) VALUES ('" & request.ServerVariables("REMOTE_ADDR") & "', '" & request.ServerVariables("HTTP_REFERER") & "', #" & now & "#)"
'response.write SQL
conn.execute SQL
conn.close
set conn = nothing
%>
ePaiges Design Group
 |
|
|
|
More Samples of Our Work:
|
|
|
|
Pricing Guide |
Portfolio |
Contact Us |
FAQs |
Terms |
Privacy |
Policies |
Payments |
WebMail
©
ePaiges Design Group :: All Rights Reserved ::
Privacy Policy
Mather, CA 95655 ::
info@epaiges.com
Customer Service (916) 217-9220 :: Voicemail (916) 363-5170
