當前位置：係統粉 > 電腦問答 > 其他問答 > VB與數據庫的問題

VB與數據庫的問題

提問者：愈小璿 | 瀏覽次 | 提問時間：2017-03-10 | 回答數量：2

現在有兩個表,每個表都有一個字段,我想實現的效果是,選中表A的所有記錄,然後判斷是否每條記錄都在表2的字段中,我是這樣寫的,貌似VB不能打開這麼多的RS,班大幫幫忙myre2.Open \"select name2 from db2tb\", mycn0myre2.MoveFirstWhile Not myre2.EOFmyre1.Open \"select name1 from db1tb where name1 = '\" & myre2.Fields(\"name2\") & \"'\", mycn0If myre1.RecordCount > 0 ThenList1.AddItem \"OK\"ElseIf myre1.RecordCount = 0 ThenList1.AddItem myre1.Fields(\"name2\")End Ifmyre1.CloseWend隻輸出一條記錄是沒問題的,可一加循環就完了!

已有2條答案

845952880

回答數：128 | 被采納數：18

2017-03-10 17:18:18

有什麼提示

讚 12

宋磊78

回答數：24 | 被采納數：13

2017-03-10 19:23:22

我已經找到錯誤了,現在貼出正確的代碼來
下麵代碼能實現表1與表2間的記錄檢查,看表2的記錄是否在表1中,若不在的話,則在LIST1中顯示不在的記錄!
myre2.Open "select name2 from db2tb", mycn0
myre2.MoveFirst
While Not myre2.EOF
myre1.Open "select name1 from db1tb where name1 = '" & myre2.Fields("name2") & "'", mycn0

If myre1.RecordCount > 0 Then
List1.AddItem "OK"
ElseIf myre1.RecordCount <= 0 Then
List1.AddItem myre2.Fields("name2")
End If
myre1.Close

myre2.MoveNext
Wend
MsgBox "Check Over", vbOKOnly, "PS"

讚 2

相關問題

解決方法

win864位使用plsqldeveloper連接oracle數據庫的問題

　　問題：win8的64位係統上使用plsql developer連接本地oracle數據庫時會發生莫名其妙的問題，錯誤提示框甚至可能為空。　　原因：據網上所說，原因估計是在6...
Win7 64位IIS7出現數據庫鏈接出錯的解決方法如何處理Win7 64位IIS7出現數據庫鏈接出錯的問題

今天給大家帶來Win7，64位IIS7出現數據庫鏈接出錯的解決方法，如何處理Win7，64位IIS7出現數據庫鏈接出錯的問題，讓您輕鬆解決問題。這個問題絕對困擾了大部分菜鳥網友，這...
微軟發布MySQL/PostgreSQL Azure服務與Cosmos數據庫

Azure 現已支持在本地應用程序領域相當受歡迎的 MySQL 和 PostgreSQL 關係數據庫，與此同時，微軟還極力簡化了從預置 SQL服務器和 Oracle 數據庫遷移至自...
用MySQL數據庫函數求解信息的方法。怎樣用MySQL數據庫函數求解信息？

今天給大家帶來用MySQL數據庫函數求解信息的方法。怎樣用MySQL數據庫函數求解信息？，讓您輕鬆解決問題。MySQL數據庫除了字符串函數、日期時間函數、數值函數和流程函數外，還有...

VB與數據庫的問題

電腦問答欄目

最新其他問答

熱門問答