<% Dim Connect, rs, Query Set Connect = Server.CreateObject("ADODB.Connection") Connect.Open "burnsline" Query = "SELECT * " Query = Query & "FROM Seminars " Set rs = Connect.Execute(Query) %>
<%=rs("BeginDate")%>
<%=rs("SeminarName")%>
© 2002 Burns Controls
|
Legal
|
Site Map
Design by Webb Consulting Inc
