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

解決


アーク  2005-11-02 22:33:04  No: 127257

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=以降の9桁の数字だけ変数に取り出すにはどうすればよいですか?


あん  2005-11-02 22:53:44  No: 127258

一行の処理はこんな感じ

Set ex = CreateObject("VBScript.RegExp")

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

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


アーク  2005-11-02 23:08:48  No: 127259

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


アーク  2005-11-02 23:36:57  No: 127260

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


Blue  2005-11-03 00:18:06  No: 127261

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-03 00:41:06  No: 127262

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


z  2005-11-03 01:05:13  No: 127263

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


あん  2005-11-03 01:29:57  No: 127264

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


アーク  2005-11-03 01:33:10  No: 127265

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


dark  2005-11-03 01:45:20  No: 127266

> VB初めてなのに期限が短くて
ひどい会社だな。品質ワルソー。


アーク  2005-11-03 01:51:23  No: 127267

見つかりました。ありがとうございました。


※返信する前に利用規約をご確認ください。




  


  このエントリーをはてなブックマークに追加