[REBOL] [REBOL]FTP Read/Write problems Continue Re:
Tim wrote: > Your advice below was followed: > Rebol continues to hang: This is an FTP site that I use very regularly. > Do you have any other ideas? I'm stumped!! Sorry, no more ideas. Try contacting Stirling and the REBOL crew. Or you could try REBOL/View. Andrew Martin First with /View! ICQ: 26227169 http://members.xoom.com/AndrewMartin/ -><-
[REBOL] [REBOL]FTP Read/Write problems Continue
Hello Andrew: Your advice below was followed: Rebol continues to hang: This is an FTP site that I use very regularly. Do you have any other ideas? I'm stumped!! Thanks Tim >Wouldn't it be easier to read %test.txt, make the changes locally, then >write %test.txt? Something like: > >Site: ftp://. >File: read/lines site >print File >forall File [ >; blah blah blah... >] >write/lines Site File > >That way you can more easily see what's going on. > At 02:26 AM 1/29/00 -0800, you wrote: >Tim wrote: >> I have also written my own script, which goes as follows: >> ;;=== >> site: ftp://usr:[EMAIL PROTECTED]/webs/interfacefire/temps/test.txt >> print read site >> fp: open/lines/mode site [read write lines] >> forall fp >> [ >> if(find first fp "three") >> [ >> print first fp >> insert next fp "line four" >> ] >> ] >> close fp > >Andrew Martin >ICQ: 26227169 >http://members.xoom.com/AndrewMartin/ >-><- > > >
[REBOL] [REBOL]FTP Read/Write problems Re:
Tim wrote: > I have also written my own script, which goes as follows: > ;;=== > site: ftp://usr:[EMAIL PROTECTED]/webs/interfacefire/temps/test.txt > print read site > fp: open/lines/mode site [read write lines] > forall fp > [ > if(find first fp "three") > [ > print first fp > insert next fp "line four" > ] > ] > close fp Wouldn't it be easier to read %test.txt, make the changes locally, then write %test.txt? Something like: Site: ftp://. File: read/lines site print File forall File [ ; blah blah blah... ] write/lines Site File That way you can more easily see what's going on. Andrew Martin ICQ: 26227169 http://members.xoom.com/AndrewMartin/ -><-
[REBOL] [REBOL]FTP Read/Write problems Re:
I don't know if this helps, but here's what I get with Microsoft IIS 4.0 FTP
server, and trace/net turned on:
>>trace/net on
>>entry: join "Date: " now
== "Date: 28-Jan-2000/16:58:45-6:00"
>>write/append ftp://anonymous@localhost:14000/logs.txt entry
URL Parse: anonymous none localhost 14000 none logs.txt
Net-log: ["Opening tcp for" FTP]
connecting to: localhost
Net-log: [
none ["220" "230"]]
Net-log: "220 cat503269 Microsoft FTP Service (Version 4.0)."
Net-log: [["USER" port/user] "331"]
Net-log: {331 Anonymous access allowed, send identity (e-mail name) as
password.}
Net-log: [["PASS" port/pass] "230"]
Net-log: "230 Anonymous user logged in."
Net-log: [
"TYPE I" "200"]
Net-log: "200 Type set to I."
Net-log: [["PORT" port/locals/active-check] "200"]
Net-log: [
"PASV" "227"]
Net-log: "227 Entering Passive Mode (127,0,0,1,16,199)."
Net-log: [["CWD ~"] "250"]
Net-log: "250 CWD command successful."
Net-log: [["CWD" either empty? port/path ["./"] [join "./" port/path]]
"250"]
Net-log: "250 CWD command successful."
Net-log: [["APPE" port/target] "150"]
** User Error: Server error: tcp 125 Data connection already open; Transfer
starting..
** Where: write/append ftp://anonymous@localhost:14000/logs.txt entry
>From: [EMAIL PROTECTED]
>Reply-To: [EMAIL PROTECTED]
>To: [EMAIL PROTECTED]
>Subject: [REBOL] [REBOL]FTP Read/Write problems
>Date: Fri, 28 Jan 2000 10:43:23 -0900
>
>Hello:
> I am attempting to read and write test files
>via ftp.
>I began by copying ftpappend.r from the examples site.
>The code was modified as follows:
>;;===
>REBOL
>[
> Title: "Append to a Text File"
> File: %ftpappend.r
> Date: 26-May-1999
> Purpose: {Append to a text file using FTP.}
>]
>write/append
>ftp://usr:[EMAIL PROTECTED]/webs/interfacefire/temps/log.txt join
>"date: " now
>;;===
>;I believe that I can verify that I am contacting that site, because
>; if I put in an invalid password or an nonexistant file name, I
>; get an error message.
>; Given that password and filename is correct:
>; Rebol hangs; i.e the "progress prompt"
>; |\- etc just keeps spinning and I have to abort the script
>
>I have also written my own script, which goes as follows:
>;;===
>site: ftp://usr:[EMAIL PROTECTED]/webs/interfacefire/temps/test.txt
>print read site
>fp: open/lines/mode site [read write lines]
> forall fp
> [
> if(find first fp "three")
> [
> print first fp
> insert next fp "line four"
> ]
> ]
>close fp
>;;===
>;;Same results as in ftpappend.r rebol hangs, no error
>;; messages, I have to abort the script
>As always, I really appreciate the input, hope I can
>be of some help some day.
>regards
>Tim
>
__
Get Your Private, Free Email at http://www.hotmail.com
[REBOL] [REBOL]FTP Read/Write problems
Hello:
I am attempting to read and write test files
via ftp.
I began by copying ftpappend.r from the examples site.
The code was modified as follows:
;;===
REBOL
[
Title: "Append to a Text File"
File: %ftpappend.r
Date: 26-May-1999
Purpose: {Append to a text file using FTP.}
]
write/append
ftp://usr:[EMAIL PROTECTED]/webs/interfacefire/temps/log.txt join
"date: " now
;;===
;I believe that I can verify that I am contacting that site, because
; if I put in an invalid password or an nonexistant file name, I
; get an error message.
; Given that password and filename is correct:
; Rebol hangs; i.e the "progress prompt"
; |\- etc just keeps spinning and I have to abort the script
I have also written my own script, which goes as follows:
;;===
site: ftp://usr:[EMAIL PROTECTED]/webs/interfacefire/temps/test.txt
print read site
fp: open/lines/mode site [read write lines]
forall fp
[
if(find first fp "three")
[
print first fp
insert next fp "line four"
]
]
close fp
;;===
;;Same results as in ftpappend.r rebol hangs, no error
;; messages, I have to abort the script
As always, I really appreciate the input, hope I can
be of some help some day.
regards
Tim
