作者tabletenni (我要投保车险)
看板Visual_Basic
标题[VBA ] SP2变SP3,资料库就连不上了
时间Thu Dec 17 21:42:55 2009
不好意思,请教一下
我把作业版本由XP SP2昇到SP3之後
VBA就连不上资料库,
就出现一个讯息"此档案不是有效的复合档案"
因为我只会用这个VBA来抓资料库的资料,程式我不太会
有人可以告诉我要修改那里吗?
Dim i As Integer
Dim rs As New ADODB.Recordset
Dim SQL As String
Dim fs As New FileSystemObject
If fs.FileExists("c:\windows\system32\1234.dsn") = True Then
DSN = "C:\windows\system32\1234.dsn"
Else
DSN = "C:\WINNT\system32\1234.dsn"
End If
connstr = "FILE NAME=" & DSN
conn.CommandTimeout = 500
conn.Open connstr, 帐号, 密码 (用F5追踪到这一行,就跳出错误讯息)
有人可以告诉我要修改那里吗? 感 ▓
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 59.104.152.29
1F：推 meto000:你确定你的c:\windows\system32里面还有1234.dsn这个档吗? 12/17 23:41
2F：→ meto000:没有的话，要他去哪找C:\WINNT\system32\1234.dsn这个档? 12/17 23:43
3F：→ meto000:当然一开启就挂了 12/17 23:44
4F：→ tabletenni:在system32下确定有1234.dsn这个档 12/18 16:26
5F：推 jwjeng:档名前面有需要加上"FILE NAME="吗？ 12/18 17:09