问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疯狂查询