原理及优点:通过XML中的XMLHTTP组件调用其它网站上的网页，然后批量截取或替换原有的信息使其转化成变量后再一一储存到数据库中。function bytes2bstr(vin) strreturn = ""for i = 1 to lenb(vin) thischarcode = ascb(midb(vin,i,1)) if thischarcode <&h80 then strreturn = strreturn &chr(thischarcode) else.bytes2bstr = strreturn end function 声明截取的格式，从start开始截取，到last为结束function getkey(html,start,last)filearray=split(html,start)filearray2=split(filearray(1),last)getkey=filearray2(0)end function.