Find Jobs
Hire Freelancers

Outlook COM Add-ins

$30-250 AUD

Đang triển khai
Đã đăng vào hơn 11 năm trước

$30-250 AUD

Thanh toán khi bàn giao
We need to convert a macro to a COM Add-ins for Microsoft [login to view URL] Macro is currently called via a button that is added to the ribbon and allows the user to send an email, saves the email to a location on the user Hard Drive and then calls a 3rd party application. The issue with a Macro is that it needs to be distributed to a larger group of users rather than a single user and that the user is prompted each time Outlook loads to enable the macro due to Microsoft security around macros. The COM Add-ins will add an option in the Outlook Ribbon (Outlook 2007+) See sample image of the ribbon. User clicks on the option which sends the email. Email saved locally 3rd Party application is executed which will prompt a user with a wizard and then removes the temporary file (This is not needed to be coded, 3rd party app already exists) The code below will provide the command that will be needed to execute the 3rd party application. Current Marco Code below [login to view URL] Modules -> Module1 Sub TagForFileBound() On Error GoTo HandleError Dim myinspector As [login to view URL] Dim myItem As [login to view URL] Dim uId As String Set myinspector = [login to view URL] Set myItem = [login to view URL] Set myProp = [login to view URL]("SaveToFB", olText) [login to view URL] = "Yes" [login to view URL] Exit Sub HandleError: If Error(Err) "" Then MsgBox "Email could not be saved to FileBound because " & Error(Err) End If Exit Sub End Sub Microsoft Outlook Objects -> ThisOutlookSession VERSION 1.0 CLASS BEGIN MultiUse = -1 'True END Attribute VB_Name = "ThisOutlookSession" Attribute VB_GlobalNameSpace = False Attribute VB_Creatable = False Attribute VB_PredeclaredId = True Attribute VB_Exposed = True Private WithEvents FBOutlookItems As [login to view URL] Attribute FBOutlookItems.VB_VarHelpID = -1 Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean) If FBOutlookItems Is Nothing Then Application_Startup End If End Sub Private Sub Application_Startup() Dim objNS As [login to view URL] Dim objSentFolder As [login to view URL] Set objNS = [login to view URL] Set FBOutlookItems = [login to view URL](olFolderSentMail).Items End Sub Private Sub FBOutlookItems_ItemAdd(ByVal Item As Object) On Error GoTo HandleError Dim objNS2 As [login to view URL] Set objNS2 = [login to view URL]("MAPI") Dim objProperty As [login to view URL] If TypeOf Item Is [login to view URL] Then Set objProperty = [login to view URL]("SaveToFB") 'MAKE SURE THE EMAIL WAS SENT USING SEND & SAVE BUTTON 'SEND AND SAVE BUTTON ADDS A CUSTOM PROPERTY BEFORE SENDING If TypeName(objProperty) "Nothing" Then Dim saveToPath Dim AutoFilePath saveToPath = "c:\" & [login to view URL] & ".msg" [login to view URL] saveToPath, olMSG Set objShell = CreateObject("[login to view URL]") AutoFilePath = [login to view URL]("%PROGRAMFILES%") & "\FileBound\Integration Kit-V6\[login to view URL] " & Chr(34) & saveToPath & "|1|" & Chr(34) Set objExec = [login to view URL](AutoFilePath) End If End If Set objNS2 = Nothing HandleError: If Error(Err) "" Then MsgBox "Email could not be saved to FileBound because " & Error(Err) End If Exit Sub End Sub
Mã dự án: 4075868

Về dự án

10 đề xuất
Dự án từ xa
Hoạt động 11 năm trước

Bạn muốn kiếm tiền?

Lợi ích khi chào giá trên Freelancer

Thiết lập ngân sách và thời gian
Nhận thanh toán cho công việc
Phác thảo đề xuất của bạn
Miễn phí đăng ký và cháo giá cho công việc
Đã trao cho:
Avatar người dùng
Hi I have solid experience in Outlook add-ins development - created over 40 during last few years. I can provide the described add-in within 2 days using either C#, VB.NET or C++ - as you prefer Supported versions are 2007/2010/2013, including 64-bit editions
$50 AUD trong 2 ngày
4,8 (90 nhận xét)
5,5
5,5
10 freelancer chào giá trung bình $138 AUD cho công việc này
Avatar người dùng
Hi VSTO and Outlook,MS Office Add-in development expertise in VB/C#. Please have a look at private message for details Thanks
$250 AUD trong 6 ngày
4,6 (30 nhận xét)
6,5
6,5
Avatar người dùng
Please check the PM.
$100 AUD trong 2 ngày
4,7 (14 nhận xét)
5,5
5,5
Avatar người dùng
Hi, Lets do it, Pls check private message as well. Thanks djain01
$250 AUD trong 5 ngày
5,0 (40 nhận xét)
5,0
5,0
Avatar người dùng
Please, check the private message for the demo offer
$125 AUD trong 0 ngày
4,9 (5 nhận xét)
4,0
4,0
Avatar người dùng
Hello, I'll be happy to create outlook com add-ins . Regards, Krishna
$30 AUD trong 1 ngày
4,9 (7 nhận xét)
3,2
3,2
Avatar người dùng
c/c++/c# developer
$30 AUD trong 2 ngày
5,0 (4 nhận xét)
3,1
3,1
Avatar người dùng
I am interested
$50 AUD trong 5 ngày
0,0 (0 nhận xét)
0,0
0,0
Avatar người dùng
Hi there, Thank you for posting your project proposal here! I've gone through your requirements to convert a macro to a COM Add-ins for Microsoft Outlook and We fulfill your vision of getting the website built with the desired output and so glad to bid on this project as we have tremendous expertise and we would like to have some more details about the project . For any clarifications,kindly get back to us at any time . Kindly refer PMB . Cheers, Jeny, Niyahtech.
$1.000 AUD trong 19 ngày
0,0 (0 nhận xét)
0,0
0,0
Avatar người dùng
Thanks for the opportunity to bid on your project. We have strong Outlook and Visual Basic Skills and are therefore well placed to develop the Add-In Described in your tender document. We are available to begin work immediately should you elect to award the project to us. Please contact us if you need any clarifications on any or all aspects of our bid.
$250 AUD trong 5 ngày
0,0 (0 nhận xét)
3,3
3,3

Về khách hàng

Cờ của AUSTRALIA
Kedron, Australia
5,0
9
Phương thức thanh toán đã xác thực
Thành viên từ thg 10 22, 2010

Xác thực khách hàng

Cảm ơn bạn! Chúng tôi đã gửi email chứa đường link để bạn lấy tín dụng miễn phí.
Đã xảy ra lỗi trong khi gửi email của bạn. Hãy thử lại.
Người Dùng Đã Đăng Ký Tổng Số Việc Đã Đăng
Freelancer ® is a registered Trademark of Freelancer Technology Pty Limited (ACN 142 189 759)
Copyright © 2024 Freelancer Technology Pty Limited (ACN 142 189 759)
Đang tải xem trước
Đã cấp quyền truy cập vị trí.
Phiên đăng nhập của bạn đã hết hạn và bạn đã bị đăng xuất. Hãy đăng nhập lại.