visual studio 2010 - Get data from Outlook to Database -


my project send fields before visual studio outlook body in fields entered in body after reception of messages user can modify data sent in text fields on outlook , sends update data saved in database that's possible update data outlook database ?

i have build solution that, use daily read , file mail part of daily workflow. others have hinted need specific need with.

        if (typeof olitem outlook.mailitem)             dim olmailitem outlook.mailitem = trycast(olitem, outlook.mailitem)              if olmailitem.permission = outlook.olpermission.olunrestricted                 strbody = olmailitem.htmlbody                   'file:///c:/attsave/header.png             else                 strbody = "rights protected fix if i'm not in debugger"             end if              each olattach in olmailitem.attachments                 if olattach.type <> outlook.olattachmenttype.olole                     olattach.saveasfile("c:\attsave\" & olattach.filename)                     'strbody = strbody.replace("cid:header", "file:///c:/attsave/header.png")                     strcid = olattach.propertyaccessor.getproperty("http://schemas.microsoft.com/mapi/proptag/0x3712001e")                     if strcid <> ""                         strbody = strbody.replace("cid:" & strcid, "file:///c:/attsave/" & system.web.httputility.urlencode(olattach.filename))                     end if                     lst_attach.items.add(olattach.filename)                 else                     msgbox("open 1 via outlook")                 end if              next             me.webbody.documenttext = strbody             me.txtsubject.text = olmailitem.subject             if olmailitem.importance = outlook.olimportance.olimportancehigh                 me.txtsubject.forecolor = color.red             else                 me.txtsubject.forecolor = color.white             end if              'dim palsender microsoft.office.interop.outlook.addressentry             'palsender = mailitem.sender             me.txtsentdate.text = olmailitem.senton             'me.txtto.text = olmailitem.to             olsendera = olmailitem.sender             if isnothing(olsendera) = false                  'dim olconitem outlook.contactitem                  'olconitem = olsendera.getcontact()                 'if not isnothing(olconitem)                 '    if olconitem.haspicture = true                 '        stop                 '    end if                 'end if                   pa = olsendera.propertyaccessor                 'debug.print(olre.name & "stp= " & pa.getproperty("http://schemas.microsoft.com/mapi/proptag/0x39fe001e"))                 try                     me.txtfrom.text = me.txtfrom.text & olsendera.name & " (" & pa.getproperty("http://schemas.microsoft.com/mapi/proptag/0x39fe001e") & ")"                 catch ex system.runtime.interopservices.comexception                     'stop                     me.txtfrom.text = olmailitem.sendername & " (" & olmailitem.senderemailaddress & ")"                 catch ex exception                     stop                 end try 

Comments

Popular posts from this blog

html5 - What is breaking my page when printing? -

html - Unable to style the color of bullets in a list -

c# - must be a non-abstract type with a public parameterless constructor in redis -