Re: Question about running macros...

[Steve Richter <stephenrichter@xxxxxxxxx>]

here are two links:
http://social.technet.microsoft.com/Forums/en-US/ITCG/thread/bd96d326-59f2-42b0-b04d-4ed65c4ce692/

http://www.msghelp.net/showthread.php?tid=88579

The 2nd one says you should replace with GetOpenFileName
http://msdn.microsoft.com/en-us/library/ms646927(VS.85).aspx

Not sure how you use that from VB.  If you get it to work please post how
you did it.


-Steve



On Fri, Jul 15, 2011 at 11:52 AM, Mira, Antonio <antonio.mira@xxxxxxxxxxx>wrote:

> Hello,
>
> I have a macro that I created for an end user to do some repetitive tasks
> on a green-screen iSeries session.  The macro is written in VB script and it
> runs fine under Windows XP.  Recently, the user upgraded to Win 7 and when
> she tries to run the macro, she gets the following error:
>
> Error in the script on line 190: AcitveX component can't create object:
> 'UserAccounts.CommonDialog'.
>
> What the macro is attempting to do at that point is this command:
>
> Set ObjFSO1 = CreateObject("UserAccounts.CommonDialog")
>
> Which is needed to open an "Open File" dialog so the user can open a csv
> file for the macro to process it.
>
> Has anybody run into this situation? And if so, what did you do resolve it?
>  As always, thanks for the help.  I have researched on the internet for this
> type of error and tried the solutions offered but had not had any luck.
>
>
>
> Thank you,
>
> Antonio Mira
> Application Developer
>
>
>
> ________________________________
> This E-mail and any of its attachments may contain Time Warner Cable
> proprietary information, which is privileged, confidential, or subject to
> copyright belonging to Time Warner Cable. This E-mail is intended solely for
> the use of the individual or entity to which it is addressed. If you are not
> the intended recipient of this E-mail, you are hereby notified that any
> dissemination, distribution, copying, or action taken in relation to the
> contents of and attachments to this E-mail is strictly prohibited and may be
> unlawful. If you have received this E-mail in error, please notify the
> sender immediately and permanently delete the original and any copy of this
> E-mail and any printout.
> --
> This is the .net use with the System i (SystemiDotNet) mailing list
> To post a message email: SystemiDotNet@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/systemidotnet
> or email: SystemiDotNet-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/systemidotnet.