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

[ALLY] message window in /View Re:

From: al:bri:xtra at: 11-Oct-2000 2:10

> Considering the following code:
<snip!> Your FTP function might look a little better as: FTP-to-Site: function [Directory [file!] Site [url!]] [Files] [ Files: read Directory foreach File read Directory [ if found? find/tail ".txt" [ print ["FTP-ing:" File] write Site/:File read Directory/:File ] ] ] and invoked like: FTP-to-Site %"/C/Windows/My Documents/" ftp://user:[pass--ftp--somesite--com]/ Note that the above code is untested!
> Using /View, wich is the simplest way of redirecting issues printed with
the command
> print ["Trasferring file" :file] > to a window with some kind of scroll so I can later review all printed
strings? Try this: FTP-Log: make block! 100 Instead of: print ["FTP-ing:" File] use: append FTP-Log form File then: view layout [ text-list data FTP-Log ] I hope that helps somewhat. Andrew Martin ICQ: 26227169 http://members.nbci.com/AndrewMartin/