<% If Request("id") <> "" And IsNumeric(Request("id")) Then Set Con = Server.CreateObject("Adodb.Connection") Con.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=c:\inetpub\wwwroot\domains\dse-inc.com\seminars.mdb" Set rTemp = Con.Execute("SELECT City, 'Agenda '+Agenda, WE_Date1 FROM Agendas WHERE ID = " & Request("id")) If Not rTemp.EOF Then City = rTemp(0) Agenda = rTemp(1) SeminarDT = rTemp(2) End If rTemp.Close: Set rTemp = Nothing Con.Close: Set Con = Nothing End If %>
Back

You are registering for the following seminar:

<%=City%> - <%=Agenda%> - <%=SeminarDT%>

The cost of this seminar is $49 for the first 10 guests registered and $199 thereafter.

Doctors First Name:
Doctors Last Name:
Business Address:
City:
State:
Zip:
Office Phone:
Office Fax:
Cell Phone:
E-mail address:
Credit Card Number:

 
Expiration Date:
 (MM/YYYY)
Questions/Comments:


For the protection of your personal information, this
request will be sent over a secure SSL encrypted connection.