記錄無法讀取 ; 'MSYSACE'S 無法讀取權限.!!!!!!!(編號：4948)

VB6(sp3)環境下可正常執行,但compiler 成 EXE 後,出現錯誤訊息 :
"記錄無法讀取 ; 'MSYSACE'S 無法讀取權限."

天哪! 這是什麼狀況啊......

Dim TBLname As String, connString As String, strSQL As String
connString = "Provider=Microsoft.Jet.OLEDB.4.0;Data
　　　　　　　 Source=" & filepathName
　　　　
　　　　Set RPobjConn = New ADODB.Connection
　　　　　　RPobjConn.Open connString
　　　　
　　　　Set RPobjRec = RPobjConn.OpenSchema(adSchemaTables,
　　　　　　　　　　　 Array(Empty, Empty, Empty, "Table"))
　　　　TBLname = RPobjRec!TABLE_NAME
　　　　RPobjRec.Close
　　　　
　　　　strSQL = "select * from " & TBLname
　　　　Set RPobjRec = RPobjConn.Execute(strSQL)　　　　
　
　　　　RPobjRec.Close
　　　　RPobjConn.Close