[VB6 ] 迴圈寫進資料庫,要如何拚斷重覆資料?

作者: NealPope (尼爾教皇)   2020-08-11 22:15:41
問VB寫進資料庫一些問題
某段跑回圈程式如下↓
For i = 0 to Ubound(temp())
aa = Split(temp(i),";")
sPord = aa(0)
sMoney = aa(1)
sTime = aa(2)
'開始寫入資料庫
rs.AddNew
rs("pord") = sPord
rs("money") = sMonry
rs("now_time") = sTime
rs.updatebatch
Next
資料庫欄位pord、money、now_time已設唯一值
當有相同值時,就會Error
要如何判斷資料庫已經有此筆資料時,自動跳到下一個迴圈?
不能用 If rs.EOF或rs.Rcordcount
資料庫好像不允許迴圈Select瘋狂查詢

Links booklink

Contact Us: admin [ a t ] ucptt.com