Subject: | |
From: | |
Reply To: | |
Date: | Mon, 2 Dec 2002 02:46:55 -0600 |
Content-Type: | text/plain |
Parts/Attachments: |
|
|
Try this as an MPE command file....
ECHO ![CHR(%33)]H![CHR(%33)]J
setvar reflect, chr(27)+"&oB"
echo
echo FILE TRANSFER FOR REFLECTIONS
echo
echo ************************************************************
echo * THIS PROCESS WILL TRANSFER A FILE FROM THE HP TO YOUR PC *
echo ************************************************************
echo
setvar pc_filespec, ""
setvar hp_filename, ""
COMMENT
COMMENT Input filenames
COMMENT
echo Please Enter The PC/Network Path And Filename ie. C:\TEMP\FILE.TXT
echo
INPUT PC_FILESPEC, &
" >> "
if pc_filespec=""
return
endif
echo
echo Please Enter The Full HP File Name To Transfer. ie. TEST.PUB.SGA
echo
INPUT HP_FILENAME, &
" >> "
if hp_filename=""
return
endif
ECHO &
!REFLECT RECEIVE !PC_FILESPEC FROM !HP_FILENAME ASCII
INPUT MPE_COMMAND, ":"
RUN PCLINK3.PUB.SYS
input pass_or_fail
if pass_or_fail = "S"
echo
echo Your File Transfer Has Been Successful
echo
INPUT PAUSE, "<Press Return To Continue>"
else
echo
echo Your File Transfer Has FAILED !! Make Sure You Have Entered The
echo Correct PC/Network Path And The Full HP Filename. Reflections
echo Transfer Will Not Overwrite files. Make Sure The File Does
echo Not Already Exist On Your PC/Network Path.
echo
INPUT PAUSE, "<Press Return To Continue>"
endif
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|
|
|