Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


43605 / 76732 ←次へ | 前へ→

【38174】Re:ADOのカーソルタイプに関する質問です
発言  漂流民  - 06/5/28(日) 16:33 -

引用なし
パスワード
   ▼PT さん:
>neptune さんすみません。定数です。
>ConnectionオブジェクトのCursorTypeプロパティに静的カーソル(3)を指定
>したあとで 接続するメソットOpenに定数-1を指定した場合、CursorTypeは静的カーソルだと僕の知識にあるのと実機ではそうなるのですがちがっていますでしょうか?定数-1がよくわからないのです。大変説明不足ですみません。ご教授願えますと助かります。

私もカーソルタイプの「-1」というのは使ったことがなかったので
調べてみました。
http://msdn.microsoft.com/library/ja/default.asp?url=/library/ja/jpado260/htm/mdcstcursortypeenum.asp

つまりカーソルタイプの「-1」というのは「カーソルの種類を指定しない」とのことらしいです。


>ConnectionオブジェクトのCursorTypeプロパティに静的カーソル(3)を指定
>したあとで 接続するメソットOpenに定数-1を指定した場合、CursorTypeは静的カーソル

テストしてみました。
※下記コード
結果、カーソルタイプ「-1」は何をしてもデフォ値の「0」が返ってきました。
(ちなみにロックタイプ「-1」もデフォ値の「1」を返してきました)

>メソットOpenに定数-1を指定した場合、CursorTypeは静的カーソル

はどのようなテストで返ってきたのでしょうか?


以下、テストコード
'***********************************************************************************

Sub test()
  Dim Con As ADODB.Connection
  Dim Rst1 As ADODB.Recordset
  Dim Rst2 As ADODB.Recordset

  Set Con = New ADODB.Connection
  Con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\test\test.mdb;"

  Set Rst1 = New ADODB.Recordset
  Rst1.Open "ttable1", Con, adOpenStatic, adLockReadOnly, adCmdTable
'  Rst1.Open "ttable1", Con, adOpenDynamic, adLockPessimistic, adCmdTable
  
  Set Rst2 = New ADODB.Recordset
  Rst2.Open "ttable2", Con, adOpenUnspecified, adLockUnspecified, adCmdUnspecified

  
  MsgBox "1つ目のRecordsetのCursorTypeは・・・" & CStr(Rst1.CursorType) & vbLf & _
      "2つ目のRecordsetのCursorTypeは・・・" & CStr(Rst2.CursorType) & vbLf & vbLf & _
      "1つ目のRecordsetのLockTypeは・・・" & CStr(Rst1.LockType) & vbLf & _
      "2つ目のRecordsetのLockTypeは・・・" & CStr(Rst2.LockType)


  Rst2.Close
  Set Rst2 = Nothing
  
  Rst1.Close
  Set Rst1 = Nothing

  Con.Close
  Set Con = Nothing

End Sub

'***********************************************************************************

0 hits

【38121】ADOのカーソルタイプに関する質問です PT 06/5/26(金) 23:50 質問
【38130】Re:ADOのカーソルタイプに関する質問です neptune 06/5/27(土) 8:13 発言
【38134】Re:ADOのカーソルタイプに関する質問です PT 06/5/27(土) 12:35 発言
【38135】Re:ADOのカーソルタイプに関する質問です PT 06/5/27(土) 12:40 発言
【38138】Re:ADOのカーソルタイプに関する質問です neptune 06/5/27(土) 13:29 回答
【38141】Re:ADOのカーソルタイプに関する質問です PT 06/5/27(土) 13:56 お礼
【38142】Re:ADOのカーソルタイプに関する質問です neptune 06/5/27(土) 14:54 発言
【38144】Re:ADOのカーソルタイプに関する質問です PT 06/5/27(土) 16:15 お礼
【38174】Re:ADOのカーソルタイプに関する質問です 漂流民 06/5/28(日) 16:33 発言
【38175】Re:ADOのカーソルタイプに関する質問です 漂流民 06/5/28(日) 17:02 発言
【38177】Re:ADOのカーソルタイプに関する質問です PT 06/5/28(日) 18:58 お礼
【38178】Re:ADOのカーソルタイプに関する質問です 漂流民 06/5/29(月) 2:27 発言

43605 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free