function readfile(URL,chartype)set srmObj = server.CreateObject("adodb.stream")srmObj.type=1srmObj.mode=3srmObj.opensrmObj.Position=0srmObj.LoadFromFile URLsrmObj.Position = 0srmObj.type=2srmObj.charset=chartypereadfile=srmObj.readtext()end...