in reply to Re^6: How to write a client for accessing COM server
in thread How to write a client for accessing COM server

Can you show the VB code?
  • Comment on Re^7: How to write a client for accessing COM server

Replies are listed 'Best First'.
Re^8: How to write a client for accessing COM server
by Anonymous Monk on Jun 16, 2011 at 09:27 UTC
    Sub Main()
    Dim objTestATL As TF_ExLib.Test_Ex
    objTestATL = New TF_ExLib.Test_Ex
    Dim num As Long
    objTestATL.TestObj(20, num)
    End Sub
[reply]
      use Win32::OLE;
      use warnings;
      package main;
      sub test()
      {
      my $TM = Win32::OLE->new('TestServ_Perl.PerlServ.1')|| die;
      print $TM;
      print "\n";
      if( Win32::OLE->LastError() )
      { print "Error creating the .NET COM Server: ". Win32::OLE->LastError();
      }
      $test = 0;
      $test = $TM ->TestObj(34);
      print "The value returned from server is ------";
      print $test;
      } test();
      Im able to access the COM server using perl script
      Thanks for all your help
[reply]

In Section Seekers of Perl Wisdom