home *** CD-ROM | disk | FTP | other *** search
/ Beijing Paradise BBS Backup / PARADISE.ISO / software / BBSDOORW / VD170R1.ZIP / VDSAMPLE.ZIP / VALIDATE.BAT < prev    next >
Encoding:
DOS Batch File  |  1992-07-25  |  2.0 KB  |  107 lines
  1. @echo off
  2. cls
  3. Echo  Validate.Bat -  by Cabell Clarke
  4. Echo                  Boot Factory BBS - FidoNet 1:264/19
  5. Echo.
  6. Echo                  Last Update: 29 May 92
  7. Echo.
  8. rem
  9. rem                   This Batch file runs ValiDOOR from a Type 15 Exit
  10. rem                   and shows examples of errorlevel processing
  11. rem
  12. rem
  13. rem Male $ ValidOOR Begin Run >> %log%
  14.  
  15.    rem cdd c:\qbbs\validoor
  16.  
  17.    Vd
  18.  
  19.    if errorlevel 15 goto E15
  20.    if errorlevel 14 goto E14
  21.    if errorlevel 13 goto E13
  22.    if errorlevel 12 goto E12
  23.    if errorlevel 11 goto E11
  24.    if errorlevel 10 goto E10
  25.    if errorlevel  9 goto E09
  26.    if errorlevel  8 goto E08
  27.    if errorlevel  7 goto E07
  28.    if errorlevel  6 goto E06
  29.    if errorlevel  5 goto E05
  30.    if errorlevel  4 goto E04
  31.    if errorlevel  3 goto E03
  32.    if errorlevel  2 goto E02
  33.    if errorlevel  1 goto E01
  34.  
  35.    MALE + \ B/Validation Successful >> %LOG%
  36.    goto xit
  37.  
  38. :E15
  39.    Male * \ B/Sysop Aborted - F4 >> %log%
  40.    goto return
  41.  
  42. :E14
  43.    Male * \ B/User edited Illegal Number >> %log%
  44.    goto return
  45.  
  46. :E13
  47.    Male ! \ B/Invalid # Command Line Args >> %log%
  48.    goto return
  49.  
  50. :E12
  51.    Male ! \ B/Bad Key File >> %log%
  52.    goto Return
  53.  
  54. :E11
  55.    Male * \ B/Bad Number (in BadNumbr.Ctl File) >> %log%
  56.    goto Xit
  57.  
  58. :E10
  59.    Male * \ B/Voice Detection >> %log%
  60.    goto Xit
  61.  
  62. :E09
  63.    Male * \ B/Lost Carrier >> %log%
  64.    goto Xit
  65.  
  66. :E08
  67.    Male * \ B/Inactivity Timeout >> %log%
  68.    goto Xit
  69.  
  70. :E07
  71.    Male * \ B/LD Attempt not in TimeSlot >> %log%
  72.    goto Return
  73.  
  74. :E06
  75.    Male ! \ B/Could'nt find a FOSSIL Driver >> %log%
  76.    goto Xit
  77.  
  78. :E05
  79.    Male * \ B/User Abort at menu >> %log
  80.    Goto Return
  81.  
  82. :E04
  83.    Male * \ B/Duplicate Phone Number >> %log%
  84.    goto Return
  85.  
  86. :E03
  87.    Male ! \ B/Sysop Name missing in VD.CFG >> %log
  88.    goto Return
  89.  
  90. :E02
  91.    Male * \ B/User Not Validated >> %log%
  92.    goto Xit
  93.  
  94. :E01
  95.    Male ! \ B/File Missing >> %log%
  96.    goto Return
  97.  
  98. :xit
  99. rem   Dtr OFF           VD can do this now
  100. rem   Dtr ON
  101.    AT Z
  102.    AT H1
  103.  
  104. :Return
  105.    Male \ \ B/End of Run >> %log%
  106.    Exit
  107.