Rem : =========== 写入多行文本,会覆盖文件中已有的内容 Rem : =========== 文件必须存在 Rem : =========== text 中可以是单行,也可以是多行文本, Sub WriteText( file, text ) Dim f f = Trim( file ) If Right(f,1) = "/" Then f = Left(f,Len(f) -1 ) If fso.fileexists(f) = False Then Err.Raise vbObjectError+128, "
vbs脚本:WriteText
最新推荐文章于 2021-08-09 15:50:55 发布
该VBS子程序WriteText用于覆盖现有文件的内容并写入新的多行文本。它首先检查文件是否存在,然后打开文件进行写操作。如果在过程中遇到错误,将返回错误信息。
摘要由CSDN通过智能技术生成