lotusscript的一些createobject方法

项目中用到的一些lotusscript的createobject方法，标记下来，加深自己记忆 。

 

Set fso = createobject("Scripting.FileSystemObject")

创建文件系统对象

　　　　fso.FolderExists(folder)：判断文件夹是否存在

　　　　fso.CreateFolder(folder)：创建文件夹对象

　　　　fso.DeleteFile(folder + "\*.*", True)：清空文件夹下所有文件

　　　　fso.GetTempName()  ：得到一个临时文件夹的名称

 

 Set XMLFile = createobject("ADODB.Stream")

创建ado流对象
 　　　　XMLFile.Charset="utf-8"：修改字符编码
 　　　　Call XMLFile.Open()：打开这个对象
 　　　　Call XMLFile.WriteText(strXML)：写入字符
 　　　　Call XMLFile.SaveToFile(路径)：按路径保存文件
 　　　　Call XMLFile.Close()：关闭流对象释放内存

 

Set winRar = createobject("WScript.Shell") 

创建shell对象
　　　　cmd = |winrar a -ed | + filedest + | | + folder + | -r|：压缩文件shell语句 　　　　

　　　　Call winRar.run(cmd,1,True)：执行