Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search

[REBOL] Re: simple view problem part 2

From: nomoreshoes::btopenworld::com at: 26-Oct-2001 21:57

please help. need connect button to take ftp url and connect to it, then and refresh + display top level dir in the file list. i suspect i need the whole feel: aspect of view but cannot get me head around it :o( i would like the simplist possible solution please - ideally with some comments to help me understand what is going on so i can learn. REBOL [ Title: "url dir viewer v 0.1" Date: cvs-date "$Date: 2001/04/29 16:00:17 $" Rights: "as if this is worth money he he" Purpose "quickly view contents of a url, eventually also upload and download individual files" ] view layout [ style lab label 80 left across lab vh2 "view website contents" gold text "v 0.1" return lab "url" url: field return lab "user name:" user: field return lab "password:" pass: field hide return lab "Files:" ohh: text-list data load %. feel [ redraw: func [face act pos] [print act] ] return return lab button 96 "connect" [alert [ ass:[ probe join ftp:// [user/text ":" pass/text "@" url/text]]] ] button 96 "exit" [exit] return ]