i made some tests:
now i have an VBs thats runs:
<script language="VBScript">
Dim objHello
Set objHello = CreateObject("Hello.KWO")
msgbox objHello.Hello
</script>
but my <object failed:
<object
classid="CLSID:E91B25C6-2B15-11D2-B466-0800365DA902"
width="150" height="75" id="Hello.KWO">
</object>
what did i made wrong ?
I have made a .dll out of these script:
package Hello;
print Hello();
sub Hello
{
print "soso";
return "hallo ";
}
exit;
=pod
=begin PerlCtrl
%TypeLib = (
PackageName => 'Hello',
# DO NOT edit the next 3 lines.
TypeLibGUID => '{E91B25C6-2B15-11D2-B466-0800365DA902}',
ControlGUID => '{E91B25C7-2B15-11D2-B466-0800365DA902}',
DispInterfaceIID=> '{E91B25C8-2B15-11D2-B466-0800365DA902}',
ControlName => 'HelloWorldControl',
ControlVer => 1,
ProgID => 'Hello.KWO',
DefaultMethod => 'Hello',
Methods => {
'Hello' => {
RetType => VT_BSTR,
TotalParams => 0,
NumOptionalParams => 0,
ParamList =>[ ]
},
}, # end of 'Methods'
Properties => {
}
, # end of 'Properties'
); # end of %TypeLib
=end PerlCtrl
=cut
Is there is any help out there ???
I just want to print somthing out my module in the browser within these
object tag !
I know it is not really perl-nt question... but it is so important for me
and i failed...
_______________________________________________
Perl-Win32-Web mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-web
