AH>That is the one thing I don't understand Larry. We have two applications
AH>which in are separately configurable..What I have been trying to do is
AH>separate misc. compressed downloads from my offline packets..It just
AH>seems like a less confusing way to handle it..I really cannot understand
AH>why two non-seamless applications should have directory options which
AH>be separate, independent functions and they aren't..:) I guess that is
AH>really my frustration as I have lived with the status quo for some time.
AH>I just got a notion to try and change that, so far no luck...I have
AH>improved one function in that I now upload *.rep from \qmpro\upload.
AH>Now I'm trying my best to et zips to to one directory and QWK to go
AH>to another..Me thinks I joust with windmills..
Allen, if this help you, let me know.
This Script writen for a PC Board BBS. You'll need to EDIT, it to
for the BBS you're calling...
__________________________________________________________________________
;This is Script Qmodem Pro for DOS v.1.5x
; ";" = REM,
;* When = Every time the Script sees the data in the first set of quoits,
; it sends the data in the last set.
;***** BEFORE USE THE SCRIPT, DO THE FOLLOWING: ***********
; * Put your name or alias into the USERID box.
; * Put your password into the PASSWORD box.
; * Put the "name of packet from the BBS" into the PACKET box.
TimeOut 240 ; Set Waitfor for 240 sec. or 4 min.
When "What is your first name?" "$USERID^M"
When "Password (Dots will echo)?" "$PASSWORD^M"
When "Press (Enter) to continue?" "^M"
When "(H)elp, More?" "N^M"
Waitfor "Message Base Since `Last Read' (Enter)=yes?"
Delay 100
Send "N^M"
IF $SENDMAIL UPLOADMAIL ; Qmodem checks for reply mail, if so, Uploads
UPFINISHED: ; it. The ONLY when there mail to upload, these
; two lines will do anything
_______________________
WAITFOR "Aborts Transfer"
Delay 100
DOWNLOAD Z C:\MAIL\$PACKET.QWK ; This line will send your mail to "C:\MAIL"
; -- You can change it to any DIR
_______________________
**** Put from "UPLOADMAIL:" down at the end of your Script.
_______________________
UPLOADMAIL: ; If you don't have reply mail to Uploads,
Waitfor "Main Board Command?" ; the script will not carry out anything
Delay 100 ; below "UPLOADMAIL:".
Send "QWK U^M"
WAITFOR "Aborts Transfer"
UPLOAD Z $REPPATH$PACKET.REP ; Uploads the packet in Qmodem's "PACKET" box.
IF $SUCCESS UPSUCCESS ; Line checks to see if upload was OK.
GOTO UPLOADMAIL ; Line uploads packet again if it was a bad upload.
UPSUCCESS:
TimeOut 240 EXITSYSTEM
DELETEF $REPPATH$PACKET.REP ; Line Deletes reply mail after a successful
GOTO UPFINISHED ; Upload. And return to "UPFINISHED:" and
; finsh the rest of the Script.
__________________________________________________________________________
I hope this will help you.
Later...
Fred
* SLMR 2.1 * Whoever thought up Non-Alcohol beer was way too drunk!
--- PCBoard (R) v15.22/M 2
---------------
* Origin: The French Quarter 504-891-1388 Fido:1:396/44 (1:396/44)
|