Domino 9 und frühere Versionen > Entwicklung

Signal, wenn neues Dokument vorhanden

<< < (5/6) > >>

koehlerbv:
Punkt 2 aus Driris Beitrag ist wohl definitiv so - das ist halt die Syntax für die API-Funktion.

Bei Punkt 1 melde ich Zweifel an - hier wird doch ein String ByVal übergeben, ergo sollte man sich den auch "von aussen" zusammenbauen können. Aufpassen muß man natürlich mit den Anführungszeichen, der sowohl der der Konsolenbefehl als auch der Parameter an sich (um ihn als String zu kennzeichnen) verlangen.
Aber dafür gibt es ja die geschweiften Klammern oder das Pipe-Symbol als "Ober-Anführungszeichen", und damit sollte es möglich sein, sich den zu übergebenden String entsprechend zusammen zu basteln.

Beispiel:
Übergeben werden soll folgender String, wobei die Anführungszeichen im String selber vorkommen sollen und nicht diesen als solchen ausweisen:
"Der Krieg gegen den Irak verstösst gegen das Völkerrecht, sagt UNO-Generalsekretär Annan".
Da wir nicht wissen, gegen wen die USA demnächst ins Feld ziehen und wer dann UNO-Generalsekretär ist, sollen diese beiden Werte also aus Variablen stammen und in den Übergabestring eingebaut werden.

Dim szVictim as String
Dim szUNGSecretary as String
Dim szParameter as String

szVictim = "Syrien"
szUNGSecretary = "Annan"   'böse Ahnung ...

szParameter = {"Der Krieg gegen } & szVictim & " verstösst gegen das Völkerrecht, sagt UNO-Generalsekretär " & szUNGSecretary & {"}

Ich habe das jetzt nicht getestet, aber nach genau diesem prinzip werden solche - sagen wir mal "Strings in Strings" - aufgebaut.

HTH,
Bernhard

Cookie:
Also das hat uns ja nun  auch interessiert und wir haben an der Funktion so lange herumgebastelt, bis das ganze dynamisch wurde. Also mann kann Namen den Text, die Felder also einfach alles dynamisch auslesen. Es ist nur eines nicht, trivial!
Bei Bedarf helfen wir gerne weiter...

Sub Initialize
   Set s=New notessession
   Set db = s.currentdatabase
   Set srvview = db.Getview("x1Sachb")
   Set tmpdoc=srvview.GetFirstDocument
   
   Dim test_text As String, testname As String, buffers As String,broadtext As String
   
   test_text = db.server
   testname = tmpdoc.empfang(0)
   broadtext = "(!)" + tmpdoc.broadtext(0)
   buffers = |broadcast "| + broadtext + |" "| + testname + |"|
   
   result = NSFRemoteConsole(test_text , buffers, hBuf)
   pBuf = OSLockObject(hBuf)
   Call OSUnlockObject(hBuf)
   Call OSMemFree(hBuf)
End Sub

Centaury:
Sehr interessanter Thread, sowas kann man mal brauchen....

Ich möchte gern kurz zur "Verteigigung" Bernhards beitragen:
Manchmal macht es Sinn, seine Herangehensweise noch einmal zu überdenken, da macht ein Forum auch Sinn...
Ich hatte es schon einige Male, dass ich das Pferd neu aufgezäumt habe und schon lösten sich viele Probleme von selbst...
Manchmal ist es halt schwer, den einen Fall von einem anderen zu unterscheiden und man postet eine "Überdenkungsanregung" zuviel, manchmal auch nicht...

cococo69:
@Centaury,

keine Frage, ich stimme Dir voll und ganz zu!!!
Aber der Ton macht die  Musik.... ;-)´
Und jetzt würde ich sagen, vergessen wir das Ganze, für mich ist diese Sache längst erledigt!

Armin

joan:
Eine kleine Ergänzung zu diesem Thread:

Das ganze ist offenbar nicht ganz unkritisch. Ich habe das gerade mal auf zwei unserer R6 Server getestet. Auf dem ersten lief es problemlos, auf dem zweiten warf die Konsole beim Start des Agenten nur noch die Meldung aus:

Thread=[1708:0002-14FC]
Stack base=0x0012F3F8, Stack size = 6328 bytes
PANIC: LookupHandle: null handle

mit anschließendem Restart des Domino Servers...   :o

Ciao, ...Joachim

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete