A
andrew_ww
Guest
I have the following piece of code which makes up a larger module that essentially inputs the contents of an email into a database table
Rst.AddNew
Rst!Name = OlMail.SenderName
If InStr(1, OlMail.Subject, "Accept") > 0 Then
Rst!Status = "Attending"
Rst!datesent = OlMail.ReceivedTime
OlMail.Move OlAccept
Now this adds the sender, subject line and recieved date.
I wish now to add the body of the email.
This can be done by adding another line - Rst!content = OlMail.Body
But I wish to take this abit further and get it to add the contents of a single line to a single field in database.
Does anybody have any suggestions as to how I might accomplish this ?
I'm guessing I would need a loop of some sort to go through of the lines ?
Many Thanks.
Rst.AddNew
Rst!Name = OlMail.SenderName
If InStr(1, OlMail.Subject, "Accept") > 0 Then
Rst!Status = "Attending"
Rst!datesent = OlMail.ReceivedTime
OlMail.Move OlAccept
Now this adds the sender, subject line and recieved date.
I wish now to add the body of the email.
This can be done by adding another line - Rst!content = OlMail.Body
But I wish to take this abit further and get it to add the contents of a single line to a single field in database.
Does anybody have any suggestions as to how I might accomplish this ?
I'm guessing I would need a loop of some sort to go through of the lines ?
Many Thanks.
