投稿日 | : 2006/02/03(Fri) 12:06 |
投稿者 | : ねずみ |
Eメール | : |
URL | : |
タイトル | : Re^7: 他のパソコンにインストールすると読み込まない |
いろいろとありがとうございます。
Setup.lstの内容は以下のとおりです。
VB6STKIT.DLL
COMCAT.DLL
VB6JP.DLL
stdole2.tlb
asycfilt.dll
olepro32.dll
oleaut32.dll
msvbvm60.dll
MDAC_TYP.EXE
msado20.tlb
MSDERUN.DLL
FLXGDJP.DLL
MSFLXGRD.OCX
EXCEL.EXE
msjro.dll
msjtes40.dll
dao360.dll
Jet4.0はセキュリティ対応でバージョンは4.0.8618.0とあり、SP8に対応するようです。
ExeにしてExeだけをインストールしても同じでした。
コードを最小限にして、
Option Explicit
Private Sub Command2_Click()
Dim DB As DAO.Database
Dim RS As DAO.Recordset
Set DB = OpenDatabase("D:\test\test.xls", False, False, "Excel 8.0;HDR=YES;IMEX=1;")
Set RS = DB.OpenRecordset("Sheet10$", dbOpenTable)
Set Data1.Recordset = RS
Data1.Refresh
RS.Close
DB.Close
Set DB = Nothing
Set RS = Nothing
End Sub
Private Sub Command3_Click()
End
End Sub
としてみましたが、相変わらず使いたいパソコンにいくと表示できません。
これからもいろいろ試してみます。