Das Notes Forum
Domino 9 und frühere Versionen => ND6: Entwicklung => Thema gestartet von: zerozero am 11.07.06 - 11:44:15
-
Hallo, ihr Profis
also ich habe für meine Anwendung ein VB-Prgramm geschrieben welches mir meine Termine in Lotus Notes übernimmt, dies klappte auch sehr gut bis ich mir das neue Lotus Notes 6.5 holte seit den bekomme ich wenn ich den Termin öffen will folgende Fehlermeldung
"Error trying to open document: Document is damaged or obsolete ( incorrect field lengt)"
nach ein paar Tests ergab sich das es wahrscheinlich an dieser Stelle das Quelltextes liegt:
" Call docMail.REPLACEITEMVALUE("Form", "Appointment")"
Da ohne diese Zeile der Fehler nicht mehr auftritt dafür aber auch der Termin nicht mehr als Termin angezeigt wird sondern als Memo
Gibt es seit Lotus Notes 6.5 nee neue betiltelung der Form für Appointment
fallss ihr möchtet stell ich euch den rest des Quelltextes rein nur ich dachte erstmal nicht weil sonst wird der Beitrag zu lang sind so ca 12 Seiten
mfg
-
Auch in Version 6 und 7 ist der Eintrag "Appointment" für Form vollkommen unverändert. An der von Dir genannten Zeile an sich kann es daher wirklich nicht liegen.
Verwendest Du später ein docMail.ComputeWithForm? Dieses könnte durchaus Ärger machen (ich habe das bis heute auch nicht fehlerfrei zum Laufen bekommen). Das würde dann auch erklären, warum das Auskommentieren der genannten Zeile "hilft".
Bernhard
-
nee eigentlich benutze ich kein "docMail.ComputeWithForm? " naja das ist natürlich schlecht hab mal noch ein teil mit reingestellt damit schon mal alle docMails nachzulesen sind wenn ihr noch mehr braucht sag bescheid
Call docMail.REPLACEITEMVALUE("Form", "Kalendereinträge")
Call docMail.REPLACEITEMVALUE("Alarms", "")
Call docMail.REPLACEITEMVALUE("AppointmentType", eintragstyp)
Call docMail.REPLACEITEMVALUE("ApptUNID", "453D62C83FE8D6CC1256AA2003F240D")
Call docMail.REPLACEITEMVALUE("BlindCopyTo", "")
Call docMail.REPLACEITEMVALUE("Body", txttermin)
Call docMail.REPLACEITEMVALUE("BookFreeTime", "")
Call docMail.REPLACEITEMVALUE("CalendarDateTime", terminbeginn)
Call docMail.REPLACEITEMVALUE("Categories", "")
Call docMail.REPLACEITEMVALUE("CopyTo", "")
Call docMail.REPLACEITEMVALUE("Encrypt", "0")
Call docMail.REPLACEITEMVALUE("EndDate", terminende)
Call docMail.REPLACEITEMVALUE("EndDateTime", terminende)
Call docMail.REPLACEITEMVALUE("EndTime", terminende)
Call docMail.REPLACEITEMVALUE("EnterBlindCopyTo", "")
Call docMail.REPLACEITEMVALUE("EnterCopyTo", "")
Call docMail.REPLACEITEMVALUE("EnterSendTo", "")
Call docMail.REPLACEITEMVALUE("ExcludeFromView", feld)
Call docMail.REPLACEITEMVALUE("Location", ort)
Call docMail.REPLACEITEMVALUE("Logo", "stdNotesLtr0")
Call docMail.REPLACEITEMVALUE("MailFirstPass", "1")
Call docMail.REPLACEITEMVALUE("MailOptions", "0")
If privat = "1" Then
Call docMail.REPLACEITEMVALUE("OrgConfidential", privat)
Else
Call docMail.REPLACEITEMVALUE("OrgConfidential", "")
End If
Call docMail.REPLACEITEMVALUE("OrgTable", "C0")
Call docMail.REPLACEITEMVALUE("Repeats", "")
Call docMail.REPLACEITEMVALUE("Resources", "")
Call docMail.REPLACEITEMVALUE("RoomToReserve", "")
Call docMail.REPLACEITEMVALUE("SaveOptions", "")
Call docMail.REPLACEITEMVALUE("SendTo", "")
Call docMail.REPLACEITEMVALUE("SequenceNum", 1)
Call docMail.REPLACEITEMVALUE("Sign", "0")
Call docMail.REPLACEITEMVALUE("StartDate", terminbeginn)
Call docMail.REPLACEITEMVALUE("STARTDATETIME", terminbeginn)
Call docMail.REPLACEITEMVALUE("StartTime", terminbeginn)
Call docMail.REPLACEITEMVALUE("Subject", betreff)
Call docMail.REPLACEITEMVALUE("tmpNoActionBar", "")
Call docMail.REPLACEITEMVALUE("tmpOEMClient", "")
Call docMail.REPLACEITEMVALUE("tmpOwnerHW", "1")
Call docMail.REPLACEITEMVALUE("WebCategory", "")
Call docMail.REPLACEITEMVALUE("WebDateTimeInit", "1")
Call docMail.REPLACEITEMVALUE("_ViewIcon", 160)
Call docMail.REPLACEITEMVALUE("$BusyName", Location)
Call docMail.Save(False, False) 'Include this to save in the send view