1. vb数据库编程,数据库某些字段不能重复,如果录入数据有重复,保存时,程序自动提醒,怎么编写自动提醒代码。
用Sql语句,查询或者Find方法查询,如果已经存在该记录,就提醒:
如果一下子要保存n行,那有两种选择:
1:检查一行,保存一行。凡是没有重复的都保存,有重复的不保存。
2:先一一检查,检查到有重复就提示,并结束。
不知道你用的是控件还是对象连接的数据库?假设你用Adodc控件,且已经连接。
下面:假设字段a,b为字符类型,以一行数据为例,a字段值为“AA”,b字段值为“BB”,
Adodc1.RecordSource ="Select * From s Where a ='AA' and b = 'BB'"
Adodc1.Refresh
If Not (Adodc1.Recordset.EOF And Adodc1.Recordset.BOF) Then
MsgBox "已经存在相同记录!"
Exit Sub
Else
'下面编写添加记录的代码
End If
上面是当数据a,b一样提示,如果a一样或者b一样就提示,那么:
Adodc1.RecordSource ="Select * From s Where a ='AA' Or b = 'BB'"