Datei auslesen und in Lotus-Form übernehmen

[solvei]

hallo,
ich habe lokal eine datei (text.txt):
.... Text....
E-Mail:test@test.de
....
blablablabal......


aus dieser datei, soll in einem memo die email-adresse in das field 'send to' geschrieben werden.
blablablabal...... soll in das richtext-field Body geschrieben werden.

wie lese ich die datei aus und weise den teilen das richtige field zu


thx
solvei

[Thomas Schulte]

Dazu kannst du dir die Online Hilfe "Reading from Files" und "String Handling Character Extraction" mal anschauen.
Was dabei wichtig ist, der Aufbau der E-Mail muss immer gleich sein. Sonst gibt es Kleinholz.

Thomas

[solvei]

danke für den tipp.
dort habe ich schon reingeschaut, finde aber keinen hinweis, wie ich z.b. die zeile
E-Mail: test@test.de
finden soll.

gruss
solvei

[Thomas Schulte]

mit instr(0,String1,String2) kriegst du raus ob in dieser Zeile deiner TXT Datei, defniert durch String1 irgendwo String2 enthalten ist und ab welcher Position.

Der Rest ist dann nur noch abschneiden und auseinanderfieseln.

Thomas

[solvei]

danke. hat mir schon mal sehr geholfen.
mit:

'open file for reading
   Open "c:\plane.txt" For Input As fileNum2
   start_email = Instr(147,plainText,"E-mail:")    
   position_email = start_email + 8
   position_telefon = Instr(148,plainText,"Telefon:")
'   email address of appliccant => all characters between position_email and position_telefon
   email address = ??


wie erhalte ich alle characters zwischen position_email und postion_telefon ?

bin noch sehr unbeholfen mit der syntax und sprache von lotus.

gruss
solvei

[Thomas Schulte]

damit:
EmailAddress = mid$(plaintext,position_email,((position_Telefon-1) - position_email))

Wobei Position_Telefon -1 die letzte Stelle vor dem Zeichen Telefon ergibt und davon Position_Email Abgezogen ergibt die maximale Länge der E-Mail Addy

Thomas

[solvei]

ja, soweit so gut.
danke dir, funktioniert alles.
das ganze programm läuft in einem agenten.
dieser soll jetzt ein formular öffnen und 2 felder füllen:
field1: SendTo soll gefüllt werden mit der variablen email_address
field2: Body RichText) soll gefüllt werden mit der variablen body


ich habe nach set-funktionen gesucht, diese allerdings nur in der formula gefunden.
und wie öffne ich das formular aus dem agenten?

gruss
solvei

[Thomas Schulte]

Ich nehm mal an du hast das Formular schon. Dann musst du jetzt aus dem Beckend in die Frontend Klassen gehen . Schau dir dazu Notesuiworkspace an. Da findest du die Methode Editdocument. Damit solltest du weiterkommen.

N.B. Ein Entwickler Kurs wäre vielleicht nicht schlecht. Oder zumindest die Entwickler Schulungsunterlagen vom Herdt Verlag.

Thomas