初音 玲 HATSUNE, Akira
| 観(み)るということ |
|---|

| SMBを観(み)る |
|---|
(1)NetBIOS-NS (ポート番号 137)の3つだ。
(2)NetBIOS-DGM(ポート番号 138)
(3)NetBIOS-SSN(ポート番号 139)



| ファイルサーバー上のmdbファイルを開く |
|---|



Set dbsMDB = Workspaces(0).OpenDatabase(txtFile.Text, , False) ・・(1)
strSQL = txtSQL.Text
Set rdynMDB = dbsMDB.OpenRecordset(strSQL, dbOpenDynaset)・・・・・(2)
Do While Not rdynMDB.EOF
strResult = ""
For iintCol = 0 To rdynMDB.Fields.Count - 1
strResult = strResult & _
rdynMDB.Fields(iintCol).Value & vbTab・・・・(3)
Next
lstResult.AddItem strResult
rdynMDB.MoveNext ・・・・・・・・・・・・・・・・・・・・・・・・(4)
Loop
rdynMDB.Close・・・・・・・・・・・・・・・・・・・・・・・・・・・(5)
dbsMDB.Close ・・・・・・・・・・・・・・・・・・・・・・・・・・・(6)
|
YAMAHA Admin |
| プログラムコード | LAN上を流れるデータ | 備考 |
| (1) | テーブル名などの管理情報 | |
| ldbファイルの作成 |
||
| (2) | empテーブルのデータ | 図8 |
| (3) | (特になし) | |
| (4) | (特になし) | |
| (5) | (特になし) | |
| (6) | ldbファイルの削除 | 図9 |


Set dbsMDB = Workspaces(0).OpenDatabase(txtFile.Text, , False)・・(1) strSQL = txtSQL.Text Set rdynMDB = dbsMDB.OpenRecordset(strSQL, dbOpenDynaset)・・・・ (2) If Not rdynMDB.EOF Then rdynMDB.Edit・・・・・・・・・・・・・・・・・・・・・・・・・・(3) rdynMDB.Fields(0).Value = 0 ・・・・・・・・・・・・・・・・・・(4) rdynMDB.Update・・・・・・・・・・・・・・・・・・・・・・・・・(5) End If rdynMDB.Close ・・・・・・・・・・・・・・・・・・・・・・・・・・(6) dbsMDB.Close・・・・・・・・・・・・・・・・・・・・・・・・・・・(7) |
| プログラムコード | LAN上を流れるデータ | 備考 |
| (1) | テーブル名などの管理情報 | |
| ldbファイルの作成 | ||
| (2) | empテーブルのデータ | |
| (3) | (特になし) | |
| (4) | (特になし) | |
| (5) | 更新があったレコードが含まれるページのデータ | 図10 |
| (6) | (特になし) | |
| (7) | ldbファイルの削除 |



Set dbsMDB = Workspaces(0).OpenDatabase(txtFile.Text, , False) ・(1)
strSQL = txtSQL.Text
Set rdynMDB = dbsMDB.OpenRecordset(strSQL, dbOpenDynaset, _
dbSeeChanges) ・・・・(2)
If Not rdynMDB.EOF Then
rdynMDB.Edit ・・・・・・・・・・・・・・・・・・・・・・・・(3)
rdynMDB.Fields(0).Value = 4444 ・・・・・・・・・・・・・・・(4)
rdynMDB.Update ・・・・・・・・・・・・・・・・・・・・・・・(5)
End If
rdynMDB.Close・・・・・・・・・・・・・・・・・・・・・・・・・・(6)
dbsMDB.Close ・・・・・・・・・・・・・・・・・・・・・・・・・・(7)
|


| OracleをDAO/Jetで使う |
|---|
(1) DAO/Jetを素直に使う通常、SQLパススルーを使って作成したレコードセットを更新することはできないが、レコードセット作成の性能がよいといわれている。
(2) SQLパススルーを使う
SELECT * FROM emp


(1) 指定したSQL文がそのままOracleに送信されるなどがSQLパススルーを指定しなかったときと異なっていた。
(2) 複数レコードを取得する(図18)


| OracleをRDOで使う |
|---|
| ODBCカーソル | Serverカーソル | Batchカーソル | |
| EstablishConnection | 30 | 30 | 30 |
| OpenResultset | 5 | 図19 | 15 |
| MoveNext | 0 | ― | 0 |


| OracleをADOで使う |
|---|
| Clientカーソル | Serverカーソル | |
| Open(Connection) | 44 | 30 |
| Open(Recordset) | 13 | 12 |
| MoveNext | 図21 | 図22 |


| OracleをOracle Objects for OLEで使う |
|---|
| OpenDatabase | 40 |
| CreateDynaset | 16 |
| MoveNext |


| まとめ |
|---|