G
Guest
Hi,
I have the following code in MsAccess 97(but the same happens in
MsAccess2003):
Private Sub Form_Load()
Dim dbsCurrent As Database
Dim tdfRoyalties As TableDef
Set dbsCurrent = CurrentDb
Set tdfRoyalties = dbsCurrent.CreateTableDef("Versao")
tdfRoyalties.Connect = _
"Provider=OraOLEDB.Oracle.1;Password=TestDBpass;Persist Security
Info=True;User ID= TestDB;Data Source=sgctst_albatroz"
tdfRoyalties.SourceTableName = "PARAMETRIZACAO"
dbsCurrent.TableDefs.Append tdfRoyalties
Me.RecordSource = "Versão"
End Sub
When the system try to run “dbsCurrent.TableDefs.Append tdfRoyalties“
line it gives error 3170 "Couldn't find installable ISAM."
Re-install Data Access like recommended on
http://support.microsoft.com/kb/155666/EN-US/
Any idea what I’m missing?
Best regards,
Tyan Oliveira
I have the following code in MsAccess 97(but the same happens in
MsAccess2003):
Private Sub Form_Load()
Dim dbsCurrent As Database
Dim tdfRoyalties As TableDef
Set dbsCurrent = CurrentDb
Set tdfRoyalties = dbsCurrent.CreateTableDef("Versao")
tdfRoyalties.Connect = _
"Provider=OraOLEDB.Oracle.1;Password=TestDBpass;Persist Security
Info=True;User ID= TestDB;Data Source=sgctst_albatroz"
tdfRoyalties.SourceTableName = "PARAMETRIZACAO"
dbsCurrent.TableDefs.Append tdfRoyalties
Me.RecordSource = "Versão"
End Sub
When the system try to run “dbsCurrent.TableDefs.Append tdfRoyalties“
line it gives error 3170 "Couldn't find installable ISAM."
Re-install Data Access like recommended on
http://support.microsoft.com/kb/155666/EN-US/
Any idea what I’m missing?
Best regards,
Tyan Oliveira