设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 2398|回复: 9
打印 上一主题 下一主题

[ADO/DAO] ADO修改记录,提示 “至少一个参数没有指定值”

[复制链接]
跳转到指定楼层
1#
发表于 2010-9-18 14:26:52 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
Dim inte As Integer
  inte = MsgBox("货品ID已经存在,确认更新吗?", vbYesNo, "确认保存")
  If inte = vbYes Then   
           
   rst.Open "SELECT 物料表.* FROM 物料表 WHERE 物料表.货品ID = " & Me.货品ID & "", CurrentProject.Connection, adOpenDynamic, adLockOptimistic

    If Not rst.EOF Then
   
      rst![货品ID] = Me.货品ID
      rst![货品名称] = Me.货品名称
      rst![规格型号] = Me.规格型号
      rst![单位] = Me.单位   
      
       rst.Update
   Else
        Exit Sub
        End If


请大家帮忙看一下,错在哪呢?有几天了,一直解决不了。谢谢了。

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅

点击这里给我发消息

2#
发表于 2010-9-18 15:49:16 | 只看该作者
出错在哪一行
3#
 楼主| 发表于 2010-9-18 15:53:42 | 只看该作者
没提示错在哪行,只有一个 “至少一个参数没有被指定值” 的提示框

点击这里给我发消息

4#
发表于 2010-9-18 15:57:57 | 只看该作者
出现错误提示后,点调试打开代码窗口,看哪一行背景色变黄了
5#
 楼主| 发表于 2010-9-18 16:02:42 | 只看该作者
只有这一个提示框。

本帖子中包含更多资源

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

x

点击这里给我发消息

6#
发表于 2010-9-18 16:05:39 | 只看该作者
去掉错误捕获代码,就有调试按钮了,
或者把实例传上来
7#
 楼主| 发表于 2010-9-18 16:07:38 | 只看该作者
好的。我先试一下调试,实例还得整理一下。
8#
 楼主| 发表于 2010-9-18 16:29:38 | 只看该作者
,整理好了,但错误提示变了。麻烦版主一并看看吧。

本帖子中包含更多资源

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

x

点击这里给我发消息

9#
发表于 2010-9-18 16:52:32 | 只看该作者
问题一:
货品ID字段是文本类型的,须要引用括起来:
rst.Open "SELECT 物料表.* FROM 物料表 WHERE 物料表.货品ID = '" & Me.货品ID & "'", ...

问题二:
以下两个字段不存在
  [送货方式]
  [付款方式]
10#
 楼主| 发表于 2010-9-18 17:04:45 | 只看该作者
问题已经解决,非常感谢!!
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2024-11-17 05:50 , Processed in 0.089355 second(s), 34 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

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