[三流君] −−> [VBAで楽しく] −−> [バックナンバー一覧]
−−> No.026 FTP -n オプションとuserコマンド

FTP -n オプションとuserコマンド

メルマガ発行内容

<FTP -n オプションとuserコマンド>

こんにちは、三流プログラマーKen3です。 今回は、いきなりクレームもらったので、即発行です。 前回テストでFTPの起動テスト を軽く書いたんだけど、 クレームもらいました。 /* * 1. クレームのメールは勉強になる。 */ In message "-n と user 使えよバカ", s***@********.ne.jpさん wrote... >ここ見ろ-->http://www.zdnet.co.jp/help/tips/linux/l0462.html >-n と user 使えよバカ -- http://www.zdnet.co.jp/help/tips/linux/l0462.html 見ました、勉強になります。 ftp -n とやると、ログインを聞いてこないので、 user ユーザ名 パスワード でログイン出来るんですね。 速いなぁ一流読者のレスは。 *できたら掲示板に書いてほしかったけど。 /* * 2.ftp -n -s:ファイル名 に 変更 */ Sub test() Dim strPNAME As String 'パラメーターファイル名 Dim nFNO As Integer 'ファイル番号 strPNAME = ThisWorkbook.Path & "\ftptest.txt" 'ファイル名作成 nFNO = FreeFile '空いてるファイル番号を取る Open strPNAME For Output As #nFNO 'ファイルを新規作成 'データ書き込み Print #nFNO, "open plaza14.mbn.or.jp" 'openホスト名 Print #nFNO, "user ken3 XXXXXX←パスワード" 'userコマンド ユーザー名 パスワード Print #nFNO, "cd www" Print #nFNO, "pwd" Print #nFNO, "get index.html " & ThisWorkbook.Path & "\index.html" Close #nFNO '開いたら閉じようね 'shellでFTPを起動 -nのオプションを付ける Shell "ftp -n -s:" & strPNAME End Sub テストプログラム、変更しました。 変更ヶ所は、 user コマンドの追加 と ftp -n と−nのオプションを付けました。 /* * 3.実行結果 */ パスワードは消しておいたけど。無事動作しました。 ftp> open plaza14.mbn.or.jp Connected to plaza14.mbn.or.jp. 220 DREAM*PLAZA FTP Server ftp> user ken3 ****←パスワード 331 Password required for ken3. 230 User ken3 logged in. ftp> cd www 250 CWD command successful. ftp> pwd 257 "/www" is current directory. ftp> get index.html C:\tmp\vba025\index.html 200 PORT command successful. 150 Opening ASCII mode data connection for index.html (470 bytes). 226 Transfer complete. ftp: 481 bytes received in 0.28Seconds 1.72Kbytes/sec. ftp> 200 PORT command successful. 150 Opening ASCII mode data connection for index.html (470 bytes). 226 Transfer complete. ftp: 481 bytes received in 0.32Seconds 1.50Kbytes/sec. ftp> /* * 4.終わりの挨拶 */ 読者のレスの速さにびっくり。 And http://www.zdnet.co.jp/help/tips/linux/l0462.html と、処理方法はいろいろあるんですね。 Linuxのシェルの起動もヨロシクです。 *三流作者さん人に任せないで、自分で調べろって、、、 拾い読みして、 1つでも何かの参考となれば幸いです。 Excel/Access大好き、三流プログラマーKen3でした。 PS.できる読者(同様の処置やったこと有る)の回答も待ってます。


ページフッター

ここまで、読んでいただきどうもです。ここから下は、三流君のホームページの紹介・案内です
目的の情報が見つかったか?少々心配しつつ、、、

種類別のリンク や 広告など

気になったジャンル↓を選択してください。

人気記事(来場者が多いTOP3):
[VBAでIE,WebBrowserを操作]・・・VBAでIE,WebBrowserを操作する サンプルです
[Access から Excel 連携 CreateObject("Excel.Application")]・・・AccessからExcelを操作したりデータの書き出しなどです
[VBAでOutlookの操作 CreateObject("Outlook.Application" )]・・・VBAからOutlookを使い、メール関係を処理するサンプルです
↑上記3つみたいなCreateObjectで他のアプリケーションを操作するサンプルが人気です。

Excel関係:
[Excel UserFormを操作する]・・・エクセルでユーザーフォームを作成して入力などを行ってます
[ExcelからAccessを操作する]・・・ExcelからAccessのマクロを起動してみました、
[Excel関係 関数、その他]・・・その他Excel関係です

Access関係:
[Access UserForm/サブフォーム 操作]・・・アクセスでフォームを使ったサンプルです
[Access レポート操作]・・・レポートを操作してみました
[Access クエリーやその他関数]・・・あまりまとまってませんが、スポット的な単体関数の解説です

その他:VBAの共通関数やテキストファイルの操作など
[VBAでテキストファイル(TextFile)の操作]・・・普通のテキストファイルを使ったサンプルです
[VBA 標準関数関係とその他解説]・・・その他、グダグタ解説してます

開発時の操作: [F1を押してHELPを見る]/ [Debug.Print と イミディエイトウインドウ]/ [実行時エラーでデバッグ]/ [ウォッチ式とSTOP]/ [参照設定を行う]

仕様書(設計書?) XXXX書類: [基本設計書や要求仕様書]/ [テスト仕様書 テストデータ]/ [バグ票]/ [関数仕様書]/ [流れは 入力・処理・出力]

※↑文章の味付けが変わっていて、お口に合うかわかりませんが。。。
※※読んで、気分を悪くされたらスミマセン。

Blogとリンク:[三流君の作業日記]/ [VBAやASPのサンプルコード]/ 広告-[通販人気商品の足跡]



[三流君(TOP ken3.org へ戻る)] / [VBA系TOPへ] / [VBA系バックナンバー目次へ移動]