<%@ Language=VBScript EnableSessionState=False %>
Search
<%
dim oRc
dim rs
dim oConn
'Get the server and login information
'Create a connection object
oConn = DBConnect()
Set rs = Server.CreateObject("ADODB.Recordset")
'Asscociate the recordset with the open connection
rs.ActiveConnection = oConn
'Use the open method to get data
rs.Open "SELECT * FROM STATES"
%>