用stream读文件

前几天要写一个东西里面有用到读文件的。
可是我不想用FSO，我怕有的空间不支持。
可是网络上找了半天没有找到一个不是用FSO写的。
还是自己做了一个。
我记得以前在做无组件上传，并保存文件的时候有用到stream
我发现有一个LoadFromFile的方法。可以读取文件。
下面是我的代码。
function readfile(URL,chartype)
set srmObj = server.CreateObject("adodb.stream")
srmObj.type=1
srmObj.mode=3
srmObj.open
srmObj.Position=0
srmObj.LoadFromFile URL
srmObj.Position = 0
srmObj.type=2
srmObj.charset=chartype
readfile=srmObj.readtext()

end function
两个参数。URL是文件的路径，好像只能绝对路径。chartype是文件以什么编码存放的。
返回一个字符串，存放文件的内容。
这个函数只能读文本文件。读二进制文件也差不多。要用的人可以自己改