[fpc-pascal] If ShellExecute(0, 'open', PChar(ExecuteName), '', '', 0) <= 32 Then

[vmars]

I tried many combinations of   "%COMSPEC% /c Del2Pas.bat"
            ExecuteName := ('C:\\WINDOWS\\system32\\cmd.exe ' + AppPathExe 
+ 'Del2Pas.bat');
            ExecuteName := ('"%COMSPEC%/c Del2Pas.bat"');
            and many more!
but still:

Unable to open file: "%COMSPEC%/c Del2Pas.bat" ErrorCode=0

Help...

ô¿ô
 V  e  r  n

WinXp sp2 ,  Delphi5, WebDwarf, Trellian WebPage, 
Lazarus-0.9.26-fpc-2.2.2-win32.exe,
wxPython2.8-win32-unicode-2.8.9.1-py26.exe , Boa 0.6.1
http://www.flickr.com/photos/vmars956/

Wanted: Dwarf Hibiscus (Orange/Rasberry)
----- Original Message ----- 
From: ""Vinzent Höfler"" <JeLlyFish.software at gmx.net>
To: "FPC-Pascal users discussions" <fpc-pascal at lists.freepascal.org>
Sent: Monday, January 26, 2009 11:53 PM
Subject: Re: [fpc-pascal] If ShellExecute(0, 'open', PChar(ExecuteName), 
'','', 0) <= 32 Then


>
> -------- Original-Nachricht --------
>> Datum: Mon, 26 Jan 2009 17:42:23 -0600
>> Von: "vmars" <vmars at rgv.rr.com>
>> An: fpc-pascal at lists.freepascal.org
>> Betreff: [fpc-pascal] If ShellExecute(0, \'open\', PChar(ExecuteName), 
>> \'\', \'\', 0)  <= 32 Then
>
>> Thanks in advance!
>>
>> [Any ideas why this works:
>>   ExecuteName := (AppPathExe + 'Del2Pas.bat.lnk');
>>   ExecuteShell;   ]
>>
>>
>> [But this doesn't work:
>>   ExecuteName := (AppPathExe + 'Del2Pas.bat');
>>   ExecuteShell;
>> And doesn't give an error msg.]
>
> Just trying an educated guess here, but I suppose .bat-files can only be 
> executed via command.com (cmd.exe). Something like "%COMSPEC% /c 
> Del2Pas.bat" could do the trick.
>
>
> Vinzent.
>
> -- 
> Psssst! Schon vom neuen GMX MultiMessenger gehört? Der kann`s mit allen: 
> http://www.gmx.net/de/go/multimessenger
> _______________________________________________
> fpc-pascal maillist  -  fpc-pascal at lists.freepascal.org
> http://lists.freepascal.org/mailman/listinfo/fpc-pascal
>