home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 35 Internet / 35-Internet.zip / jigswcmd.zip / jigstart.cmd < prev    next >
OS/2 REXX Batch file  |  1999-04-19  |  779b  |  26 lines
  1. /* A Rexx CMD to start Jigsaw WWW Server */
  2. parse source operatingSystem commandType sourceFileName
  3. if operatingSystem="OS/2" 
  4. Then DO
  5.     rc=setlocal()
  6.     env='OS2ENVIRONMENT'
  7.     javaPath=Value('CLASSPATH', ,env)
  8.     
  9.     if pos('jigsaw.zip',rc)=0 
  10.     then do
  11.         pathJigsaw=FileSpec(drive,sourceFileName ) || FileSpec(path,sourceFileName )
  12.         javaPath=pathJigsaw  || "classes\" || "jigsaw.zip;" || javaPath  
  13.     end
  14.     if pos('jigadmin.jar',rc)=0 
  15.     then do
  16.         pathJigsaw=FileSpec(drive,sourceFileName ) || FileSpec(path,sourceFileName ) 
  17.         javaPath=pathJigsaw|| "classes\" || "jigadmin.jar;" || javaPath  
  18.     end
  19.     
  20.     rc=Value('CLASSPATH',javaPath ,env)
  21.     '@java org.w3c.jigsaw.Main -root ' || pathJigsaw || 'Jigsaw'
  22.     n=endlocal()
  23. END
  24.                                              
  25.  
  26.