Func ReadTextFile($FileName) ;~ 读取文件 Dim $strData Dim $oStream $oStream = ObjCreate("ADODB.Stream") $oStream.Type = 2 $oStream.Open $oStream.LoadFromFile($FileName) $strData = $oStream.ReadText(-1) $oStream.close Return $strData EndFunc
举报
本版积分规则 发表回复 回帖后跳转到最后一页
|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度
GMT+8, 2024-12-25 14:44 , Processed in 0.072208 second(s), 24 queries .
Powered by Discuz! X3.5 Licensed
© 2001-2024 Discuz! Team.