<%@LANGUAGE="VBSCRIPT"%> <% Dim rsAgendas Dim rsAgendas_numRows Set rsAgendas = Server.CreateObject("ADODB.Recordset") rsAgendas.ActiveConnection = "DRIVER={Microsoft Access Driver (*.mdb)};" & _ "DBQ=c:\inetpub\wwwroot\domains\dse-inc.com\seminars.mdb" rsAgendas.Source = "SELECT * FROM Agendas WHERE ID = " & Request.QueryString("id") & "" rsAgendas.CursorType = 0 rsAgendas.CursorLocation = 2 rsAgendas.LockType = 1 rsAgendas.Open() rsAgendas_numRows = 0 %>

Back

This registration is for paid for clients ONLY!
You are registering for the following seminar:

<%=rsAgendas.Fields.Item("City")%> Agenda #<%=rsAgendas.Fields.Item("Agenda")%> on <%=rsAgendas.Fields.Item("WE_Date1")%>.

Client's First Name:
Client's Last Name:
Business Address:
City:
State:
Zip:
Office Phone:
E-mail address:
Number of staff attending:
Who will be coming with you?
Request $100 Referral Cash Bonus:
List doctor's full name and phone # here:
(must be first time attendee and pre-register)

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