[VBA ] SP2變SP3,資料庫就連不上了

[tabletenni (我要投保車險)]

   不好意思,請教一下

   我把作業版本由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
推 meto000:你確定你的c:\windows\system32裡面還有1234.dsn這個檔嗎?
→ meto000:沒有的話，要他去哪找C:\WINNT\system32\1234.dsn這個檔?
→ meto000:當然一開啟就掛了
→ tabletenni:在system32下確定有1234.dsn這個檔
推 jwjeng:檔名前面有需要加上"FILE NAME="嗎？