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

Monks;

I am trying to start the Bentley Micrstation application on a PC where I have installed Perl 5.6 using Win32::OLE.

Currently I have:

$Bentley = Win32::OLE->new("MicroStationDGN.Application", 'Quit') || die "Could not start MicroStation DGN Application: ", Win3 +2::OLE->LastError(); Win32::OLE->WithEvents($Bentley, \&Event, "UserWorkspaceName"); Win32::OLE->WithEvents($Bentley, \&Event); $Bentley->{visible} = 1; Win32::OLE->MessageLoop();
And I get back an error about Invalid class string.

I am not really sure what I am doing and I am definatley in new territory on both fronts with the Microstation stuff as well as the Win32:OLE stuff so any help would be of great benifit to me.

The main reason I am doing this is that I am a Tester and the tools we have can not even invoke the Micrstation tool at all while what I have done in Perl has done things the tools we have can't and so they are looking to see what I can do.

Thanks for the help, Mike

Replies are listed 'Best First'.
Re: Win32::OLE with MicroStation
by Anonymous Monk on Aug 21, 2007 at 06:51 UTC
Re: Win32::OLE with MicroStation
by Anonymous Monk on Aug 21, 2007 at 17:45 UTC
    Thanks for the point in a great direction.

    UPDATE to this problem.

    I Figured out how to start MicroStation and am now trying to use Win32::GUITest to push buttons or sendkeys to the MicroStation GUI but to no avail. Pretty sure that this is a MicroStation problem of not using traditional MS coding so back to the pit to find out what Bentley did and how to invoke thingies on their application in the MS space.

    Thanks, Mike