Domino 9 und frühere Versionen > Entwicklung

Teile eines Feldes suchen und ersetzten

<< < (4/4)

Axel:
Hi,

was funktioniert nicht ? Ich hab die Funktion getestet. Bei mir läuft sie problemlos.


--- Zitat ---Ist es allgemein zu empfehlen via LS die @Formelsprache aufzurufen?

--- Ende Zitat ---

Ich mache so was regelmässig. Warum soll man das Rad immer wieder neu erfinden. Es gibt viele Formelbefehle, für die es keine Script - Äquivalent gibt. Hier müsste man dann aufwändig eine Routine erstellen. Außerdem sind Formelbefehle teileweise sogar performanter.


Axel

eknori:
nur mal so am Rande:


      'iPos = Instr(1,var(0),"@",0)
     
      Set doc = view.getnextdocument(doc)
   Loop
   Messagebox Killheizboesch(s)

die msgbox gehört doch wohl IN den loop, oder ? ::)

Axel:
Hi,

ich hab mir deinen Code nochmal angeschaut und diesen beiden Zeilen

   Dim var(0) As String
...
   var(0) = doc.Mbr_Email

gefallen mir nicht.


Sub Initialize
   Dim session As New notessession
   Dim db As notesdatabase
   Set db = session.currentdatabase
   Dim view As notesview
   Dim doc As notesdocument
   Set view = db.getview("Personen - Alphabetisch")
   Set doc = view.getfirstdocument
   
   Dim s As String

   Do Until doc Is Nothing
      s = doc.Mbr_Email(0)
      Messagebox Killheizboesch(s)
      Set doc = view.getnextdocument(doc)
   Loop

End Sub

Versuch das Ganze mal so.

Axel

Navigation

[0] Themen-Index

[*] Vorherige Sete