レコードセットのオープン
修行中のものです。。。
エラーが発生してしまします。
間違いの点をお教え下さい。
自分的には”レコードセットのオープン”がいまいち分かりません。
【 objCon.Open 】
Dim objCon
Dim objRS
'##### コネクションオブジェクトの生成 #####
Set objCon = Server.CreateObject("ADODB.Connection")
'##### レコードセットオブジェクトの生成 #####
Set objRS = Server.CreateObject("ADODB.Recordset")
'##### 接続用パレメータの設定 #####
objCon.Provider = "Microsoft.Jet.OLEDB.4.0"
'##### MDBの絶対パス指定 #####
objCon.ConnectionString = (Server.MapPath("/") & "データベース")
'##### コネクションのオープン #####
objCon.Open
'##### データ参照 #####
objRS = "select [ID],[NAME],[URL],[CM1],[CM2],[CM3] from SITE_DATA"
%>
レコード件数 <%=objRS.RecordCount%>
<hr>
<%
'##### レコードセットのクローズ #####
objRS.Close
Set objRS = Nothing
'##### コネクションのクローズ #####
objCon.Close
Set objCon = Nothing
%>
お願いします