标题:求助(ACCESS2003)
只看楼主
glory
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2004-12-20
 问题点数:0 回复次数:1 
求助(ACCESS2003)

Private Sub 工号_LostFocus() On Error GoTo Err_工号_LostFocus '定义字符型变量 Dim STemp As String '定义用于循环的整型变量 Dim i As Integer '定义数据集变量 Dim Rs As ADODB.Recordset '为定义的数据集变量分配空间 Set Rs = New ADODB.Recordset '为打开数据表“查询语句”字符变量赋值 STemp = "Select * From 职员基本资料" '打开“职员资料”数据表 Rs.Open STemp, CurrentProject.Connection, adOpenKeyset, adLockOptimistic

此段程序在ACCESS2003中运行正常,在ACCESS97中就不正常了。请问我应该怎么修改!谢谢!

搜索更多相关主题的帖子: 变量 定义 Dim STemp 
2004-12-20 16:59
willdo
Rank: 1
等 级:新手上路
帖 子:10
专家分:0
注 册:2004-12-22
得分:0 

定义一下 Connection!

2004-12-25 22:13



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-9721-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.077776 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved