Re^2: Win32::API to import function

If I use the following line to import the function:

Win32::API->Import('Rscw32', 'USHORT RSCCHK(ULONG ulConnectionHandle,ULONG ulSessionHandle,SHORT *pnIoHandle,VOID *pvReplyBuffer,USHORT *puReplySize)');

I have a crash at this line (i.e. as soon as I use it):

$sReturn = RSCCHK($sConnectionHandle,
$sSessionHandle,
$sCheckAll,
$sReplyBuffer,
$sReplySize);

Note: To import the "RscIoCheck" function, I need to use his API function name "RSCCHK".

Comment on Re^2: Win32::API to import function

Replies are listed 'Best First'.
Re^3: Win32::API to import function by ptk (Initiate) on Mar 01, 2005 at 14:16 UTC
I have try the "Import" and the following: `my $sFuncRscIoCheck = new Win32::API('Rscw32', 'USHORT RSCCHK(ULONG ul +ConnectionHandle,ULONG ulSessionHandle,SHORT pnIoHandle,VOID pvRepl +yBuffer,USHORT *puReplySize)'); $sReturn = $sFuncRscIoCheck->Call($sConnectionHandle, $sSessionHandle, $sCheckAll, $sReplyBuffer, $sReplySize);` [download] They crash the perl interpreter with the Win error message: "Perl Command Line Interpreter has encountered a problem and needs to close. We are sorry for the inconvenience.". Any other idea?	[reply] [d/l]
Re^4: Win32::API to import function by Anonymous Monk on Mar 15, 2005 at 13:46 UTC
To make it work, write: `my $sReturn = $sFuncRscIoCheck->Call($sConnectionHandle, $sSessionHandle, $sCheckAll,<br> $sReplyBuffer, $sReplySize) & 0xFF; print "My Return is : $sReturn\n";` [download] The return value will be set to 17 as expected.	[reply] [d/l]


Just another Perl shrine
	PerlMonks