Frank Becker wrote:
Hallo zusammen,

in oobase möchte ich erreichen, dass bei der Eingabe einer E-Mailadresse das Feld Homepage geändert wird (es soll gleich die Domain der Emailadresse eingetragen werden)

Nach langem Probieren und Suchen habe ich folgendes (ohne die eigentliche Modifikation):

Sub UpdateURLField
' Event: Soll aus der E-Mailadresse den Domainteil ausfiltern und in
' das Feld URL schreiben

Dim oDoc, oForm, oField
oDoc = thisComponent
    oForm = oDoc.drawpage.forms.getbyindex(0)
    oField = oForm.getByName("txtURL")
    oField.Text = "neuer Text"
End Sub

Kann man den ganzen Kram mit oDoc, oForm und oField irgendwie abkürzen? Also irgend etwas wie

feldinhalt = txtEmail.Text
neuerfeldinhalt = ModifyFeldinhalt(feldinhalt)
txtURL.Text = neuerFeldinhalt.

Wenn man da mit zwei oder mehr Feldern arbeiten will, dann wird das ganze ziemlich unübersichtlich und man kommt mit den ganzen oDoc usw durcheinander.

Hallo,
Was soll das? Ich meine, wieso willst Du Daten wegwerfen indem Du eine volle Adresse mit einem Teil davon ersetzt?

Dieses berechnete Feld liefert die Domains einer Spalter mit E-Mailadressen:
SUBSTRING ( "Mail", LOCATE( '@', "Mail" ) +1) AS "Domain"

Gruß,
Andreas


---------------------------------------------------------------------
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]

Antwort per Email an