Need Help Converting a VBA Macro to AppleScript 2.1.2 for Outlook 2011

Hello AppleScript Experts:
Can somebody help me convert the below VBA Macro to an equivalent AppleScript 2.1.2 for Mac Outlook 2011 (Version 14.1.3)
I have a VBA macro program that pops message box when somebody sends an email to an external email address outside of the business domain name. I have deployed the below on WINDOWS 7 MS OFFICE OUTLOOK 2007/2010 and it's
working successfully.
I have few users using MAC Outlook 2011 v.14.0.1 & 14.1.3. I need to deploy the same application for MAC users.
Here is the program...
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim objRecipient As Outlook.Recipient
Dim strExternalEmailAddress As String
Dim strInternalEmailAddress As String
Dim oRecip As Outlook.Recipient
Dim oEU As Outlook.ExchangeUser
Dim oEDL As Outlook.ExchangeDistributionList
Set objRecipients = Item.Recipients
strTemp = ""
For Each objRecipient In objRecipients
    Set oRecip = Application.Session.CreateRecipient(objRecipient.Address)
    If InStr(1, oRecip, "@") > 0 And InStr(1, oRecip, "company.org") = 0 Then
        strExternalEmailAddress = strExternalEmailAddress & objRecipient.AddressEntry & " - " & objRecipient.Address & "; "
        strExternalEmailAddress = strExternalEmailAddress & vbCrLf
    Else
        oRecip.Resolve
        If oRecip.Resolved Then
            Select Case oRecip.AddressEntry.AddressEntryUserType
                Case OlAddressEntryUserType.olExchangeUserAddressEntry
                    Set oEU = oRecip.AddressEntry.GetExchangeUser
                    If Not (oEU Is Nothing) Then
                    End If
                Case OlAddressEntryUserType.olExchangeDistributionListAddressEntry
                    Set oEDL = oRecip.AddressEntry.GetExchangeDistributionList
                    If Not (oEDL Is Nothing) Then
                    End If
                Case Else
                    If (objRecipient.Type = 1) And InStr(1, oRecip, "company.org") = 0 Then
                        strExternalEmailAddress = strExternalEmailAddress & objRecipient.AddressEntry & " - " & oRecip & "; "
                        strExternalEmailAddress = strExternalEmailAddress & vbCrLf
                    ElseIf (objRecipient.Type = 1) And InStr(1, oRecip, "company.org") <> 0 Then
                        strInternalEmailAddress = strInternalEmailAddress & objRecipient.AddressEntry & " - " & oRecip & "; "
                        strInternalEmailAddress = strInternalEmailAddress & vbCrLf
                    ElseIf (objRecipient.Type = 2) And InStr(1, oRecip, "company.org") = 0 Then
                        strExternalEmailAddress = strExternalEmailAddress & objRecipient.AddressEntry & " - " & oRecip & "; "
                        strExternalEmailAddress = strExternalEmailAddress & vbCrLf
                    ElseIf (objRecipient.Type = 2) And InStr(1, oRecip, "company.org") <> 0 Then
                        strInternalEmailAddress = strInternalEmailAddress & objRecipient.AddressEntry & " - " & oRecip & "; "
                        strInternalEmailAddress = strInternalEmailAddress & vbCrLf
                    End If
            End Select
        Else
            If InStr(1, oRecip, "@") > 0 And InStr(1, oRecip, "company.org") = 0 Then
                strExternalEmailAddress = strExternalEmailAddress & objRecipient.AddressEntry & " - " & objRecipient.Address & "; "
                strExternalEmailAddress = strExternalEmailAddress & vbCrLf
            ElseIf InStr(1, oRecip, "@") > 0 And InStr(1, oRecip, "company.org") <> 0 Then
                strInternalEmailAddress = strInternalEmailAddress & objRecipient.AddressEntry & " - " & objRecipient.Address & "; "
                strInternalEmailAddress = strInternalEmailAddress & vbCrLf
            End If
        End If
    End If
Next
If Len(strExternalEmailAddress) > 0 Then
    If MsgBox("You are about to send this email message to one or more individuals outside of COMPANY. Before you send the message," & _
    " please review the list below and confirm that you have addressed the message to the intended recipients." & vbCrLf & strExternalEmailAddress & vbCrLf & _     "Please click 'Yes' to send the message or 'No' to make changes to the recipients.", vbYesNo + vbDefaultButton2) = vbNo Then
        Cancel = True
    End If
