Accessing Visio in perl

Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:

Replies are listed 'Best First'.
Re: Accessing Visio in perl by marto (Cardinal) on Apr 19, 2011 at 09:30 UTC
If you're going to use Win32::OLE to try and automate things it's often helpful to use the macro recorder to show you what's going on. For example, the VBA code generated by the macro recorder when saving as a png file: `Application.ActiveWindow.Page.Export "c:\test.png"` [download] I'll leave the conversion to perl as an exercise, How do I convert a VBA macro to Perl? should be helpful.	[reply] [d/l]
Re^2: Accessing Visio in perl by Anonymous Monk on Apr 19, 2011 at 13:34 UTC
Thanks a lot for your reply.. The working code is: `$Visio->ActiveDocument->Pages(1)->Export($path."Drawing.jpg");` [download] ---- Thanks again for exposing me to a generalized solution.	[reply] [d/l]
Re: Accessing Visio in perl by Corion (Patriarch) on Apr 19, 2011 at 09:18 UTC
Just giving a file a `.png` extension does not make Visio export in PNG format. Have you investigated whether Microsoft Visio can save in PNG format?	[reply] [d/l]
Re^2: Accessing Visio in perl by Anonymous Monk on Apr 19, 2011 at 13:20 UTC
Yes...I have done it using C#..	[reply]