这个代码错误怎么改不好

李艺　发表于：2009-10-31 10:05:50 　

我做了个商品进销存　商品入库代码提示错误　改了好几回也没好　请哪位老师帮我一下　非常感谢

点燃一支烟发表于：2009-10-31 11:27:17

1、.................

sql = " SELECT 商品.* FROM 商品 WHERE (((商品.商品编号)=" & Me.商品编号 & "))"
        Set rst = New ADODB.Recordset
        rst.ActiveConnection = CurrentProject.Connection
        rst.CursorType = adOpenDynamic
        rst.LockType = adLockOptimistic
        rst.Open sql
....................

2、检查“仓库编号”与“员工编号”的控件名称是否与代码一致，并更改

Top

点燃一支烟发表于：2009-10-31 13:16:25

其他的好像还有问题，没去检查了

Top

李艺发表于：2009-10-31 13:48:35

Top

李艺发表于：2009-10-31 13:51:01

        rst.Open sql　　提示错误
        If Not (rst.EOF) Then
            sql = "select * from 入库记录"
            rst.Close
            Set rst = Nothing
            Set rst = New ADODB.Recordset
            rst.ActiveConnection = CurrentProject.Connection
            rst.CursorType = adOpenKeyset
            rst.LockType = adLockOptimistic
            rst.Open sql
                With rst
                     .AddNew
                     !仓库编号 = Me![仓库编号]
                     !商品编号 = Me![商品编号]
                     !数量 = Me![入库数量]
                     !经手员工编号 = Me![员工编号]
                     !入库日期 = Me![入库日期]

Top

李艺发表于：2009-10-31 13:52:05

非常感谢老师　您再帮我看看

Top

总记录：5篇页次：1/1 9 1 :

Access交流中心

这个代码错误怎么改不好