.NETでちょっとしたプログラミング(1)
2008 年 4 月 16 日 水曜日 by itoこんにちはitoです。
最近、WindowsからMacに移行し、UNIXベースのOSということで、ちょっとしたプログラミングが必要になったとき、シェル、もしくは標準でインストールされたPerlやRubyやPHPという軽量言語(Lightweight Language)を普段は利用しています。(もちろんJavaやCの環境も入っていますが、めったに使いません)
さて、そんな中、Windowsにおいては、VBScriptやJScript程度しか、プログラムを動かすための環境が標準ではほとんど入っておらず、またWindowsのバッチもコマンドが限られるため、たとえば「ファイル行数が何行か?」ということを知るというだけのことですら、簡単に調べることができないかと思います。
ちなみに上記はUNIX系のOSの場合、grepコマンドを用いて
$ grep -c ""
とすることで求められます。
さて、従来のVBScriptによる方法で同じことを書いてみましょう。
Option Explicit Dim objFSO Set objFSO = WScript.CreateObject("Scripting.FileSystemObject") Dim objStream Set objStream = objFSO.OpenTextFile("test.vbs", 1) '1: For read Dim lines lines = 0 Do Until objStream.AtEndOfStream objStream.readLine lines = lines + 1 Loop objStream.Close Wscript.echo lines
今回話題にしたいのは実はこれだけではありません。最近のほとんどのWindowsには実は、もうひとつの開発環境が備わっていることが多いのです。今回はその「.NET Framework」についてご紹介します。