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

RE: [REBOL] Re: Might as well ask..

From: rebol::compkarori::com at: 3-Oct-2002 18:36

Just testing to see what's wrong<BR><BR>--<BR>Graham Chiu<BR><BR><BR> <BLOCKQUOTE dir=ltr style="PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px"> <DIV style="FONT: 10pt arial">--------- Original message --------<BR>From: Andy Finkel <[andy--flyingcat--com]><BR>To: "[rebol-list--rebol--com]" <[rebol-list--rebol--com]><BR>Subject: [REBOL] Re: Might as well ask..<BR>Date: 10-03-02 20:29<BR><BR><FONT face="Courier New" size=2>Hi:<BR><BR>Well, without the skip (which I was using to resend part of the file) ,<BR>the code (which does work) looks like:<BR><BR>---------------------<BR><BR>rebol [ "TCP File Client" ]<BR><BR>port: open/binary/direct tcp://localhost:5242<BR><BR>outfile: open/binary/direct/write/new %qwe.vts<BR>forever [<BR>data: copy/part port 32768<BR>if (none? data) [break]<BR>insert outfile data <BR>]<BR>print ["file received"]<BR>close outfile<BR>close port<BR><BR>----------------------------<BR><BR>rebol ["TCP File Server" ]<BR><BR><BR>listen: open/binary/direct tcp://:5242<BR><BR><BR>forever [<BR>connection: first listen<BR>file: open/binary/read/direct %/usr/video/qwe.vts<BR>forever [<BR>data: copy/part file 32768<BR>if( none? data ) [ break ]<BR>insert connection data<BR>]<BR>print ["file sent"]<BR>close connection<BR>close file<BR>]<BR>close listen<BR><BR><BR>-----------------------<BR><BR><BR>The one thing I haven't convinced Rebol to do is let me read a parameter<BR>(the filename) from the listen port on the server side before sending<BR>the file. Any ideas ?<BR><BR><BR>Andy<BR><BR><BR><BR><BR><BR>-- <BR>To unsubscribe from this list, please send an email to<BR><A class=autolink href="mailto:[rebol-request--rebol--com]">[rebol-request--rebol--com]</A> with unsubscribe in the <BR>subject, without the quotes.<BR><BR><BR></FONT></DIV></BLOCKQUOTE>