orn さんは FC2 を使っているようなのでこんな感じかと。
パスワードは入れておいてからスクリプトを実行してください。
#include "hspinet.as"
// アップするファイルを作成
notesel buf
buf="さんぷるてすと"
notesave "test.txt"
// 初期化
netinit
if stat : dialog "エラー" : end
// FC2 はこんな感じな気がする
// 昔使っていましたがぜんぜん覚えてないや〜
// パスワードってところをいれれば動くはずです。
ftpopen "neoncrporation.web.fc2.com","neoncrporation","パスワード"
if stat : gosub *ftperror : end
ftpdir m_dir,"/"
if stat : gosub *ftperror : ftpclose : end
// 今回はテキストデータなのでアスキーモードを選択
ftpput "test.txt","test.txt",1
if stat : gosub *ftperror : ftpclose : end
ftpclose
exec "http://neoncrporation.web.fc2.com/test.txt",16
dialog "test.txt が表示されていれば成功です。"
end
*ftperror
ftpresult res
dialog "FTP接続エラー\n"+res
return