vbs脚本读取某文件夹下的ini文件

现在我需要统计游戏的点击率，现在已经做到了，点击某游戏后在，指定的文件夹下生成一个ini文件，里面只包含一个数值即为点击率。例如 魔兽世界.ini 打开以后里面只包含一个数字 5，即为点击了5次。 现在我想实现 用一个vbs脚本或者bat，读取该文加下所有ini文件，并生成一个txt文档或者excel表格，里面能看到所有游戏的点击率,请问怎么能够实现？？ PS：游戏名即为ini的文件名，ini文件内只包含一个代表点击率的数字

game_folder="d:\game"'你存放ini的目录
for_text="d:\click_pb.txt"'你存放结果的目录
Set fso=CreateObject("scripting.filesystemobject")
If fso.FolderExists(game_folder)=false Then MsgBox "空目录":WScript.Quit
If fso.FileExists(for_text) Then fso.DeleteFile(for_text)
Set f=fso.GetFolder(game_folder)
Set fs=fso.OpenTextFile(for_text,8,true)
For Each File In f.Files
if Right(file.Name,4)=".ini" Then
na=Left(file.Name,Len(file.Name)-4)
Set f=fso.OpenTextFile(file)
fs.WriteLine na&"点击率： "& f.ReadLine
End If
Next
f.Close
fs.Close'**********************************************************很好奇，你是怎么实现统计点击率的（点击某游戏生成.ini），请教一下。。。。