Das Notes Forum
Domino 9 und frühere Versionen => ND6: Entwicklung => Thema gestartet von: DerAndre am 23.05.07 - 12:05:45
-
Ich habe gesucht aber nichts passendes gefunden.
Ich habe das Phänomen, daß wenn unten eingestellte Eigenschaften für eine Datenbank gewählt sind wird im PostOpen des Datenbankscript ein Illegal Function Call erzeugt.
Der Fehler tritt in der ersten Zeile, eine simple Zuweisung, nach der Deklaration auf. Nach wegklicken der Meldung wird dann die DB geöffnet.
Hat jemand so ein Phänomen schon gehabt?
Client ist 6.5.1 DE
Server ist auch 6.5.1
-
Unter 6.5.3 tritt das nicht auf.
Poste doch mal das Script im Postopen der Datenbank.
Andreas
-
Script:
Sub Postopen(Source As Notesuidatabase)
Dim db As notesdatabase
Dim Gdp_MainServer As String,Gdp_SecondServer As String,Gdp_ThirdServer As String
Dim Gdp_Serverlist As Variant,MsgRetValue As Integer
Dim dispServer As String
Gdp_SecondServer="" -> hier meldet sich der Debugger
Gdp_ThirdServer=""
'v1.6
On Error Resume Next
Gdp_Serverlist=GetGlobalParamByKey("SAS_ServerList","names")
Gdp_MainServer=Gdp_Serverlist(0)
Gdp_SecondServer=Gdp_Serverlist(1)
On Error Goto errorLabel
Set db = source.database
dispServer =Gdp_MainServer
If db.server = Gdp_MainServer Then
dispServer = Gdp_SecondServer
End If
Dim continue As Variant
continue=True
Call ApromService_VerifyHttpConnection(continue)
If (Not continue) Then
MsgRetValue=Messagebox("Es besteht keine Verbindung zum Aprom-Server"+Chr(13)+ _
"Sie werden weitergeleitet auf NotesServer: " +at_name_cn(dispServer) ,0+16,"SAS")
Dim ws As New NotesUiWorkspace
Call ws.openDatabase(dispServer,db.filepath)
Else
setModelParamId("APR-MP-000008")
Call ApromService_ClientPreloading
Activateapp db.Title
End If
Goto endOfSub
errorLabel:
MsgRetValue=Messagebox("Fehler aufgetreten in Modul: Dbase PostOpen" +_
" Fehler-Nr.:" & Str(Err) & ": " & Chr(13) & Error$,16,"SAS Fehlermeldung")
endOfSub:
End Sub
Der Code ist nicht von mir, ich hoffe aber, das er ein bischen hilft.
-
Das ist alles nicht wahr... :-:
Ich habe noch im Errorhandle was eingefügt, danach kein Fehler mehr.
Schablone wieder drüber, kein Fehler mehr...
Ich versteh das nicht...
-
Ich bekomm die Kriese.
Fehler kommt, Fehler kommt nicht...
Dann auch noch eine Fehlinformation.
Fehler kommt bei der Zeile
Activateapp db.Title
-
Ok, weitergesucht...
Fehler kommt jetzt dauerhaft.
Was mir aufgefallen ist:
'über Datenbank' Dokument wird erst auf der Arbeitsbereichsseite dargestellt
dann geht die Datenbank auf, danach die über Seite und dann ist alles Ok, bis auf die Fehlermeldung...
-
Habe jetzt mal den 7.0.2er Client genötigt.
Auch da habe ich das Problem.
Scheint wohl nicht wirklich was mit der Notesversion zu tun zu haben, eher mit dem was wir hier veranstalten...
Merkwürdig ist es trotzdem
-
... die Meldung weist auf eine Benutzerdefinierte Meldung hin - Irgendwo im Postopen wird eine Funktion verwendet, die dort nicht declariert ist, oder nicht zur Verfügung steht...
Toni
-
Hi Toni.
Die Meldung ist aus dem Errorhandle.
Die Funktion die nicht klappt ist Activateapp und Notesbestand
ActivateApp statement
Makes a program window the active window.
Syntax
ActivateApp windowName
AppActivate is acceptable in place of ActivateApp.
Elements
windowName
A string expression designating the program window to activate.
Usage
windowName is not case sensitive. It must exactly match the leftmost characters of the program title that appears in the program window title bar. For example, if the program title of a running program window is "Lotus Notes - Workspace," then a windowName value of "Lotus Notes" will activate that window. If more than one program title matches windowName, LotusScript will choose one of the program windows.
ActivateApp can activate a minimized window, but cannot restore or maximize it. Use SendKeys to restore or maximize a window. Use Shell to start a program.
Was merkwürdig ist, das es nur passiert, wenn das Dokument 'über Datenbank' angezeigt werden soll, und dann auch nicht immer
-
... in solchen zweifelhaften fällen mache ich gerne eine Recompile auf die Datenbank, gehe aus Notes, lösche die Cache.ndk / bz. dsk und versuche es erneut. Ein Compact auf die Datenbank oder Fixup hat auch schon mal das eine oder andere Wunder bewirkt - da bleibt einem nur die Ruhe zu bewahren... ;)
Toni
-
Ich versuch mal mein Glück damit.
Dummerweise tritt dieses Phänomen bei einer anderen Datenbank, zum Glück nur eine Testdatenbank, auch auf. Schlafende Hunde soll man nicht wecken... O0
Ich mach jetzt erstmal recompile und laß dananch unseren Admin mal ein fixup machen.