设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

12下一页
返回列表 发新帖
查看: 2132|回复: 13
打印 上一主题 下一主题

[其它] [求助]代码重复判断

[复制链接]
跳转到指定楼层
1#
发表于 2007-3-14 23:14:00 | 只看该作者 回帖奖励 |正序浏览 |阅读模式
根据"产品"表,做了一个"产品"窗体.设置"产品代码"为主键.通过ADO添加记录.现在的问题是:如果产品代码重复,希望有一个msgbox的提示框,而不是ACCESS自身的报错.判断代码是否重复的代码该怎么写.研究好几天了没有结果.求助各位大侠帮帮我.谢谢了.

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
14#
 楼主| 发表于 2007-3-16 21:15:00 | 只看该作者
初学乍练,受益非浅.我慢慢再研究.感谢一点通大哥.
13#
发表于 2007-3-16 20:21:00 | 只看该作者
修改为:

If IsNull(DLookup("[产品代码]", "产品", "[产品代码]='" & Forms!产品!产品代码查询 & "'")) Then

另外:语法应该规范,不要将判断分开,上传的语句可作参考


本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
12#
 楼主| 发表于 2007-3-16 18:08:00 | 只看该作者



多谢了.

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
11#
发表于 2007-3-16 16:49:00 | 只看该作者
麻烦转换一下,转为2000格式
10#
 楼主| 发表于 2007-3-16 09:05:00 | 只看该作者



没起作用.上传了附件,您帮我看看.如果您方便,看我那个删除产品代码,查询写的是不是有问题?多谢了.

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
9#
发表于 2007-3-16 07:23:00 | 只看该作者
文本格式

If DLookup("[产品代码]", "产品", "[产品代码]='" & Forms!产品!产品代码查询 & "'") = "" Then
MsgBox

数字格式

If DLookup("[产品代码]", "产品", "[产品代码]=" & Forms!产品!产品代码查询) = "" Then
MsgBox
8#
 楼主| 发表于 2007-3-16 07:12:00 | 只看该作者
急疯我了.

您帮我看看这段代码错哪了行吗?我想实现的效果是:如果产品代码不存在,则提示.....

If DLookup("产品代码", "产品", "产品代码 <> '" & Forms!产品!产品代码查询 & "'") <> "" Then
MsgBox
7#
发表于 2007-3-16 06:47:00 | 只看该作者
不是空,也就是有对应的数据
6#
 楼主| 发表于 2007-3-16 06:30:00 | 只看该作者
一点通大哥,能不能解释一下代码最后的“  <>""  ”,是什么意思??

我想根据这段代码,改成  如果不存在相同代码,则提示。试了很多遍了,因为不知道<>"" 是什么意思,所以一直没成功.望大哥指点....
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-11-26 03:42 , Processed in 0.112798 second(s), 35 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表