home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 35 Internet / 35-Internet.zip / jsm290r.zip / install.cmd < prev    next >
OS/2 REXX Batch file  |  1997-11-10  |  1KB  |  55 lines
  1. /*
  2.  * install.cmd - Jasmine instalation program
  3.  *               Jasmineö─ùpâCâôâXâgü[âëü[
  4.  *
  5.  * release 1 - 10/Nov/97
  6.  *
  7.  */
  8.  
  9. call rxfuncadd 'sysloadfuncs', 'rexxutil', 'sysloadfuncs'
  10. call sysloadfuncs
  11.  
  12. say "- - - - - - - - - - - - -"
  13. say " Jasmine install program"
  14. say "- - - - - - - - - - - - -"
  15.  
  16. trg_object = '<WP_DESKTOP>'
  17.  
  18. name = SysSearchPath('path','jasmine.exe')
  19. if name = '' then do
  20.    say 'error. I cannot find Jasmine.EXE file.'
  21.    call End
  22. end
  23.  
  24. parameter = 'exename='name';startupdir='directory()';objectid=<Jasmine>'
  25.  
  26. if SysCreateObject('WPProgram', 'Jasmine', trg_object, parameter, 'u') <> 0 then do
  27.    say ''
  28.    say ' Jasmine instalation was successfully completed.'
  29.    say ''
  30.    say ' Jasmineé╠âCâôâXâgü[âïé═û│Äûé╔ÅIù╣é╡é▄é╡é╜üB'
  31. end
  32. else do
  33.    say 'error. I cannot create object.'
  34.    call End
  35. end
  36.  
  37. say ''
  38. say ''
  39. say ''
  40. say ''
  41. say ''
  42. say ''
  43. say ''
  44. say ''
  45. say ''
  46. say ''
  47. say ''
  48. say ''
  49. say ''
  50. say ' ...By the way, Jasmine needs VROBJ.DLL.'
  51. say ''
  52.  
  53. End:
  54. exit
  55.