castor2003
Programmer
Why isnt Shellexecute creating ports.txt? I have run out of ideas. Could a kind heart assist. I am trying to go around the IPI* APIs.
Code:
=shellrun([NETSTAT -a -n],[],[open],[ >C:\ports.txt],1)
FUNCTION shellrun
PARAMETERS cfile as string,cdir as string,caction as string,cparams as String ,nWinMode as integer
LOCAL success as Integer
DECLARE INTEGER ShellExecute IN shell32.dll ;
INTEGER hndWin, ;
STRING cAction, ;
STRING cFile, ;
STRING cParams, ;
STRING cDir, ;
INTEGER nWinMode
cAction = ALLTRIM(cAction)
cFile = ALLTRIM(cfile)
cDir = ALLTRIM(cDir)
success =ShellExecute(0,cAction,cFile,cParams,cDir,nWinMode)
CLEAR DLLS shellexecute
RETURN success