ACCESS数据库时，提示数据已存在
'声明数据对象
Public CON As OleDbConnection '连接对象
Public DA2 As OleDbDataAdapter '数据适配器
Public DS2 As DataSet '数据集
Public DT2 As DataTable '数据表
strSave = "SELECT * FROM YAOJIXIANGXI WHERE Yaopin_id= " & _strGetID
DA2 = New OleDb.OleDbDataAdapter(strSave, CON)
DS2 = New DataSet
DA2.Fill(DS2)
If DS2.Tables.Count < 1 Then
MessageBOx.show( "记录已存在！ ")
end if
YAOJIXIANGXI这个表是空的，但运行程序会提示“记录已存在”？
这是为什么？是不是我写错代码了？
[解决办法]
更准确的是应该是
DA2.Fill(DS2，＂tablename＂)
If DS2.Tables［＂tablename＂］．Ｒows.Count ＞０ Then
MessageBOx.show( "记录已存在！ ")
end if
[解决办法]
If DS2.Tables[0].Rows.Count > 0 Then
MessageBOx.show( "记录已存在！ ")
end if
