1楼不对,更新后再判断更麻烦,2楼的是ASP网页的设计,虽然rsclose关闭了两次,会报错,但思路是对的,再搜索一遍数据库,如果记录为空则插入新纪录,我修改了一下,VB的版本!
dim Brand,Comm as string
Brand=trim(replace(text1text,"'"))
Comm=trim(replace(text2text,"'"))
sql="select from user where 品牌='"& Brand &"' and 商品名='"& Comm &"'"
set rs=servercreateobject("adodbrecordset")
rsopen sql,conn,1,3
if rseof then
rsaddnew
rs("品牌")=Brand
rs("商品名")=Comm
rsupdate
msgbox "添加成功!"
else
msgbox "该商品重复!
end if
rsclose
set rs=nothing
从表中删除重复记录需要两个步骤。第一步,创建包含重复项的表结构的副本,然后生成所有包含重复项的字段的主键;第二步,创建并执行由原始表到新表的追加查询。因为主键字段不能包含重复记录,所以此过程将生成一个不含重复记录的表。
1、复制表并生成包含重复项的字段的主键
*** 作方法:
1、在“数据库”窗口中,单击“对象”下的“表”文章来源(先飞电脑技术网)
2、单击要删除重复记录的表名称。
3、单击工具栏上的“复制”单击工具栏上的“粘贴”。
4、在“粘贴表方式”对话框中,键入复制表的名字,再单击“只粘贴结构”选项,然后单击“确定”按钮。
5、在“设计”视图中打开新表,然后在复制的表中选择包含重复项的字段。
6、单击工具栏上的“主键”按钮,以便根据选定的字段创建主键。
7、保存并关闭表。
2、在新表中追加唯一值记录。
*** 作方法:
1、根据包含重复项的原始表新建一个查询。
2、在查询“设计”视图中,单击工具栏上的“查询类型”,再单击“追加查询”。
3、在“追加”对话框中,在“表名称”列表中单击新表的名称,然后单击“确定”。
4、将星号
()
拖到查询设计网格,使新表包含原始表的所有字段。
5、单击工具栏上的“运行”。
6、收到追加行的信息时,请单击“是”按钮。
7、收到
Microsoft
Access
不能在追加查询中添加全部记录的信息时,请单击“是”按钮。这次仅将有唯一值的记录传送到新表中,并丢弃了重复项。
8、打开表查看结果。
9、确定新表有正确的唯一记录后,就可以删除原始表,然后使用原始表名来为新表重新命名。
以上就是关于Access如何让输入的记录不重复全部的内容,包括:Access如何让输入的记录不重复、如何删除access表中重复记录、等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)