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-11-16 05:39 , Processed in 0.076965 second(s), 23 queries .
Powered by Discuz! X3.5 Licensed
© 2001-2024 Discuz! Team.