ADOを利用したConnection、LockType、CursorLocation

Option Explicit

Public AdoCn As ADODB.Connection
Public AdoRs As ADODB.Recordset
Public strConnectionString As String

-------------------------------------------------- ---------------------------
<1。アクセスと接続する際の形式>
strConnectionString = "Provider = Microsoft.jet.oledb.4.0、Data Source ="＆App.Path＆ "DataBase.mdb"
上記のApp.Pathというのは、現在実行中のプログラムの相対的なパス。


-------------------------------------------------- ---------------------------
<2。 SQLサーバーとの接続時の型>
strConnectionString = "Provider = SQLOLEDB; Data source = Server_Name、Initial catalog = Db_name、User ID =アカウント、Password =ケイ"


-------------------------------------------------- ---------------------------
<Connectionオブジェクトのオープン時の形式>
Set AdoCn = New ADODB.Connection

AdoCn.Open strConnectionString


-------------------------------------------------- ---------------------------
<Record setオブジェクト用いた場合の形式>
Set AdoRs = New ADODB.Recordset

AdoRs.ActiveCommand = AdoCn

AdoRs.CursorLocation = adUseClientのカーソル位置を決定ServerまたはClint

AdoRs.CursorType = adOpenStaticカーソルの機能を設定する
1。 static：元レコード自体（値）をそのまま持って来ること
2。 Keyset：レコードの値ではなく位置を持って来る。（ポインタ値取得）
デイト作業中には他人が追加された内容を確認することができません。
3。 Dynamic：位置の値を取得追加された内容を確認する。 （keysetの発展型。）
過負荷の下のダウンロードの危険ありますので、ほとんど使用に限ります。
4。 FowardOnly：ジを一度読むだけにする。最小の機能。

AdoRs.LockType = adLockOptimistic作業中の重複使用を避けるために。
1。 Optimistic：作業時ではなく、実際の保存時にロックをゴルオジュム（プラスロック）
2。 Pessimistic：メモリにあげるとすぐに、あらかじめロックをかけてくれる。（受動的ロック）
3。 Readonly：読み取り専用ロック。 （ひたすら読むだけ時。）
4。 Batch Optimistic：クライアントのみ。非結成ラクイダ。
ex）大量の作業時に接続を切断し、クライアント側での操作後、
ジョブの完了時接続サーバー側で送信することができるように。

AdoRs.Open Query Sql文のレコードオープン


-------------------------------------------------- ---------------------------
<Record setオブジェクトを閉じるの種類>
AdoRs.Close

Set AdoRs = Nothing


-------------------------------------------------- ---------------------------
<Connectionオブジェクトを閉じるの種類>
AdoCn.Close

Set AdoCn = Nothing