End If
End Sub

Similar Messages

Need help converting from 4.0 to 2011

hello,
Need help converting files from 4.0 to 2011.
thank you
Solved!
Go to Solution.
Attachments:
noise source.vi ‏73 KB
8673D.vi ‏30 KB
8970 FREQ.vi ‏26 KB

attached as 8.2, which you can open
missing some subVIs - not sure if you already have them
Attachments:
8673D.vi ‏13 KB
8970 FREQ.vi ‏11 KB
noise source.vi ‏24 KB

Need help converting a PDF to excel

Need help converting a PDF to excel, the icon to convert dissappeared suggestions?

Open the file in Acrobat, use File --> Save As... --> Microsoft Word.
Mylenium

Hi, Need help. I am trying to download the latest iTunes for Windows application but on running the program it says that it can not be completed as it can not find the folder location of the file "iTunes.msi" . Any clues would be appreciated

Hi, Need help. I am trying to download the latest iTunes for Windows application but on running the program it says that it can not be completed as it can not find the folder location of the file "iTunes.msi" . Any clues would be appreciated

(1) Download the Windows Installer CleanUp utility installer file (msicuu2.exe) from the following Major Geeks page (use one of the links under the "DOWNLOAD LOCATIONS" thingy on the Major Geeks page):
http://majorgeeks.com/download.php?det=4459
(2) Doubleclick the msicuu2.exe file and follow the prompts to install the Windows Installer CleanUp utility. (If you're on a Windows Vista or Windows 7 system and you get a Code 800A0046 error message when doubleclicking the msicuu2.exe file, try instead right-clicking on the msicuu2.exe file and selecting "Run as administrator".)
(3) In your Start menu click All Programs and then click Windows Install Clean Up. The Windows Installer CleanUp utility window appears, listing software that is currently installed on your computer.
(4) In the list of programs that appears in CleanUp, select any iTunes entries and click "Remove", as per the following screenshot:
(5) Quit out of CleanUp, restart the PC and try another iTunes install. Does it go through properly this time?

I am a beginner at Final Cut Pro. Need help converting MPEG-2 to use.

I am a beginner at Final Cut Pro. I have mpeg-2 video footage that I am trying to import the footage into Final cut, but can't. I understand I need to convert the file format. I am unfamiliar with how to go about the converding file formats and the codec what is the best way to go about converting the file format so I can edit it on Final cut pro?

Where did the files originate? (How were they created?)
Some formats can be brought in with the help of plug-ins.
MPEG Streamclip can usually convert them to Quick Time.
Russ

I need help converting a PDF to a word file. I purchased Acrobat for this purpose?

I need help using this download. I purchased Acrobat because I need to convert a PDF file to a word file. Can you give me instruction on how to do this.
Thank you,

Open the file in Acrobat, use File --> Save As... --> Microsoft Word.
Mylenium

Need help converting quicktime movies into Flash files

I need to convert a QT, PhotoJPEG compressed, movie file into a .flv format. I have AE 6.5 Standard and it keeps quitting on exporting a SWV file which would could probably get me by with my client. But, again, it errors out saying something like a JPG is busy, or a file is busy.
I have FlipforMac,a purchased version. But I'm not sure if converting it into a .wmv and then a Flash file is the best route or is even possible.
Any suggestions or ideas of software that I could purchase??
~reicko

i don't think you have read up on the use of flash video
(FLV). there's nothing you need that you do
not already have (except maybe quicktime pro or some other
video editing program). the FLV exporter
comes FREE with flash 8. You should be able to open your
quicktime movie in QT PRO and export to FLV
format - then use any of the flash playback components for
FLV files - best bet is to read the help
docs on this subject and go to the devnet section of
adobe.com where there are several in-depth
articles about implementing flash video into your site.
--> **Adobe Certified Expert**
--> www.mudbubble.com
--> www.keyframer.com
rhian wrote:
> Hi,
> Thanks for your reply. I am using Flash 8. I've been
looking into streaming
> and it's very expensive with quicktime movies, however
I've found a company
> that will stream flash movies much more cheaply which is
why I want to convert
> it to a flash movie.
>
> Sorry are you say that Quicktime Pro allows you convert
files into flash
> formats?
> Rhian
>

Need Help Converting Video

Hello - I have a couple of separate questions that I need help with. I know basic FCP. I have FCP7. I recently shot a wedding with 2 different cameras. Both are HiDef Cameras. 1 Camera is a Prosumer Camera where the files were taking off the camera and imported by Final Cut. The second is a new, home camcorder which saved the files into a hard drive in MPEG 4 format.
I need to marry the two. I can import the all the files (from both cameras) directly into the timeline. But the ones from the camcorder (the mpeg4s) seem to have that "hitchy" feel to them when I play them back. Also, both types of files (even the ones that were directly imported into Final Cut from the Prosumer Camera) have the "render" lines when they are in the timeline, so I constantly have to render which takes forever.
The files that were imported directly into FCP from the ProSumer camera were imported on a different computer with a different version of FCP, so when I drag them into my timeline it tells me that they were from a different version and asks me if I want to update for my version. If I click YES then it stretches the files from 16:9 to 4:3. If I say NO then it keeps the 16:9 aspect ratio, but adds yet another layer of render I need to do.
Normally I do simple, Standard Def edits where I import things into the timeline via FCP7 with firewire from a deck and edit directly from there, then firewire back to the deck. Simple - no rendering, etc. My questions are as follows:
1 - Do I need to reset my timeline settings because I am now working with HiDef? Or does FCP automatically know that it is HD and it doesnt matter how I drag it into the timeline?
2 - Do I need to convert the MPEG 4 files to quicktime format, or does it not make a difference
3 - When I export, what settings would I use to keep it in HiDef. I am only going to make DVDs with it.
4 - Is there a way to do it so that I do not have to render constantly while editing
5 - To view, I am firewiring out to a deck which is then going into a Standard Def monitor. Is that the reason the footage appears "hitchy"?
Any help is greatly appreciated. If you have any help, please drop me a note at [email protected]
Thanks

YOu need to learn how to use FCP. Sorry, no offense needed, and I know it sounds harsh. But from reading that I can tell you have no idea about how to properly import tapeless media into FCP...and don't know what formats FCP works with...nor know what formats the cameras record. This is all basic stuff you need to know before you edit. Editing isn't only creative, but lately highly technical as well...you need to know what your software is capable of doing, and how to get the footage into it properly.
You cannot do what you did...directly drag from the cameras into FCP. No...it needs to be imported, typically with LOG AND TRANSFER...and converted from the shooting format, which typically isn't natively editable in FCP (want native, use Adobe Premiere...). It needs to be converted to ProRes. And yes, the file sizes of ProRes are a LOT bigger than the camera originals. 4-5 times larger. That's how FCP works.
Here's a quick tutorial to get you started. But then I suggest getting to know the editing system better.
http://library.creativecow.net/ross_shane/tapeless-workflow_fcp-7/1

Need Help Converting AVI Home Movies to Mpeg without audio and Video Delay.

I have lots of home movies of my new baby i want to take with me while in Navy training and need help. I have tried 7 movie conversion software programs and it have cost me a lot, but none of them work. Any suggestions please? I leave soon and would like to know as soon as possible please. Thank you so much
Converting AVI to MPEG on Windows XP OS

YOu need to learn how to use FCP. Sorry, no offense needed, and I know it sounds harsh. But from reading that I can tell you have no idea about how to properly import tapeless media into FCP...and don't know what formats FCP works with...nor know what formats the cameras record. This is all basic stuff you need to know before you edit. Editing isn't only creative, but lately highly technical as well...you need to know what your software is capable of doing, and how to get the footage into it properly.
You cannot do what you did...directly drag from the cameras into FCP. No...it needs to be imported, typically with LOG AND TRANSFER...and converted from the shooting format, which typically isn't natively editable in FCP (want native, use Adobe Premiere...). It needs to be converted to ProRes. And yes, the file sizes of ProRes are a LOT bigger than the camera originals. 4-5 times larger. That's how FCP works.
Here's a quick tutorial to get you started. But then I suggest getting to know the editing system better.
http://library.creativecow.net/ross_shane/tapeless-workflow_fcp-7/1

Need help converting photo jpg to a video file.

So I have a 6 minute animation that was sent to me as a series of photo-jpgs. I need to convert them to a video file rather than a huge sequence of stills so I can add some transitions. The images are 1920 by 1080. I don't want to compress them at all until the final render. What sequence settings should I use and how should I export? I know there a billion and two different ways to do this but for some reason I keep screwing it up.
Jon

As long as the images are sequentially numbered, 001, 002 etc,
1. open up QT Pro and import as a still image sequence and save is as an animation codec.
2. create a sequence using the animation codec as the basis, import all the images and drop them into the timeline.
Recognize that the animation codec requires a huge bit of horsepower and disk throughput to edit in real time.
x

Need help converting a varchar to a date

The following select displays a horizontal column vertically. I need to convert the varchar horizontal column to a date column.
SELECT raso.SRC_SUPL_CD,
case numbers.n
when 1 then
case instr(raso.DT_TM_PHASE_DT,':',1,1)
when 0 then raso.DT_TM_PHASE_DT
else substr(raso.DT_TM_PHASE_DT,1,instr(raso.DT_TM_PHASE_DT,':',1,1)-1)
end
else substr
(raso.DT_TM_PHASE_DT
,1 + instr(raso.DT_TM_PHASE_DT,':',1,numbers.n-1)
,case instr(raso.DT_TM_PHASE_DT,':',1,numbers.n)
when 0 then length(raso.DT_TM_PHASE_DT)
- instr(raso.DT_TM_PHASE_DT,':',1,numbers.n-1) +1
else instr(raso.DT_TM_PHASE_DT,':',1,numbers.n)
- instr(raso.DT_TM_PHASE_DT,':',1,numbers.n-1) - 1
end
end PHASE_DT
from RSSP_API_SELECT_OVERRIDE raso
, (select level n from dual connect by level <= 38) numbers
where length (raso.DT_TM_PHASE_DT) - length (replace(raso.DT_TM_PHASE_DT,':')) + 1
>= numbers.n

An example wouldn't hurt.
As it is now, my reply would be:
SQL> create table rssp_api_select_override
2 as
3 select 1 src_supl_cd, '01:12:2006:14:55:00' dt_tm_phase_dt from dual
4 /
Tabel is aangemaakt.
SQL> SELECT raso.SRC_SUPL_CD
2       , case numbers.n
3         when 1 then
4           case instr(raso.DT_TM_PHASE_DT,':',1,1)
5           when 0 then raso.DT_TM_PHASE_DT
6           else substr(raso.DT_TM_PHASE_DT,1,instr(raso.DT_TM_PHASE_DT,':',1,1)-1)
7           end
8         else
9           substr
10           ( raso.DT_TM_PHASE_DT
11           , 1 + instr(raso.DT_TM_PHASE_DT,':',1,numbers.n-1)
12           , case instr(raso.DT_TM_PHASE_DT,':',1,numbers.n)
13             when 0 then length(raso.DT_TM_PHASE_DT)
14                         - instr(raso.DT_TM_PHASE_DT,':',1,numbers.n-1) +1
15             else instr(raso.DT_TM_PHASE_DT,':',1,numbers.n)
16                  - instr(raso.DT_TM_PHASE_DT,':',1,numbers.n-1) - 1
17             end
18           )
19         end PHASE_DT
20    from RSSP_API_SELECT_OVERRIDE raso
21       , (select level n from dual connect by level <= 38) numbers
22   where length (raso.DT_TM_PHASE_DT) - length (replace(raso.DT_TM_PHASE_DT,':')) + 1 >= numbers.n
23 /
                           SRC_SUPL_CD PHASE_DT
                                     1 01
                                     1 12
                                     1 2006
                                     1 14
                                     1 55
                                     1 00
6 rijen zijn geselecteerd.
SQL> select to_date(dt_tm_phase_dt,'dd:mm:yyyy:hh24:mi:ss') from rssp_api_select_override
2 /
TO_DATE(DT_TM_PHASE
01-12-2006 14:55:00
1 rij is geselecteerd.Regards,
Rob.

AS3 need help converting

Hello everyone,
i have a site im working on that uses as2 but i need to
change it to as3, any help would be much appreciated.
Thanks

Hi again, so I'm still having a few issues, your help is much
appreciated. The snippet you gave me for the movieclip buttons
works great but there is no hand when you rollover the button ( i
can probably figure that out ). Pretty much the swf is a navbar for
an html site, when one of the movieclip buttons is pressed i need
it to go to say "work.html" but I also need it to tell the SWF to
go to a certain frame label for the down state of the button. Here
is my website under construction
www.lafrancemedia.com . and
here is the code up to date:

Need help converting Client-Server to JSP

Hi;
I have a purely data driven, dynamic, meta driven program
in Java 1.4. Runs on almost any SQL database, and the
systems analysts can do most of the programming just by
entering the data. All screens and sql are auto-genned
at runtime.
I was wondering if there was anyone interested in helping
convert to JSP. I would be willing to give part of the
company profits. It is better then me asking a million
questions here, although there are lots of great experts here.
-Trent
Thanks.

My personal email address is [email protected] I would love to contact you if you drop me your phone number.
Manohar

Outlook 2007 .ost file corrupt / scanpst.exe 3-4x daily & 3 to 4 runs before "clean", long term issue - need help on how to repair my .OST FILE once and for all, please...

I've had many issues with my .ost data file (couple years) with: very slow going into outlook 2007, scanpst.exe 3-4x before its "clean", and have to run it few times daily.
No major issues i can pinpoint, but just SLOW, hangs at times, file less than 1GB, IT people just mess it up more, etc.
NEED some PROFESSIONAL minds to help me get this data file cleaned up once and for all... forever hopefully.
Any help greatly appreciated.

Why the need to repair it?
You could:
1. Create a new Outook profile a different name and a new ost will be created ( leaving the old one there)
2. Close up Outlook completely, delete the existing.ost and re-open Outlook to create a new one.
3. Close Outlook completely and rename the existing .ost and re-open Outlook to create a new one.

Help with "The end of file was reached" error message in Outlook 2011

Hello, I am having an issue with Outlook 2011 that after 24 hours or so I am getting a “The end of file was reached” error message code -17895.
Right after this error I get a disconnected from Exchange server and even after re opening the client it stays like this for about 5 minutes then restores. Has anyone else seen this error? I am able to reproduce this on multiple machines with multiple Exchange
2010 mailbox accounts.

Same situation here:
Outlook 2011 for Mac using Office 365, 3 users have reported the End of File Reached error when trying to send email.
I have logged a ticket with Microsoft support and they have followed up with the following directions.
1.
Repair Disc Permissions On A Mac
o
1
Log in to your computer with the administrative account. Open the hard drive, go into the "Applications" folder and then open the "Utilities" folder. Now launch the Disc Utility application.
o
2
Select your main hard drive. You'll probably see two options--one is the manufacturer's name of the disc and the other name is what you've called it. Choose the name of your hard drive.
o
3
Click on "Verify Disc Permissions" and the computer will perform a diagnostic test. After a few minutes, the problems with disk permissions will be reported in the Disc Utility window.
Click on "Repair Disc Permissions" to fix them.
o
4
Insert your Mac OS X installation disk and restart your computer. Hold down the "C" key on your keyboard to boot from the disk rather than your computer's hard drive. Cancel the OS
installation and open Disc Utility.
o
5
Click on "Verify" to have Disc Utility check your computer's hardware. Notice that this option is only available when the program is run from the CD. You can only test the hardware
of a computer that isn't running the program locally.
o
6
Use Disc Utility to try and repair any hardware errors that it detects. Usually fixing the permissions will be enough to maintain your computer. If you still experience frequent lockups
and crashes, then you should try repairing it with this method.
Tips & Warnings
If you use your computer for high-performance work, such as software compiling or video editing, then you may want to check the permissions weekly. Most computer users will only need
to fix permissions after noticing problems with applications or the operating system.
If the computer's performance does not improve after repairing permissions, then you'll have to troubleshoot for other issues. You may want to purchase more RAM for your computer to
help speed it up.
Permissions repairs will not correct problems caused by applications that did not use Apple's installer. Try deleting all files associated with the application and then reinstalling
it.
Avoid repairing the permissions after you've booted the computer from the OS X CD. It won't cause problems to your drive, but the version of "Disc Utility" on the CD may not be updated
to address permission changes that are required by certain software updates.
Secondly, the information for repairing an Outlook 2011 database is as follows:
http://support.microsoft.com/kb/2360509

Need Help Converting a VBA Macro to AppleScript 2.1.2 for Outlook 2011

Similar Messages

Maybe you are looking for