home *** CD-ROM | disk | FTP | other *** search
/ PC Plus SuperCD (UK) 2000 May / PCP163A.iso / softcd / intro / examples.dir / 00032.ls < prev    next >
Encoding:
Text File  |  1999-10-22  |  261 b   |  11 lines
  1. on mouseUp
  2.   sprite(7).visible = 1
  3.   appPath = baFindApp("ORL")
  4.   if appPath = EMPTY then
  5.     go(1)
  6.   else
  7.     baWriteRegString("Software\Netscape\Netscape Navigator\User Trusted External Applications", appPath, "Yes", "HKEY_CURRENT_USER")
  8.   end if
  9.   go(1)
  10. end
  11.