Subject: | |
From: | |
Reply To: | Emerson, Tom |
Date: | Thu, 11 Sep 2003 15:08:52 -0700 |
Content-Type: | text/plain |
Parts/Attachments: |
|
|
> -----Original Message-----
> From: Larry Barnes [mailto:[log in to unmask]]
[...]
> Is there a command I can use to open and read a file on the
> 3000? I'm trying to write a macro to accomplish this and
> I've run out of ideas.
Ummm, perhaps the MPE command "PRINT"?
with r1
.processdatacomm = false ' keeps chars from falling through the calls...
.transmit "PRINT <whatever>" & vbCRLF
while not myeof
buffer = .readline(<timeout>,<options>,<recvdLF>)
if buffer = "MPE/iX:" then myeof = true
' if we got the MPE prompt, then the "print" command is done
if not (recvdLF) then myeof = true ' the third parm returns as FALSE
' if the function "times out" before a terminator was received;
' in this case, the system is either really busy, or more
' likely you've reached the end of the file
'[whatever other processing you want]
wend
.waitforhosttrigger
.processdatacomm = true 'switch it back
end with
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|
|
|