Hallo,
folgender Scriptcode wird in einer DB benutzt und funktioniert auch, d.h. am Ende der Abarbeitung steht "nummerndbfound" auf true.
In einer anderen Datenbank mit dem gleichen Scriptcode funktioniert die ganze Sache nicht, d.h. an der Stelle
nummerndbpath = doc.nummerndbpath(0)
wird nichts gefunden, bis dahin funktioniert das Script in der betreffenden DB.
Wenn allerdings über Print Befehle z.B. Print "noteid: " + doc.noteid
oder die größe des Dokuments anzeigen lassen will ist der Wert leer bzw. 0.
Wo könnte das Problem liegen?
Quellcode ist ein Ausschnitt aus dieser DB, stammt nicht von uns.
MfG
René
If Not(view Is Nothing) Then
Set doc = view.GetDocumentByKey("Konfiguration")
If Not(doc Is Nothing) Then
aktserver = doc.aktserver(0)
admindbpfad = doc.admindbpfad(0)
If Trim(aktserver) <> "" And Trim(admindbpfad) <> "" Then
Set admindb = session.getdatabase(aktserver, admindbpfad)
If Trim(admindb.title) <> "" Then
'allgemeines Konfigurationsdokument aca.websuite holen
Set view = admindb.getview("Konfiguration")
If Not(view Is Nothing) Then
Set doc = view.GetDocumentByKey("Konfiguration")
If Not(doc Is Nothing) Then
nummerndbpath = doc.nummerndbpath(0)
If Trim(nummerndbpath) <> "" Then
Set nummerndb = session.getdatabase(aktserver, nummerndbpath)
Forall maske In nummerndb.forms
If maske.name = "Nummernkreis" Then
nummerndbfound = True
Exit Forall
End If
End Forall
End If
End If
End If
End If
End If
End If
End If