home *** CD-ROM | disk | FTP | other *** search
- /*
- Switches between HiRes and LoRes versions of the HTML
- $VER: SwitchRes 1.1 (8.11.2000)
- (c) Neil Bothwick, Wirenet
-
- 1.1 - Uses "parse source" to get the name of the CD
- */
-
- options results
- parse source . ' ' . ' ' . ' ' ScriptName ' ' .
- CDName = left(ScriptName, pos(':', ScriptName) - 1)
-
- 'Get URL var Welcome'
- if pos('LORES',upper(Welcome)) > 0 then 'Open "file://localhost/'CDName':Welcome.html"'
- else 'Open "file://localhost/'CDName':Welcome_Lores.html"'
-
- 'Wait ALL'
- call addlib('rexxsupport.library',0,-30,0)
- call delay(40)
- 'Open "file://localhost/'CDName':html/NewsFlash.html#Moreoptions" target main'
-
-
-
-
-