home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 16 / 16.iso / t / t099 / 2.ddi / BATCHRUN.WB$ / BATCHRUN.WB
Encoding:
Text File  |  1992-03-20  |  449 b   |  12 lines

  1. file="*.wbt"
  2. where=IniReadPvt("Quick Access","MainPath","","ndw.ini")
  3. exact=FilePath(where)
  4. IsThere=FileExist(StrCat(exact,"box.wbd"))
  5. If IsThere == @FALSE then goto NoFile
  6. DialogBox ("Select a batch file.","box.wbd")
  7. Run ("batchrun.exe",file)
  8. Exit
  9.  
  10. :NoFile
  11. Message ("Error","The box.wbd template file is not present.  Copy the file from your original disks into your NDW directory.  The file must be located in your NDW directory!")
  12. Exit