woodooman
Registered +
- Registriert
- Nov. 2004
- Beiträge
- 155
Ich habe ein kleines Programm geschrieben (mit VBA) das in einem anderen Programm (AutoCAD) gestartet wird.
Dazu habe ich eine INI-Datei erstellt, wo Diverse Einstellungn gesichert sind - und beim Programmaufruf von da gelesen werden.
Auf winXP Rechner läuft alles ohne Probleme. Wenn ich das ganze auf einem win2000 Rechner starten will, bekomme ich eine Fehlermeldung - und das Script wird abgebrochen.
Den Fehler zeigt es auf folgender Zeile an:
Kann mir jemand einen Tip geben, wie sich dieses Problem Lösen lässt??
(natürlich ohne alle win2000 Rechner auf XP umzurüsten
)
Hier noch mein Code vom Start bis zur Fehlermeldung...
//EDIT
Hier noch die Fehlermeldung:
Dazu habe ich eine INI-Datei erstellt, wo Diverse Einstellungn gesichert sind - und beim Programmaufruf von da gelesen werden.
Auf winXP Rechner läuft alles ohne Probleme. Wenn ich das ganze auf einem win2000 Rechner starten will, bekomme ich eine Fehlermeldung - und das Script wird abgebrochen.
Den Fehler zeigt es auf folgender Zeile an:
Code:
resultat$ = String(255, Chr(0))
Kann mir jemand einen Tip geben, wie sich dieses Problem Lösen lässt??
(natürlich ohne alle win2000 Rechner auf XP umzurüsten
Hier noch mein Code vom Start bis zur Fehlermeldung...
Code:
Private Sub UserForm_Initialize()
Dim VbaApp As VBIDE.VBE
Dim AppPath As String
Set VbaApp = Application.VBE
AppPath = VbaApp.ActiveVBProject.FileName
Label28.Caption = AppPath
AppPath = RTrim(AppPath, "\stklist1.dvb")
Label29.Caption = AppPath & "\stklist.ini"
Dim iniPath As String
iniPath = AppPath & "\stklist.ini"
resultat$ = String(255, Chr(0))
res = GetPrivateProfileString("Datenbank", "Quelle", "", resultat$, _
Len(resultat$) + 1, iniPath)
atcad_repertoire = Left(resultat$, InStr(resultat$, Chr(0)) - 1)
Me.TextBox10.Value = atcad_repertoire
...
...
//EDIT
Hier noch die Fehlermeldung:
Code:
Fehler beim Compilieren
Bibliothek oder Projekt nicht gefunden
oder nach was soll ich suchen?