Dear all,

I am trying to import a function in dll using win32::API as follows


use Win32::API::Prototype;

if (-e 'C:\win32app\ingr\NTBatch\bin\batchapi.dll') {

  ApiLink( 'C:\win32app\ingr\NTBatch\bin\batchapi.dll', 'DWORD
BatchStopQueue(LPCTSTR queuename)' );
  
  my @Chars = ('A'..'Z', '0'..'9');
  my $RandString = 'PDreport';
#  my $RandString = join('', map{ $Chars[ rand( $#Chars ) ] } (1..20) );

  # Temporarily change the title of this console window
  # to something unique
  BatchStopQueue( $RandString ) || die "Unable to set console title to
'$RandString'.\n";

}




When I run this program , Program error message box is displayed saying

"Perl.exe has generated errors and will be closed by windows. You will need
to restart
the program"

When I run this program in debug mode , message

"Signal SEGV:" 

is displayed at the end !!

Can somebody guide me about this !


Thanks in advance !!

Vidyadhar
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to