Hi Mike,
for sending using outlook:
'~~~~~~~~~~~~~~~~~~~
Sub EmailOutlook()
's4p
'use early binding to develop
' Dim appOut As Outlook.Application _
, oMsg As Outlook.MailItem
'use late binding to deploy
Dim appOut As Object _
, oMsg As Object
Set appOut = CreateObject("Outlook.Application")
Set oMsg = appOut.CreateItem(0) '0=olMailItem
With oMsg
'.Importance = olImportanceHigh
.to = "someone@somewhere.com"
'.CC = "cc email address"
'.BCC = "cc email address"
.Subject = "My subject line"
.Body = "My message"
' .Attachments.Add sPathFile
' If you want to edit before sending
.Display
'otherwise, to just send without looking...
'.Send
End With
Proc_Exit:
On Error Resume Next
'release object variables
Set appOut = Nothing
Set oMsg = Nothing
Exit Sub
Proc_Err:
MsgBox Err.Description, , _
"ERROR " & Err.Number _
& " EmailOutlook"
Resume Proc_Exit
Resume
End Sub
'~~~~~~~~~~~~~~~~~~~
for receiving back: you can link to a local outlook mailbox (that received mail gets put in) from Access and process all mail in there. You can open it up just like a table.
crystal
~ have an awesome day ~
I have been using MS Access to track work orders, jobs and such in my plumbing service company. I have been filling out the work orders buy hand and then entering the data into Access when back at the office. As I am starting farm out some of the work. At the moment I copy the client information, address and phone number and send it to the service tech via text message. He then transcribes the information to the work order, fills in for inspection, work completed, recommendations, warranty, and such. A few days later I get the completed work order enter the information into Access and then bill the client...
I would like to be able to have Access fill out a form that I email to the service tech, which he could complete on his Android phone, and then forward back to me, with the updated fields to be read into Access, thus avoiding transcribing the data from the work order and streamlining the billing process.
Any ideas on how to approach this.
Thanks MikeSac City Plumbing
Posted by: crystal 8 <strive4peace2008@yahoo.com>
Reply via web post | • | Reply to sender | • | Reply to group | • | Start a New Topic | • | Messages in this topic (13) |
Tidak ada komentar:
Posting Komentar