Hallo fuerchau,

vielen Dank für den Tip.

Kann mich auch daran erinnern, dass ich so mal angefangen hatte, aber wegen vielen Abstürzen auf 3.7 dann auf ODBC und MSDASQL umstellen musste.

Leider komme ich damit nur eine Zeile weiter:

Auf dem Rechner, auf dem mein altes Prog. funktioniert, klappt es auch mit IBMDA400.

Auf dem Rechner, auf dem das Programm nicht lief, bekomme ich jedoch wieder die Fehlermeldung, dass die Erstellung der ActiveX-Komponente nicht möglich sei.
Diesmal aber ein Zeile weiter unten:

Set cn400 = CreateObject("ADODB.Connection")
Set cmSQL = CreateObject("ADODB.Command")
Set rssql = CreateObject("ADODB.Recordset")
With cn400
.Provider = "IBMDA400"
.Properties("Convert Date Time To Char") = "TRUE"
.Properties("User ID") = "meine"
.Properties("Password") = "meins"
.Open "Data Source=meineAS400"
End With

Set cmSQL.ActiveConnection = cn400
cmSQL.CommandText = "SELECT * FROM meinebib.meinetab"
cmSQL.Prepared = True

Set rssql = cmSQL.Execute --> HIER FEHLERMELDUNG

Noch eine Idee?

Gruß
HS

PS: MDAC hatte ich natürlich schon neu installiert.