求助用vbscript如何统计文件中某个字符出现的次数

Dim ffile,line,fso
set fso=wscript.createobject("scripting.filesystemobject")
set ffile=fso.opentextfile("c:\kk.txt",2,true)
line=ffile.readline（a）‘这里有错误

比如c:\kk.txt如下所示：
1222
232324
888aaaa
bbbaaa
da a
如何统计文件中a出现的次数？ 谢谢
--------------------编程问答-------------------- 查阅API文档，可以看看有什么方法 --------------------编程问答-------------------- readline 是一行一行读取
看了。。还是不知道怎么写
--------------------编程问答-------------------- 用textstream，
把要统计的字符replace为“”，然后比较下长度。

补充：VB ,  基础类