在客户端PC上添加/更新的问题 [英] problems adding/ updating on client pc
问题描述
我已经测试了我的数据库和everthing工作正常，但随后将它交给了客户，代码的以下部分似乎没有按要求更新。
设置rs = db.OpenRecordset（" LTOT_second_oxygen2"，dbOpenDynaset）
rs.FindFirst" [HospitalNumber] =''" &安培;我！[general_info.HospitalNumber]& "''"
如果rs.NoMatch那么
rs.AddNew
rs！[HospitalNumber] =我！[general_info.HospitalNumber ]
rs.Update
结束如果
任何想法为什么会这样 - 我很难过!!! ??? ??
这可能与IT部门设置的访问权限有关吗？目前我没有设置任何形式的工作组，权限等作为其唯一的一个客户端的beta试用版数据库。
Hi, I have tested my databse and everthing works fine but then have given it to a customer and the following part of the code does not seems to be updating as required.
Set rs = db.OpenRecordset("LTOT_second_oxygen2", dbOpenDynaset)
rs.FindFirst "[HospitalNumber] = ''" & Me![general_info.HospitalNumber] & "''"
If rs.NoMatch Then
rs.AddNew
rs![HospitalNumber] = Me![general_info.HospitalNumber]
rs.Update
End If
Any ideas why this could be-I am stumped!!!?????
Could this have anything to do with access permissions set by an IT department? At the moment i havent set any form of workgroups, permissions etc as its only a beta trial database with one client.
推荐答案
我已经测试了我的数据库和everthing工作正常，但后来已经交给客户，代码的以下部分似乎没有按要求更新。
设置rs = db.OpenRecordset（" LTOT_second_oxygen2"，dbOpenDynaset）
rs.FindFirst" [HospitalNumber] =''" &安培;我！[general_info.HospitalNumber]& "''"
如果rs.NoMatch那么
rs.AddNew
rs！[HospitalNumber] =我！[general_info.HospitalNumber ]
rs.Update
结束如果
任何想法为什么会这样 - 我很难过!!! ??? ??
这可能与IT部门设置的访问权限有关吗？目前我没有设置任何形式的工作组，权限等作为其唯一的一个客户端的beta试用版数据库。
Hi, I have tested my databse and everthing works fine but then have given it to a customer and the following part of the code does not seems to be updating as required.
Set rs = db.OpenRecordset("LTOT_second_oxygen2", dbOpenDynaset)
rs.FindFirst "[HospitalNumber] = ''" & Me![general_info.HospitalNumber] & "''"
If rs.NoMatch Then
rs.AddNew
rs![HospitalNumber] = Me![general_info.HospitalNumber]
rs.Update
End If
Any ideas why this could be-I am stumped!!!?????
Could this have anything to do with access permissions set by an IT department? At the moment i havent set any form of workgroups, permissions etc as its only a beta trial database with one client.
更可能与丢失的vb库引用有关。转到vb编辑器，选择工具>引用.....任何显示为缺失？
More likely has to do with missing vb library references. Go to vb editor, select Tools>References.....Any show as "Missing"?
没有所有引用都在那里。我已经在5个电脑上测试了它（包括一个完全干净）并且它在完整版和运行时版本中都运行良好 - 它只是这个client.im不确定它是否与在代码中打开记录集有关？这个权限？
no all the references are there.i have tested it on 5 pc''s (including one totally clean) and it works fine in both a full and runtime version-its just this client.im not sure if its something to do with opening a recordset in code? permissions with this?
没有所有的引用都在那里。我已经在5台上测试了它（包括一个完全干净的）它在完整版和运行版中都运行良好 - 它只是这个client.im不确定它是否与在代码中打开记录集有关？这个权限？
no all the references are there.i have tested it on 5 pc''s (including one totally clean) and it works fine in both a full and runtime version-its just this client.im not sure if its something to do with opening a recordset in code? permissions with this?
您需要提供更多信息......您的Access版本，您的操作环境（Windows XP等）。您的应用程序是否已拆分等等。
1.在您的记录集代码中，您没有发布声明。您是否将记录集声明（dim）为DAO / ADO Recordset？是否为DAO，ADO设置了vb库引用？
2.客户机是否具有相同版本的Access？
3.是否有任何ActiveX必须在Windows Regsvr32中注册的应用程序中使用的控件。
4.是否正确设置了MDW工作组安全文件？
You need to provide more info ......your version of Access, your operating environment (Windows XP, etc.). Is your application split, etc.
1. In your recordset code, you did not post your declarations. Did you declare (dim) the recordset as a DAO/ADO Recordset? Are vb library references set for DAO, ADO?
2. Does client machine have same version of Access?
3. Are any ActiveX controls being used in the application that have to be registered with Windows Regsvr32.
4. Has MDW workgroup security file been properly set up?
这篇关于在客户端PC上添加/更新的问题的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！
