<%@ Language=VBScript %> <% Option Explicit %> SIISite <% if Request.ServerVariables("CONTENT_LENGTH") = 0 then Dim strUserIPAdd, strRefURL strUserIPAdd=Request.ServerVariables("REMOTE_ADDR") strRefURL=Request.ServerVariables("HTTP_REFERER") if strRefURL="" then strRefURL="Directly" Dim Conn set Conn = Server.CreateObject("ADODB.Connection") Conn.Open conString Conn.Execute("INSERT INTO UserInfo " _ & " (UserIPAdd, RefURL) values " _ & " ('" & strUserIPAdd & "','" & strRefURL & "')") Conn.Close Set Conn=Nothing End If %>

Submit your Product Idea

Home | Solutions | Team | Clients | Shop | About Us | Contact | Cart | Sales Material | Search

http://www.smartinventions.com/
http://www.smartinventions.com/007.asp
http://www.smartinventions.com/awards.asp
http://www.smartinventions.com/corp.asp
http://www.smartinventions.com/cs.asp
http://www.smartinventions.com/drtv.asp
http://www.smartinventions.com/exp.asp
http://www.smartinventions.com/help.asp
http://www.smartinventions.com/index.htm
http://www.smartinventions.com/mf.asp
http://www.smartinventions.com/mo.asp
http://www.smartinventions.com/principals.asp
http://www.smartinventions.com/privacy.asp
http://www.smartinventions.com/qa.asp
http://www.smartinventions.com/qc.asp
http://www.smartinventions.com/ret.asp
http://www.smartinventions.com/search.asp
http://www.smartinventions.com/sii.asp
http://www.smartinventions.com/siisite.htm
http://www.smartinventions.com/smartmop.asp
http://www.smartinventions.com/success.asp
http://www.smartinventions.com/wwi.asp

Checkout or Change Orders click Here  

Copyright © 2009 Smart Inventions Inc. \ All rights reserved

Smart Mop is U.S. Patented Products.
any company or individual found copying any material from this Site for Commercial use,
or found violating any of our Trademarks, Patents or Copyrights
are in violation of United States Federal Law and will be prosecuted.