本來是用fso作的，發現日文會亂掉改用adodb.stream
tmp=Trim(TrageTextFile.ReadLine)
請問fso版的這行在adodb.stream該怎麼做呢
.ReadLine的adodb.stream版是什麼？
thx
Dim str
Set stm=CreateObject("adodb.stream")
stm.Type=2 '以本模式讀取
stm.mode=3
stm.charset="Shift-JIS"
stm.open
stm.loadfromfile "20140701_ex01.html"
str=stm.readtext
stm.Close
Set stm=nothing
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 111.242.27.39
※ 文章網址: https://www.ptt.cc/bbs/Visual_Basic/M.1421745621.A.29A.html