Also bei mir gehts- zwar nur Lokal, aber es geht. Aufm Server muss das doch dann auch gehen.
Ich hab einfach das Applet in eine Maske eingefügt und diese in einen Rahmen eingebunden. Die Maske hat von mir einen Button bekommen, der folgenden Code hat
| Sub Click(Source As Button) |
| |
| Dim s As New NotesSession |
| Dim db As NotesDatabase |
| Dim view As notesview |
| Dim uidoc As NotesUIDocument |
| Dim ws As New NotesUIWorkspace |
| |
| Set db = s.CurrentDatabase |
| Set view = db.GetView("ticker") |
| Set uidoc = ws.CurrentDocument |
| |
| If uidoc Is Nothing Then |
| Msgbox "Es ist ein Fehler aufgetreten!" |
| Exit Sub |
| Else |
| |
| Call view.Refresh |
| Call uidoc.Refresh |
| End If |
| |
| End Sub |
Und noch ein Feld "Saveoptions" mit "1" rein und fertig. Wenn der Text geändert wird, muss nur der Knopf gedrückt werden und der neue text steht da...
Klaus, habe ich was übersehen? So ein Hexenwerk war das nun nicht...
Sicherlich knallt es gleich, wenn ich die DB auf den Server haue

Matthias