LT>Is there a way to automatically delete a mail pkt after a
LT>successful ul? If so, how?
This will do it:
It's designed for the .QWK door in Wildcat BBS's.
Just change the "waitfor" text and the name of the .rep packet.

DECLARE FUNCTION SENDMAIL
CALL SENDMAIL
timeout 60
FUNCTION SENDMAIL
 WAITFOR "QWK/REP menu command"
  if exists(ConfigUploadPath+"\wildcbbs.rep") then
   send "U"
 waitfor "now"
  if upload(ConfigUploadPath+"\wildcbbs.rep", Zmodem) = 0 then
   del ConfigUploadPath+"\wildcbbs.rep"
  end if
 waitfor "QWK/REP menu command"
 end if
END FUNCTION
john.bennett@mhmr.tx.state.us
---
* CMPQwk #1.42* UNREGISTERED EVALUATION COPY
--- QScan/WC v1.18b / 01-0564
---------------