2020-02-16 标签:vb,n,et,读取,word,文档,属性,方法,实现,代码,如下,自定义,进行,dim,properties,sourcedoc,type,gettype

实现代码如下：'对自定义属性进行读取Dim Properties = SourceDoc.CustomDocumentPropertiesDim PropertyType As Type = Properties.GetTypeTryDim Authorprop = PropertyType.Inv

2020-02-16 标签:vs,n,et,2008,添加,模板,方法,author,email,163,com,function,create,update,time,d,program,files,microsoft,visual

/* ************************************************ author :author * email:.......@163.com * function: * create or update:$time$ * *******************

2020-02-16 标签:vs,2010,无法,打开,项目,文件,原因,分析,解决方法,使用,visual,studio,sp,出现,以下,提示,信息,报错

使用 Visual Studio 2010 SP1 打开项目文件的时候出现以下提示信息：报错的原因是 vs2010需要把mvc版本升到3，默认的vs2010的mvc是2vs2010 mvc3下载地址：http://www.microsoft.com/web/handlers/webpi.ashx?c

2020-02-16 标签:vbs,实现,系统,服务,备份,优化,代码,如下,option,explicit,const,true,生成,是否,添加,说明,结束,文件

实现代码如下：Option Explicit'○○○○○○○○○○○○○○○○○○○○○○○○○○○○○开始Const blnVBSShowCaption=True'生成的服务备份中是否添加说明Const blnVBSShowDescription=True'●●●●●●●●●●●●●●●●●●●●

2020-02-16 标签:vbs,指定,文件,添加,内容,函数,实现,代码,如下,写字,第三个,参数,是否,删除,原来,function,z,writefile

实现代码如下： '向指定的文件写字符串，第三个参数指定是否删除原来的内容 Function Z_WriteFile(sFileName, sText, bAppend) Dim fs, fso, iomode if bAppend = True Then iomode = 8 'ForAppendi

2020-02-16 标签:vbstree,vbs,脚本,模拟,tree,命令,实现,代码,如下,描述,输出,文件夹,目录,结构,const,unit,size,字节,kbmbgb

实现代码如下： '-------------vbsTree.vbs------------------------ '描述:用vbs输出一个文件夹的目录结构。 '------------------------------------------------ Const Unit4Size = "字

2020-02-16 标签:vbs,强制,关闭,symantec,endpoint,protection,代码,使用,脚本,随时,让它,歇下,也可以,继续,工作,前提,必须,本机,管理员

使用这个脚本，可以随时让它歇下来。当然也可以让它继续工作。前提是，你必须是本机管理员。这个脚本使用一各很过时的终止程序方法：ntsd.exe -c q -p ProcessID。所以以前有过一个bat版，之所以用VBS是因为效率高一点，而且没有太多的黑色窗口。主要思想是：循环终止程序+停止服务代码如