P
Philppe Racoupeau via AccessMonster.com
Hi, this code is working on any plateform execpt on NT4.
Dim MyRec As Recordset
Dim MyWrk As Workspace
Dim MyMdb As Database
Set MyWrk = DBEngine.Workspaces(0)
Set MyMdb = MyWrk.OpenDatabase("MyBase.mdb")
Set MyRec = MyMdb.OpenRecordset("Table1", dbOpenTable)
MyRec.Index = "IndDate"
Set Data1.Recordset = MyRec
(Data control is from DAO360)
After that, all the controls bind to the Data Control are "binded", execpt
on NT4, the Data Control RecordSet stay NULL.
I deploy this DLL with my App :
msjtes40.dll
msrepl40.dll
msrd3x40.dll
msrd2x40.dll
mswdat10.dll
mswstr10.dll
expsrv.dll
vbajet32.dll
msjint40.dll
msjter40.dll
msjet40.dll
DAO360.dll
All come from Jet40SP8_9xNT.exe (SP8 for NT4).
It's working only if I install MDAC 2.0 + MDAC 8.0 + SP8 for DAO 4.0
(VB_DCOM_MDAC_JET_AutoSetup.exe), but the problem is it's really too big
for download purpose (32 Mo) for that, and my app it's only 5 Mo.
Somebody have a Idea ?
Dim MyRec As Recordset
Dim MyWrk As Workspace
Dim MyMdb As Database
Set MyWrk = DBEngine.Workspaces(0)
Set MyMdb = MyWrk.OpenDatabase("MyBase.mdb")
Set MyRec = MyMdb.OpenRecordset("Table1", dbOpenTable)
MyRec.Index = "IndDate"
Set Data1.Recordset = MyRec
(Data control is from DAO360)
After that, all the controls bind to the Data Control are "binded", execpt
on NT4, the Data Control RecordSet stay NULL.
I deploy this DLL with my App :
msjtes40.dll
msrepl40.dll
msrd3x40.dll
msrd2x40.dll
mswdat10.dll
mswstr10.dll
expsrv.dll
vbajet32.dll
msjint40.dll
msjter40.dll
msjet40.dll
DAO360.dll
All come from Jet40SP8_9xNT.exe (SP8 for NT4).
It's working only if I install MDAC 2.0 + MDAC 8.0 + SP8 for DAO 4.0
(VB_DCOM_MDAC_JET_AutoSetup.exe), but the problem is it's really too big
for download purpose (32 Mo) for that, and my app it's only 5 Mo.
Somebody have a Idea ?