home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 17 / CD_ASCQ_17_101194.iso / vrac / hqfax13.zip / QLSEND.BAT < prev    next >
DOS Batch File  |  1993-11-03  |  2KB  |  64 lines

  1. Echo off
  2. REM *********************************************************************/
  3. REM                                                                     */
  4. REM   SYSTEM       : HQ-FAX, Uitilities                                 */
  5. REM   COPYRIGHT    : (c) 1993 HTF CONSULTING                            */
  6. REM                                                                     */
  7. REM *********************************************************************/
  8. REM                                                                     */
  9. REM   BAT file name: QLSEND.bat                                         */
  10. REM   DESCRIPTION  : This batch file invokes the DOS command line send  */
  11. REM                  for Quick Link II by Smith Micro                   */
  12. REM                  serving the folllowing FAX modems:                 */
  13. REM                  Practical Peripherals, GVC, Micro-Tek, Cardinal,   */
  14. REM                  Nouveau, Wang, PC Logic, Packard Bell, Grammy, Viva*/
  15. REM                                                                     */
  16. REM *********************************************************************/
  17. REM
  18. if %1 == 1 goto Covrsolo
  19. if %1 == 2 goto Docsolo
  20. if %1 == 3 goto CovrwDoc
  21. if %1 == 4 goto Docmany
  22. if %1 == 5 goto CDocmany
  23.  
  24. SNDFAX.bat /F:%1.QFX /FN:%2 %3 %4 %5
  25. goto quit
  26.  
  27. :Covrsolo
  28. Echo Sending Cover letter solo to %3
  29. SNDFAX.bat /F:Covrletr.QFX /FN:%3 %4 %5 %6
  30. goto quit
  31.  
  32. :Docsolo
  33. Echo Sending Document %2 w/out cover letter to %3
  34. SNDFAX.bat /F:%2.QFX /FN:%3 %4 %5 %6
  35. goto quit
  36.  
  37. :CovrwDoc
  38. Echo Sending Document "%2" with cover letter to %3
  39. Copy Covrletr.QFX %2.f00
  40. Erase Covrletr.QFX
  41. Copy %2.QFX %2.f01
  42. Erase %2.QFX
  43. goto Preplist
  44.  
  45. :Docmany
  46. Echo Sending multi-file document "%2" w/out cover letter to %3
  47. goto Preplist
  48.  
  49. :CDocmany
  50. Echo Sending multi-file document "%2" with cover letter  to %3
  51. Copy Covrletr.QFX %2.f00
  52. Erase Covrletr.QFX
  53.  
  54. :Preplist
  55. If exist %2.QFX Erase %2.QFX
  56. Buildlst.exe %2 .FILE=
  57. chdir C:\QL2fax
  58. Convert.exe %2.LST /X /H
  59. SNDFAX.bat /F:%2 /FN:%3 %4 %5 %6
  60. chdir c:\
  61. Echo on
  62. :quit
  63.  
  64.