| 戻る |
|
ADO を使用して SQL Server に接続します。
「参照設定」で [Microsoft ActiveX Data Objects 2.1 Library] に参照します。
' ADOのオブジェクト変数を宣言する Dim cnn As New ADODB.Connection Dim rec As New ADODB.Recordset ' 接続を確立する cnn.Open "Provider=SQLOLEDB;" & _ "Data Source=(local);" & _ "Initial Catalog=pubs;", "sa", "" ' SQLステートメントを指定してレコードセットを作成する rec.Open "select * from publishers", cnn, _ adOpenKeyset, adLockOptimistic |
||||
©2000 VBMANIA All rights reserved.