Sets or gets the day of the week.
Syntax:
<sDay> = object.DayOfWeek
object.DayOfWeek = <sDay>
Remarks:
Valid values for day of the week are:
- “Sun”
- “Mon”
- “Tue”
- “Wed”
- “Thu”
- “Fri”
- “Sat”
Example:
Dim oEdiDoc As Fredi.ediDocument
Dim oMailDocument As Fredi.mailDocument
Dim oSubjMsg As Fredi.mailMessage
Dim oDate As Fredi.mailDate
' Create instance of Framework EDI.
Set oEdiDoc = New Fredi.ediDocument
' Get internet mail document object
Set oMailDocument = oEdiDoc.GetMailDocument
' Load EDI document normally.
oMailDocument.Load App.Path & "\SampleMail.TXT"
' Get subject document.
Set oSubjMsg = oMailDocument.GetMessage
' Get the date.
Set oDate = oSubjMsg.GetHeaderTypeDate("Date")
Debug.Print "Day of week: " & oDate.DayOfWeek
oDate.DayOfWeek = "Tue"
oMailDocument.Save App.Path & "\Output.TXT"
MsgBox "Done"
Samples