| Search Website |
Search <% dim fs,f set fs=Server.CreateObject("Scripting.FileSystemObject") set f=fs.OpenTextFile("C:\inetpub\vhosts\sacksbymail.com\log.txt",8,true) if request.querystring("q") <> "" then f.writeline() f.write(request.querystring("q")) f.write("," & date()) end if f.Close set f=Nothing set fs=Nothing %> |
|
Home | Company | Technical Data | Contact Us View Cart | Checkout | Order Status | Search Copyright © 1997-2010, Foam Factory, Inc. |