<%@ LANGUAGE="VBSCRIPT" %><% vf_name = Request.Form("f_name") vl_name = Request.Form("l_name") vTitle = Request.Form("Title") vCompany = Request.Form("Comp") vPhone = Request.Form("Phone") vEmail = Request.Form("Email") vCountry = Request.Form("Country") vhow_hear = Request.Form("how_hear") Set ExchangeNetSQL = Server.CreateObject("ADODB.Connection") ExchangeNetSQL.Open "thaiindustry", "tinhosting", "tinhosting" sql1 = "INSERT INTO ExUserDemo " & _ " (FirstName, LastName, " & _ " TitleID, Company, Phone, Email, UDCountry, How_hear)" & _ " VALUES ('"&_ vf_name &"','"& vl_name &"','"&_ vTitle &"','"& vCompany &"','"& vPhone &"','"&_ vEmail &"','"& vCountry &"','"& vhow_hear & "')" Set RS = ExchangeNetSQL.Execute(sql1) '--------------------------------------------------- %> Demo Registration

Name	<%=vF_name & " "%><%=vL_name%>
Company Name	<%=vCompany%>
Title	<%=vTitle%>
Phone	<%=vPhone%>
Email	<%=vEmail%>
Country	<%=vCountry%>
How did you hear of us?	<%=vhow_hear%>