an der Stelle
Sub Click(Source As Button)
Msgbox "IP-address: " + GetIPAddress & Chr(13) & "HostName: " + GetIPHostName
End Sub
wird mit GetIPAddress die IPAdresse ausgelesen. Anstelle diese in einer MsgBox anzuzeigen kannst Du die auch in ein Feld schreiben.
per Backend: NotesDocument.Feldname = GetIPAddress
per Frontend: Call NotesUIDocument.FieldSetText( "FeldName", GetIPAddress)
also im PostOpen der Maske könntest Du dies erledigen.
z.B. Call Source.FieldSetText("Feldname", GetIPAddress)
Den Code aus dem Dateianhang musst Du dann natürlich bei den Masken-Events einfügen.