Domino 9 und frühere Versionen > Entwicklung

Teile eines Feldes suchen und ersetzten

<< < (3/4) > >>

TMC:
Verstehe jetzt Deine Frage nicht.

Ein Wert aus einem Array ist ja ein String.
Ein Array enthält eben mehrere Strings als Liste.

Und in der Funktion ist durchaus ein String definiert.
*Script
Function sWord ( sourceString As String, separator As String, number As Integer ) As String
*Script

Hier wird von Array (Variant) nichts erwähnt.

Hab mir jetzt die Funktion nicht angesehen, aber die wird meckern, wenn Du da ein Array reinkippst anstatt ein String wie definiert.

Matthias

eknori:
Array ?? Daniel zeig doch mal kurz auf, wie du vorgehen willst

Daniel:
Hallo Eknori!

So lese ich aus

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
   Dim var(0) As String
   Do Until doc Is Nothing
      var(0) = doc.Mbr_Email
      s = var(0)
      
      'var(1) = doc.Mbr_Emailentry(0)
      'iPos = Instr(1,var(0),"@",0)
      
      Set doc = view.getnextdocument(doc)
   Loop
   Messagebox Killheizboesch(s)
End Sub


So wie es momentan noch dasteht, von der Reihenfolge her, wie der String geändert werden sollte, stimmt es noch nicht.

Bei Killheizboesch steht das hier, bei deinem Skript bin ich doch noch gescheitert an den Datentypen, hier aber auch?!?!

Function Killheizboesch ( s As String) As String
   strformula = { @ReplaceSubString("} + s + {"; "@heizboesch.at"; "@boesch.at") }
   nStr = Evaluate( strformula )
   KillUmlaute = nstr(0)
End Function

Daniel

Axel:
Hi,

deine Funktion heißt Killheizboesch. das Ergebnis weist du aber KillUmlaute zu.

Meiner Meinug nach muss die Funktion so aussehen:
 
Function Killheizboesch ( s As String) As String
   strformula = { @ReplaceSubString("} + s + {"; "@heizboesch.at"; "@boesch.at") }
   nStr = Evaluate( strformula )
  Killheizboesch = nstr(0)
End Function

Axel


Hab die Funktion gerade eben mal getestet und so funktioniert sie.

Daniel:
Achherrje, stimmt.
Aber es funzt trotzdem nicht.
Ist es allgemein zu empfehlen via LS die @Formelsprache aufzurufen?

Daniel

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete