Posted by Grant E Foraker on April 06, 2022 at 11:12:30:
In Reply to: COSWGLOB.INI posted by Grant E Foraker on April 06, 2022 at 07:04:25:
Trying to run this BAT from a program
copy \\psr_com2\d$\Comet\coswglob.ini "C:\Users\%username%\AppData\Local\Signature Systems\Temp\coswglob.ini"
rem copy \\psr_com2\d$\Comet\coswglob.ini "%TEMP%\coswglob.ini"
rem copy D:\Comet\coswglob.ini "C:\Users\%username%\AppData\Local\Temp\2\coswglob.ini"
pause
Running the BAT manually gets a successful copy of coswglob.ini
----------------------------------------------------------------
D$ is to hide Comet folders from users:)
Tried CopyFile but gives a bad Destination/Path error.
Now trying ShellExecute (1st time). Don't see a DOS window and it doesn't stop at the PAUSE. And, no file copy.
CopyCOSWGLOBINI:
OPEN (20) 'X00'
PRINT (20) (ShellExecute="open","test2.bat","\\PSR@5F@COM2\D$\COMET","",1)
CLOSE (20)
!!!!! LET FROMFILE$ = '\\psr@5F@com2\d$\Comet\coswglob.ini'
!!!!!!!! LET TOFILE$ = '"C:\Users\%username%\AppData\Local\Signature Systems\Temp\coswglob.ini"'
!!!!! LET TOFILE$ = '"C:\Users\gforaker\AppData\Local\Signature Systems\Temp\coswglob.ini"'
!!!!!
!!!!! LET FLAGS = 0 + 2048 + 4096 ! LOCAL, OVERWRITE, CREATE DIRECTORY
!!!!!Print (CopyFile = FROMFILE$, TOFILE$, FLAGS)
!!!!!GOSUB GetResult
!!!!! IF FuncError NE 1
!!!!! LET MBMSG$ = 'Copy Error:' + STR(FuncError) + '/' + STR(FileError)
!!!!! LET MBMSG$ = MBMSG$ + '@0D0A@From: ' + STRIP(FROMFILE$)
!!!!! LET MBMSG$ = MBMSG$ + '@0D0A@To: ' + STRIP(TOFILE$)
!!!!! MSGBOX(MBMSG$)
!!!!! RETURN
!!!!! ENDIF
!!!!! RETURN
Each file can be a maximum of 1MB in length Uploaded files will be purged from the server on a regular basis.