%@LANGUAGE="VBSCRIPT"%> <% IF Request("submitted") = "yes" And Success <> "yes" Then Set rsAddUsers = Server.CreateObject("ADODB.Recordset") sql = "SELECT * FROM Subscribers" rsAddUsers.Open sql, MM_rsJustTix_STRING, 3, 3 rsAddUsers.AddNew rsAddUsers.Fields("FirstName") = Request("txtfname") rsAddUsers.Fields("LastName") = Request("txtlname") rsAddUsers.Fields("Email") = Request("txtEmail") rsAddUsers.Fields("Company") = Request("txtCompany") rsAddUsers.Fields("Date") = Date rsAddUsers.Update Success = "yes" End If %> <% IF Request("submitted") <> "yes" Then%> <%End IF%>
|
||||||||||||||||||
<% IF Request("submitted") <> "yes" Then%>
|
||||||||||||||||||
|
||||||||||||||||||