logファイルから任意の文字を取り出すには？

解決

アーク 2005-11-02 13:33:04 No: 127257 IP: [192.*.*.*]

2005/09/06 17:12:56 BGID=199999999処理開始
2005/09/06 17:12:56 BGID=199999999処理完了
2005/09/06 17:13:18 BGID=188888888処理開始
2005/09/06 17:13:18 ERROR!! BGID=188888888は存在します。処理を中断しました。

上記のファイルからBGID=以降の９桁の数字だけ変数に取り出すにはどうすればよいですか？

編集削除

あん 2005-11-02 13:53:44 No: 127258 IP: [192.*.*.*]

一行の処理はこんな感じ

Set ex = CreateObject("VBScript.RegExp")

ex.Pattern = "(^.*)(BGID=)(.........)(.*$)"
If ex.Test(L) = True Then
ID = ex.Replace(L, "$3")
End If

ファイル読み込みを追加してね

編集削除

アーク 2005-11-02 14:08:48 No: 127259 IP: [192.*.*.*]

ありがとうございます。
動的配列を使って全部の行から取るにはどうすればよいのですか？

編集削除

アーク 2005-11-02 14:36:57 No: 127260 IP: [192.*.*.*]

すいません。ファイル読み込みの方法も教えていただけませんか？
C:\WINDOWS\ABC.logファイルから読み込むためには
Set objBGID = ex.openlogfile("C:\WINDOWS\ABC.log")
ではいけなのですか？

編集削除

Blue 2005-11-02 15:18:06 No: 127261 IP: [192.*.*.*]

Regular Expression オブジェクトのプロパティとメソッド
http://www.microsoft.com/japan/msdn/library/default.asp?url=/japan/msdn/library/ja/script56/html/vsobjRegExp.asp

> openlogfile
このようなメソッドはないです。

Openステートメントや
FileSystemObject オブジェクトを調べてみてください。

編集削除

あん 2005-11-02 15:41:06 No: 127262 IP: [192.*.*.*]

>すいません。ファイル読み込みの方法も教えていただけませんか？
こんなことを言う人がなぜＶＢでプログラムをやろうとしてるのか
疑問に思います。

編集削除

z 2005-11-02 16:05:13 No: 127263 IP: [192.*.*.*]

＞あんさん
仕事なんでしょう。

編集削除

あん 2005-11-02 16:29:57 No: 127264 IP: [192.*.*.*]

>仕事なんでしょう。
仕事ならなおさら転職をおすすめします。

編集削除

アーク 2005-11-02 16:33:10 No: 127265 IP: [192.*.*.*]

そのとりです。
仕事なんです・・・
今までずっと受付嬢をやっていたのですが急に開発にまわされてしまったのです。VB初めてなのに期限が短くて急いでたのですいません。
自分でもう少し勉強してみます。