Forums Neueste Beiträge
 

CDO: WebService und Exchange 2003

26/09/2007 - 10:43 von Oskar Vaia | Report spam
Hallo,

ich habe einen WebService entwickelt, der Aufgaben eintragen kann.
Hier der dafür zustàndige Code:


message2.Fields.Item("DAV:contentclass").Value =
"urn:content-classes:message"
message2.Fields.Item("http://schemas.microsoft.com/exchan...lass").Value
= "IPM.Task.(p) Aufgabe"
message2.Fields.Item("urn:schemas:mailheader:subject").Value =
String.Concat(New String() {StringType.FromInteger(RateDat.RechnNr), " vom
", StringType.FromDate(RateDat.RechnDat)})
message2.Fields.Item("urn:schemas:httpmail:textdescription").Value
= "Rechnung" & ChrW(13) & ChrW(10) & "Kunde"
message2.Fields.Item("http://schemas.microsoft.com/mapi/string/{00020329-0000-0000-C000-000000000046}/Kundenkodex").Value
= DoubleType.FromString(RateDat.KKodex)
message2.Fields.Item("http://schemas.microsoft.com/mapi/string/{00020329-0000-0000-C000-000000000046}/Kundenbezeichnung").Value
= KundenDat.Firma
message2.Fields.Item("http://schemas.microsoft.com/mapi/string/{00020329-0000-0000-C000-000000000046}/Strasse").Value
= KundenDat.Strasse
message2.Fields.Item("http://schemas.microsoft.com/mapi/string/{00020329-0000-0000-C000-000000000046}/Ort-A").Value
= KundenDat.Ort
message2.Fields.Item("http://schemas.microsoft.com/mapi/string/{00020329-0000-0000-C000-000000000046}/Vertreter").Value
= KundenDat.KodVertreter
message2.Fields.Item("http://schemas.microsoft.com/mapi/string/{00020329-0000-0000-C000-000000000046}/RechnNr").Value
= CDbl(RateDat.RechnNr)
message2.Fields.Item("http://schemas.microsoft.com/mapi/string/{00020329-0000-0000-C000-000000000046}/RechnDat").Value
= DateType.FromString(RateDat.RechnDat.ToString("yyyy-MM-ddTHH:mm:ssZ"))
message2.Fields.Item("http://schemas.microsoft.com/mapi/string/{00020329-0000-0000-C000-000000000046}/Betrag").Value
= RateDat.Betrag
message2.Fields.Item("http://schemas.microsoft.com/mapi/string/{00020329-0000-0000-C000-000000000046}/Fàlligkeit").Value
= DateType.FromString(RateDat.Faelligkeit.ToString("yyyy-MM-ddTHH:mm:ssZ"))
message2.Fields.Item("http://schemas.microsoft.com/mapi/id/{00062008-0000-0000-C000-000000000046}/0x00008502").Value
=
DateType.FromString(RateDat.Faelligkeit.AddDays(10).AddHours(7).ToString("yyyy-MM-ddTHH:mm:ssZ"))
message2.Fields.Item("http://schemas.microsoft.com/mapi/id/{00062008-0000-0000-C000-000000000046}/0x00008560").Value
=
DateType.FromString(RateDat.Faelligkeit.AddDays(10).AddHours(7).ToString("yyyy-MM-ddTHH:mm:ssZ"))
message2.Fields.Item("http://schemas.microsoft.com/mapi/id/{00062003-0000-0000-C000-000000000046}/0x00008101").Value
= 1
message2.Fields.Update()
If (Source_OL_URL.IndexOf("noURL") = -1) Then
message2.DataSource.Save()
Else
message2.DataSource.SaveToContainer(sourceURL, Nothing,
ConnectModeEnum.adModeReadWrite,
RecordCreateOptionsEnum.adCreateNonCollection, Not
RecordOpenOptionsEnum.adOpenRecordUnspecified, const_UserNameForService,
const_PasswordForService)
End If


Das Ganze làuft auch wunderbar.

Nur eine Sache verstehe ich nicht ganz. Wieso wird z.B. mit dieser Anweisung

message2.Fields.Item("http://schemas.microsoft.com/mapi/string/{00020329-0000-0000-C000-000000000046}/RechnDat").Value= DateType.FromString(RateDat.RechnDat.ToString("yyyy-MM-ddTHH:mm:ssZ"))die Uhrzeit im Exchange immer mit 01:00:00 oder 02:00:00 eingetragen, wenndie Eigenschaft "RateDat.RechnDat" z.B. den Wert "26.09.2007 00:00:00"enthàlt?Dank und GrüßeOskar
 

Lesen sie die antworten

#1 Frank Carius [MVP]
26/09/2007 - 23:04 | Warnen spam
Oskar Vaia wrote:

Nur eine Sache verstehe ich nicht ganz. Wieso wird z.B. mit dieser
Anweisung
message2.Fields.Item("http://schemas.microsoft.com/mapi/string/{00020329-0000-0000-C000-000000000046}/RechnDat").Value> DateType.FromString(RateDat.RechnDat.ToString("yyyy-MM-ddTHH:mm:ssZ"))die
Uhrzeit im Exchange immer mit 01:00:00 oder 02:00:00 eingetragen,
wenndie Eigenschaft "RateDat.RechnDat" z.B. den Wert "26.09.2007
00:00:00"enthàlt?Dank und GrüßeOskar



Ändere mal sid eZeitsonze auf em Server. àndert sich as dann auch ?
Wie "list" due denn das Feld. per MAPI&CDO oder auch per HTTP/WebDav

MAPI zeigt normal immer die "errechnete" Zeit an.
Ändera mal die Zeitzone auf dem PC und schon haben Mails, Termine aber auch
Dateien im Dateisystem eine anderen Zeit




Frank Carius MS Exchange MVP
Exchange FAQ auf http://www.msxfaq.de
Support siehe http://www.netatwork.de/msxfaq.htm
Bitte "Realnamen" verwenden oder müssen Sie sich verstecken ?
Dringendes Problem: eine Telefonnummer kann ich anrufen,wenn Zeit ist
:-) --

Ähnliche fragen