home *** CD-ROM | disk | FTP | other *** search
/ Image Master / L80.iso / Net / websuite / websuite.exe / APPRUN.AP_ / APPRUN.AP
Encoding:
Text File  |  1997-12-08  |  574 b   |  32 lines
  1. <[
  2. // apprun.ap
  3. // (c) 1997 SmartDesk, Inc., All Rights Reserved
  4.  
  5. #include "/desktop/desksupp.fgl"
  6. #include "/desktop/apps.fgl"
  7.  
  8. desk = new( "PrivateDesktop", param( 1 ), param( 2 ) )
  9. if ( type( desk ) != "O" )
  10.     return( 0 )
  11. end
  12.  
  13. item = new( "AppItem", desk, desk.session.var( "cat" ), desk.session.var( "item" ) )
  14.  
  15. params = desk.session.var( "param" )
  16. if ( strempty( params ) )
  17.     params = desk.session.var( "data" )
  18. end
  19.  
  20. if ( item.run( params ) == -1 )
  21.     return( 1 )
  22. end
  23.  
  24. desk.session.redir( desk.session.data( "referer" ) )
  25.  
  26. return( 1 )
  27.  
  28. ]>
  29.  
  30.  
  31.  
  32.