用法
评论
建议
取 消
确 定
(defun file:read-stream (filename encoding / str stream) "读入指定编码的文件内容" "String" "(file:read-stream \"d:\\hzfile.txt\" \"utf-8\")" (setq stream (vlax-create-object "ADODB.Stream")) (vlax-put-property stream (quote type) 2) (vlax-put-property stream (quote charset) encoding) (vlax-invoke stream (quote open)) (vlax-invoke-method stream (quote loadfromfile) filename) (setq str (vlax-invoke-method stream (quote readtext) -1)) (vlax-invoke-method stream (quote close)) (vlax-release-object stream) str)
函数库使用说明
应用包
技术支持
统计信息
函数库规模: 665 个
函数库类别: 45 种
上传记录
刷新