BUNZIN NET ポータル / プログラムは考え方です / メルマガバックナンバーリスト
前のメルマガ / 次のメルマガ

2010/05/05発行 『【櫻井です】ファイルに何か書いてみましょう』

━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
レンタル掲示板とクイズ投稿サイトを開発した櫻井文人の
プログラムの考え方が身につくメルマガ『プログラムは考え方です』
───────────────────────────────────
メルマガ発行人
櫻井文人のプロフィール ⇒ http://www.bunzin.net/program/prof.html
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━

こんにちは、メルマガ発行人の櫻井文人です。
今更ながらパケホーダイにプラン変更しました。
詳しくは編集後記で。


今回も引き続きファイルについてです。
いよいよ今回からは、実際VBScriptを使って
ファイルを操作していきますね。


━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
【おすすめ】

話題のデジタルメモ「ポメラ」

 デジタルメモ「ポメラ」
 コチラ ⇒ http://www.moshimo.com/article/121691/172429

今なら 20,790円 のところを 16,800円 で販売中です。


━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
■■ ファイルに何か書いてみましょう
───────────────────────────────────

今回は、ファイルに何か書いてみることにしましょう。

というわけで、
VBScriptでファイルに何かを書くプログラムを作ってみましょう。


■ プログラムの概要

 「test.txt」というファイルに、何かを書き込みます。
 何を書くかは、自由に入力できるようにします。


■ 実際のプログラムと説明

 以下が、実際のプログラムです。


    1行目:set objFso = WScript.CreateObject("Scripting.FileSystemObject")
    2行目:set objFile = objFso.OpenTextFile("text.txt", 8, True)
    3行目:value = InputBox("書き込む内容を入力して下さい")
    4行目:objFile.WriteLine(value)
    5行目:objFile.Close

 
 ※説明を簡潔にするためにエラーの処理ははしょってます。


 ・1行目では、ファイルを操作するための部品のような
  FileSystemObjectオブジェクトというものを使う準備をしています。
  ここで新しくFileSystemObjectオブジェクトが作られて、
  objFsoに格納されます。
  FileSystemObjectオブジェクトの中にはメソッドという関数のような
  ものがいくつか入っているので、これを使ってファイルを操作します。

 ・2行目はで、ファイルをオープンしています。
  ここでは「text.txt」という名前のファイルをオープンします。
  この時、ファイルの中身があれば追記して書き込みを、
  そしてファイルが存在しなければ新規で作るように指定して
  ファイルをオープンしています。
  objFsoに格納されたFileSystemObjectオブジェクトの
  OpenTextFileメソッドを実行することで
  ファイルをオープンすることができます。

 ・3行目では、InputBox関数でファイルに書き込む内容を入力します。
  入力された内容は変数valueに格納されます。

 ・4行目では、入力した内容を、
  WriteLineメソッドでファイルに改行付きで書き込みます。

 ・5行目では、Closeメソッドでファイルをクローズしています。


■ コピペ用のプログラムです

 ファイルにコピペして使えるように、行番号を外したプログラムも以下に
 書いておきますね。

----------------------------------------------------------------------
set objFso = WScript.CreateObject("Scripting.FileSystemObject")
set objFile = objFso.OpenTextFile("text.txt", 8, True)
value = InputBox("書き込む内容を入力して下さい")
objFile.WriteLine(value)
objFile.Close
----------------------------------------------------------------------

 VBScriptで作ったプログラムの動かし方が分からない場合は以下のページで
 詳しく説明してますので確認してみてください。

  ⇒ http://www.bunzin.net/program/vbscript/execute.html


■ 次回のメルマガは・・・

 今回はファイルに書き込みをしましたので、
 逆に次回はファイルを読んでみる予定です。


━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
■■ 編集後記
───────────────────────────────────

今更ながらパケホーダイにプラン変更しました。

これで、携帯でゲームがやり放題です。

といっても、実は仕事の関係で必要になったので
プランを変更したのですが・・・

携帯でゲームをやり込んで携帯ゲームマニア(?)になるのも、
仕事の内に含まれている・・・はず?

なので、頑張ってゲームやりまくります(笑)


最後までお読みいただき、ありがとうございました。


━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
【おすすめ】

大人気!デジタルメモ「ポメラ」DM5

20,790円のポメラを 今だけ 16,800円 で販売中です。


 デジタルメモ「ポメラ」DM5
 コチラ ⇒ http://www.moshimo.com/article/121691/172429


この機会をお見逃し無く!


━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━

●櫻井が開発したレンタル掲示板は
  コチラ ⇒ http://www.bunzin.gr.jp/m_board/

  画像のアップロードも可能なレンタル掲示板です。
  無料ですのでお気軽にどうぞ。


●櫻井が開発したクイズ投稿サイトは
  コチラ ⇒ http://www.bunzin.gr.jp/quiz/

  あなたが考えたクイズを投稿することができます。
  投稿されたクイズに回答することもできます。
  無料ですのでお気軽にどうぞ。


●BUNZIN NET アプリ
  コチラ ⇒ http://www.bunzin.net/app/


●プログラム用語辞典
  コチラ ⇒ http://www.bunzin.net/program/dictionary/


●お手軽!VBScriptを使ってみよう
  コチラ ⇒ http://www.bunzin.net/program/vbscript/


━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
メルマガ発行人 櫻井文人

メルマガ発行責任者情報は
 コチラ ⇒ http://www.bunzin.net/program/mghsinfo.html

アドレス変更と登録解除はコチラ ⇒ http://www.mag2.com/m/0000293166.html

メルマガバックナンバーは
 コチラ ⇒ http://www.bunzin.net/program/mailmaga/backnumber/

櫻井文人のプロフィール ⇒ http://www.bunzin.net/program/prof.html

ご意見・ご感想はコチラ ⇒ bunzin●bunzin.gr.jp
(メール送信の際は、●を@に置き換えてください。)
(櫻井が確実に読みますが、返信は保障できません。)
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
 
メルマガ登録・解除
 
前のメルマガ / 次のメルマガ
企画・運営・管理 BUNZIN NET