Domino 9 und frühere Versionen > Entwicklung

Maske "Appointment" per Agent im "Bearbeitungsmodus" öffnen

(1/1)

Bellerophon:
*greetz* @ ALL!

Ich habe eine Schaltfläche die Daten per Agent aus einer Maske in den Kalender des jeweiligen Nutzers kopieren soll.

Ich weiß, dass ich hier im 5er Forum bin, aber ich denke das liegt auch an den 5er Maildatenbanken?

Bei mir (6.5.5 er Client & 6er Datenbanken) klappt das einwandfrei, bei Nutzern mit Clientversion 6.5.5 auf 5er Maildatenbanken kommt die Fehlermeldung:


--- Zitat ---Notes Fehler: Um den WERT eines Feldes ändern zu können, müssen Sie im Bearbeitungsmodus sein!
--- Ende Zitat ---

Er öffnet die Maske einfach NICHT im Bearbeitungsmodus!

Der Agent dazu sieht wie folgt aus:


--- Code: ---Sub Initialize
Dim sess As New NotesSession
Dim workspace As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Dim newdoc As NotesDocument
Dim Mailuidoc As NotesUIDocument
Dim db As NotesDatabase
Set db = sess.currentdatabase
Dim view As NotesView
Dim doc As NotesDocument
Dim Text As String
Set uidoc = workspace.CurrentDocument       
Dim localname As New Notesdatabase( "" , "names.nsf" )

     'Angaben übernehmen

Bezeichnung=uidoc.fieldgettext("tBezeichnung")
Beginn=uidoc.fieldgettext("datumVon")
Ende=uidoc.fieldgettext("datumBis")
BeginnUhr=uidoc.fieldgettext("zeitVon")
EndeUhr=uidoc.fieldgettext("zeitBis")
Thema=uidoc.fieldgettext("thema")
Kommentar=uidoc.fieldgettext("kommentar")

Call uidoc.close

Dim Maildb As New NotesDatabase( "", "" )
Call Maildb.OpenMail

If Not Maildb.IsOpen Then

Msgbox "Ihre lokale Maildatenbank konnte nicht gefunden werden. Bitte wenden Sie sich an Ihren Administrator!"
Exit Sub

End If
Set newdoc = Maildb.CreateDocument
newdoc.Form = "Appointment"
Set Mailuidoc = Workspace.EditDocument( True, newdoc )

Mailuidoc.fieldsettext"AppointmentType","0"

Mailuidoc.fieldsettext"Subject",Bezeichnung
Text = Bezeichnung+" - "+Beginn+"  -  "+BeginnUhr+" "+Ende+"  -  "+EndeUhr +"  - "+ Thema


Mailuidoc.fieldsettext"Body",Text

Call Mailuidoc.Refresh

End Sub

--- Ende Code ---

Habe ich was übersehen?

Navigation

[0] Themen-Index