Posted by Grant Foraker on May 18, 2011 at 05:39:24:
In Reply to: CopyFile error posted by Grant Foraker on May 17, 2011 at 09:00:32:
Found my problem. CopyFile doesn't need double quoting for paths with embedded blanks. LAUNCH does. Moved my double quoting logic to line before LAUNCH.
Print (CopyFile = PDFDOC$, CAWDOC$, FLAGS)
GOSUB GetResult
IF FuncError NE 1
LET MBMSG$ = 'Copy Error:' + STR(FuncError) + '/' + STR(FileError)
MSGBOX(MBMSG$)
GOTO LTD90
ENDIF
LET CAWDOC$ = '"' + STRIP(CAWDOC$) + '"'
PRINT (LAUNCH = CAWDOC$)
GOSUB GetResult
IF FuncError LE 32
LET MBMSG$ = 'Launch Error (Remote):' + STR(FuncError) + '/' + STR(FileError)
MSGBOX(MBMSG$)
ENDIF
GOTO LTD90
LTD20:
LET PDFDOC$ = '"' + STRIP(PDFDOC$) + '"'
PRINT (LAUNCH = PDFDOC$)
Each file can be a maximum of 1MB in length Uploaded files will be purged from the server on a regular basis.