<%@ LANGUAGE="VBSCRIPT"%> <%OPTION EXPLICIT%> <%Response.Buffer = True%> <% Set objConn = Server.CreateObject ("ADODB.Connection") Set objRec = Server.CreateObject ("ADODB.Recordset") Set objRec2 = Server.CreateObject ("ADODB.Recordset") objConn.Open strconnect objRec.Open "cats", objConn, adOpenForwardOnly, adLockReadOnly, adCmdTable objRec2.Open "links", objConn, adOpenStatic, adLockReadOnly, adCmdTable %>

back CHS Home
Top		Copyright © 2000 The Connecticut Historical Society http://www.chs.org/

<% 'Tidy up objRec.Close objRec2.Close objConn.Close Set objRec = Nothing Set objRec2 = Nothing Set objConn = Nothing %>