home *** CD-ROM | disk | FTP | other *** search
/ Millennium Time Capsule / AC2000.BIN / disks / ac11disk / ss130 / geturl.sgs < prev    next >
Text File  |  1998-08-27  |  575b  |  17 lines

  1. # GETURL.SGS
  2. # Displays a dialog via the form plug-in where the user enters an
  3. # URL which is then displayed by CAB.  You could also add printing 
  4. # routines and more...
  5.  
  6. id=form.new(CAB-Loader,@OK|Cancel,37,3);     # Create new dialog
  7. form.add(id,Text,1,0,Enter an URL:);         # Add text to dialog
  8. editfield=form.add(id,Edit,1,2,http://,35);  # Add editfield to dialog
  9.  
  10. waitfor(on);
  11. form.do(id);   # Wait for user input
  12. waitfor(off);
  13.  
  14. page=form.get(id,editfield);  # Get user text
  15. cab.open(page);  # Open page in CAB
  16.  
  17. form.delete(id);  # Delete the dialog