> Hi, Jan suggested I post this here. Maybe the first question is
> why I would need the 'Scripting.FileSystemObject' in Perl, but
> I have my reasons. I was actually testing the Win32 intellisense
> in Visual Perl, but found I could write a realistic app.
>
> Currently the intellisense works on things like
>
> my $fso = Win32::OLE->new('Scripting.FileSystemObject');
> my $path = 'c:\WINNT\System32';
> my $folder = $fso->GetFolder($path);
> my $len = $folder->SubFolders->{Count};
> my $subfolder = $folder->SubFolders->Item(0);
>
> But $subfolder is empty, although the Visual Perl editor
> at least "knows" that it's of type IFolder in the
> Scripting.FileSystemObject, which means you get good
> intellisense off it.
This isn't an answer, but perhaps a clue. When I run the code and insert
the following line at the end:
print Win32::OLE::LastError . "\n";
I get:
Win32::OLE(0.1502) error 0x80070057: "The parameter is incorrect"
in METHOD/PROPERTYGET "Item"
This seems to indicate that Perl is not giving the method call what it
wants. I haven't the slightest clue what the method might want, or what
Perl is actually giving, however. Perhaps Jan, with that in-depth knowledge
of Win32::OLE, will know.
jpt
_______________________________________________
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
