6.2 **infraDBConnect – Verbindung zur Datenbank
lRc = Object.infraDBConnect(strDBsrc,strName, strPasswd )
|
Argumente
|
strDBsrc Name der Datenbank, z.B. SPIEL, ECHT
strName Benutzername
strPasswd Kennwort des Benutzers
|
|
Rückgabewerte
|
lRc == 0 Kein Fehler
lRc <> 0 infra-Kernsystemfehler
|
|
Beschreibung
|
Nachdem die Prozessumgebung für den Start von infraDBcom festgelegt und der Name der Station und der Pfad zu den infra-ini-Dateien durch infraDBPrepareConnection gesetzt ist, kann eine Verbindung zur infra-Datenbank hergestellt werden. Hier ist anzugeben, zu welcher Datenbank, z.B. SPIEL eine Verbindung herzustellen ist. Es können nur Datenbanken angesprochen werden, die in SIBDB.INI eingetragen sind.
Außerdem müssen Benutzername und Benutzerkennwort angegeben werden.
|
|
Funktionsart
|
infraDBFunktion
Basic-Skript
Java-Skript
|
|
Beispiel Basic-Skript
|
Set oIDB = CreateObject("infra.DBAccess")
lRc = oIDB.infraDBPrepareConnection( strIni, strStation )
if( lRc )Then 'Bereite infra Kernsystem vor
strErr = "Kernsystemfehler: " & CStr( lRc )
strErr = strErr & VbCrLf & " Vorbereitung infra-IniPfad: " & strI ni & " Station: " & strStation
oIDB.infraDBDisconnect ' schliesse die Datenbankverbindung
MsgBox strErr
Exit Sub
End If
lRc = oIDB.infraDBConnect( strDB, strUser, strPW )
if( lRc ) Then'Erstelle die Verbindung zur Datenbank
strErr = "Kernsystemfehler: " & CStr( lRc )
strErr = strErr & VbCrLf & oIDB.infraDBGetSystemMessage( lRc ) & VbCrLf
strErr = strErr & VbCrLf & "Es konnte keine Verbindung zur Daten bank hergestellt werden."
strErr = strErr & VbCrLf & "IniPfad: " & strIni
strErr = strErr & VbCrLf & "Station: " & strStation
strErr = strErr & VbCrLf & "Datenbank: " & strDB
strErr = strErr & VbCrLf & "Benutzer: " & strUser
oIDB.infraDBDisconnect ' schliesse die Datenbankverbindung
MsgBox strErr
Exit Sub
End If
RunIDBActions( oIDB ) ' Fuehre Datenbankaktionen aus.
oIDB.infraDBDisconnect ' schliesse die Datenbankverbindung
|
|
Beispiel Java-Skript
|
var oIDB = new ActiveXObject("infra.DBAccess");
var lRc = oIDB.infraDBPrepareConnection( strIni, strStation )
if( lRc ){ //Bereite infra Kernsystem vor
strErr = "Kernsystemfehler: " + lRc;
strErr += " Vorbereitung infra-IniPfad: " + strIni + " Station: " + strStation;
oIDB.infraDBDisconnect(); // schliesse die Datenbankverbindung
WScript.Echo( strErr );
return -1;
}
lRc = oIDB.infraDBConnect( strDB, strUser, strPW );
if( lRc ){//Erstelle die Verbindung zur Datenbank
strErr = "Kernsystemfehler: " + lRc;
strErr += "\n" + oIDB.infraDBGetSystemMessage( lRc ) + "\n";
strErr += "\nEs konnte keine Verbindung zur Datenbank hergestellt werden."
strErr += "\nIniPfad: " + strIni;
strErr += "\nStation: " + strStation;
strErr += "\nDatenbank: " + strDB;
strErr += "\nBenutzer: " + strUser;
oIDB.infraDBDisconnect(); // schliesse die Datenbankverbindung
WScript.Echo( strErr );
return -1;
}
RunIDBActions( oIDB ); // Fuehre Datenbankaktionen aus.
oIDB.infraDBDisconnect(); // schliesse die Datenbankverbindung
|