Hi,
Can anybody help me?
Problem is like this:
I have one com component namely ValidateLogin.In this component i have one interface
namely Login.
Under this Interface I have One method Validate,which takes two parameters and returns
the result .Now I want to create the instance of this component and want to pass the
parameters to Validate method and collect the result in the variable to use it
further.I am using WIN32::OLE but i am not able to successfully run the script.
I have written the script as follows:
#!/usr/local/bin/perl
print "Content-type: text/html\n\n";
BEGIN {
push(@INC,'E:/PerlInstall/site/lib/;E:/PerlInstall/lib/,F:/ATL/practise/debug') }
use Win32::OLE
$Object =
Win32::OLE->new('{0x0073C45B,0xE00A,0x4B1B,{0x9C,0xB6,0x97,0x33,0xDD,0x01,0x18,0xB6}}')
or die "Can not create Object\n";
$Result=$Object->Login->Invoke('Validate','Pankaj','Kapare');
print "$Result";
undef $Object;
So please check the script and tell what r mistakes ? what should be the parameter of
the above new method.?Should it be dll or lib file or ?
Please mail me the answer as early as possible?
Thanks in advance
Pankaj.
