Das Notes Forum
Domino 9 und frühere Versionen => Administration & Userprobleme => Thema gestartet von: clannad am 26.06.02 - 08:40:17
-
hallo,
ich habe nun das erste mal versucht lotusscript anzuwenden. und zwar habe ich einen button gemacht, auf dem uhrzeit steht - wenn ich diesen button klicke so soll er die uhrzeit ausgeben.
ich befinde mich in der option click und habe folgendes eingegeben
Sub Click(Source As Button)
Dim s As NotesSession
Dim db As NotesDatabase
Dim view As NotesView
Dim doc As NotesDocument
Dim item As NotesItem
Set item = doc.GetFirstItem( "DateComposed" )
Set dateTime = item.DateTimeValue
End Sub
doch da kommen viele fehlermeldungen.
was ist daran verkehrt?
-
Hi,
du hast einige Objektvariablen vergessen. Ändere deinen Code wie folgt ab.
Sub Click(Source As Button)
Dim workspace As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Dim doc As NotesDocument
Dim item As NotesItem
Dim dateTime As NotesDateTime
Set uidoc = workspace.CurrentDocument
Set doc = uidoc.Document
Set item = doc.GetFirstItem( "DateComposed" )
Set dateTime = item.DateTimeValue
End Sub
Axel
-
ich danke dir schon mal, aber es kommt noch immer das die objektvariablen nicht gesetzt sind...
ich hab das ganze jetzt mal so gemacht
Set item = doc.GetFirstItem( "uhrzeit" )
Set notesItem.DateTimeValue = notesDateTime
doch hier kommt dann: variant does not contain an object ...
fehlt da noch die ausführung?
-
Hi,
wo befindet sich denn der Button, in einer Ansicht oder einem Dokument ?
Axel
-
der button ist in einem dokument ...
-
Hi,
dann sollte mein Code funktionieren. Eigentlich weise ich allen notwendigen Variablen ein Objekt zu.
Das einzigste Unsicherheitsfaktor ist die Zeile:
Set item = doc.GetFirstItem( "DateComposed" )
Hier muß ein gültiger Feldname übergeben werden. Gibt es bei dir das Feld "DateComposed" ?
Schau auch mal mit dem Debugger, an welcher Stelle er den Fehler bringt.
Axel
-
ich habe das problem jetzt einfach mit
Msgbox "Beim nächsten Ton ist es " + Now gelöst :)
danke!