% ' FP_ASP ASP Automatically generated by a Frontpage Component. Do not Edit. On Error Resume Next strErrorUrl = "" If Request.ServerVariables("REQUEST_METHOD") = "POST" Then If Request.Form("VTI-GROUP") = "0" Then Err.Clear Set fp_conn = Server.CreateObject("ADODB.Connection") FP_DumpError strErrorUrl, "Cannot create connection" Set fp_rs = Server.CreateObject("ADODB.Recordset") FP_DumpError strErrorUrl, "Cannot create record set" fp_conn.Open Application("PC_ConnectionString") FP_DumpError strErrorUrl, "Cannot open database" fp_rs.Open "Results", fp_conn, 1, 3, 2 ' adOpenKeySet, adLockOptimistic, adCmdTable FP_DumpError strErrorUrl, "Cannot open record set" fp_rs.AddNew FP_DumpError strErrorUrl, "Cannot add new record set to the database" Dim arFormFields0(7) Dim arFormDBFields0(7) arFormFields0(0) = "PC_Brand" arFormDBFields0(0) = "PC_Brand" arFormFields0(1) = "ResidentialNo" arFormDBFields0(1) = "ResidentialNo" arFormFields0(2) = "Name" arFormDBFields0(2) = "Name" arFormFields0(3) = "PgHp" arFormDBFields0(3) = "PgHp" arFormFields0(4) = "E_Mail_Address" arFormDBFields0(4) = "E_Mail_Address" arFormFields0(5) = "Comments" arFormDBFields0(5) = "Comments" arFormFields0(6) = "Gender" arFormDBFields0(6) = "Gender" FP_SaveFormFields fp_rs, arFormFields0, arFormDBFields0 If Request.ServerVariables("HTTP_USER_AGENT") <> "" Then FP_SaveFieldToDB fp_rs, Request.ServerVariables("HTTP_USER_AGENT"), "Browser_type" End If If Request.ServerVariables("REMOTE_HOST") <> "" Then FP_SaveFieldToDB fp_rs, Request.ServerVariables("REMOTE_HOST"), "Remote_computer_name" End If FP_SaveFieldToDB fp_rs, Now, "Timestamp" If Request.ServerVariables("REMOTE_USER") <> "" Then FP_SaveFieldToDB fp_rs, Request.ServerVariables("REMOTE_USER"), "User_name" End If fp_rs.Update FP_DumpError strErrorUrl, "Cannot update the database" fp_rs.Close fp_conn.Close Response.Redirect "PCthanks.htm" End If End If %>
|
|
|
Sign my guestbook? Announce? Enter Forums? Search? Send Greetings?
|
SINGAPORE's One-SToP Hardwares Corner On The Web********************************************************* ********************************************************* Webmaster welcome you onboard: Tired of hanging around SimLim/Funan IT Mall?? Look no further cause' this site is going to be 1-Stop Solution for u ! ! This site gathers people who want to trade their old PC items/Forums ......etc. Ever wonder where to get cheaper hardwares and quality assured items? Well i have recently set up this site for SinGaporeans to trade their PC items with each another. For upgraders, its good news since they can get rid of their unwanted items at better prices. Well Christmas is just around the corner, time to upgrade to a better system. However, i wish to inform u that i will not be strictly responsible of any misacts of others in the process of the trade but the Buyer is Responsible for himself , he/she should check goods/get no. of seller b4 leaving !!! Also I do not wish to see people trading defective items. (However i will be able to supply u with the necessary info if something crops up)
O.k. la !!!!! So much for that, lets get things done serious --folks ! Mind filling up this nasty form so that i can compare the items u people want to trade? *U must at least fill in your E_mail address.
We now have more days to Christmas Day!!!!!!!
Please come often to look out for more announcements. I may place an notice board here later. |