Domino 9 und frühere Versionen > Administration & Userprobleme
"Database Ordner\DBname has not been opened yet"
Bellerophon:
*greetz*@ ALL
Habe hier wieder ein kleines Problem:
Wenn ich mit einem Agent ein Dokument aus einer Archivdatenbank in die "Aktive" DB zurückschieben möchte kommt folgende Fehlermeldung:
"Database Ordner\DBname has not been opened yet"
Der Agent sieht wie folgt aus:
Sub Initialize
'Declare variables
Dim Session As New NotesSession
Dim DB_Current As NotesDatabase
Dim Doc_Archiv As NotesDocument
Dim Doc_Temp As NotesDocument
Dim Doc_InSolver As NotesDocument
Dim View As NotesView
Dim Collection As NotesDocumentCollection
Dim DB_Berater As New NotesDatabase( "", "Ordner\DBname.nsf" )
Set DB_Current = Session.CurrentDatabase
Set Collection = DB_Current.UnProcessedDocuments
Set Doc_Archiv = Collection.GetFirstDocument
Do Until Doc_Archiv Is Nothing
Doc_Archiv.Dat_Bera_erfasstAm = Today()
Call Doc_Archiv.save(True,False)
Call Doc_Archiv.CopyToDatabase(DB_Berater)
'Delete document from the current database
Set Doc_Temp = Doc_Archiv
Set Doc_Archiv = Collection.GetNextDocument(Doc_Archiv)
Call Doc_Temp.Remove(True)
Loop
End Sub
Kennt einer dieses Problem? In der Suche habe ich dazu nichts gefunden...........thanx!
ghost:
Hallo,
füge doch mal die Zeile:
If not(DB_Berater.IsOpen) then call DB_Berater.Open("", "")
ein.
Viele Grüße
ghost
Bellerophon:
Hi!
Danke für die schnelle Antwort!
Habe ich ausprobiert, aber es funzt net! ;-(
Immer noch die gleiche Meldung!
holo:
liegt es evtl am "\" in ( "", "Ordner\DBname.nsf" )? Versuch mal einen "/".
Ich hatte das gleiche Problem auch mal, allerdings lag es bei mir daran, dass ich einen zusätzlichen "/" vor dem ersten Ordner des DB-Pfades stehen hatte, also an Deinem Beispiel erklärt: ( "", "/Ordner/DBname.nsf" ) hat nicht funktioniert, nur ( "", "Ordner/DBname.nsf" ).
ghost:
Stimmen den Pfad und Dateiname? Liegt die Datenbank wirklich lokal? Offensichtlich wird sie nicht gefunden.
Viele Grüße
ghost
Navigation
[0] Themen-Index
[#] Nächste Seite
Zur normalen Ansicht wechseln