摘要：excelHandle.WorkBooks.Open excelArr(tmpIndex).ShortPath Set wbSegFile = excelHandle.ActiveWorkbook Set sheetSegFile = excelHandle.WorkSheets(1) 'Set wbSegFile = excelHandle.Workbooks.Open excelArr(tmpIndex).ShortPath 'Set sheetSegFile = wbSegFile.Sheets(1)就算之前设置过excelHandle.Visible = False 程 阅读全文

摘要：Option ExplicitDim objWMIService,colProcessList,strComputerstrComputer = "."Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")Set colProcessList = objWMIService.ExecQuery("Select * from Win32_Process 阅读全文

摘要：转自：http://www.jb51.net/article/14586.htmChr(0) 为0的字符Chr(1)Chr(2)Chr(3)Chr(4)Chr(5)Chr(6)Chr(7) 响铃Chr(8) 回格Chr(9) tab(水平制表符)Chr(10) 换行Chr(11) tab(垂直制表符)Chr(12) 换页Chr(13) 回车chr(13) &chr(10) 回车和换行的组合Chr(14)Chr(15)Chr(16)Chr(17)Chr(18)Chr(19)Chr(20)Chr(21)Chr(22)Chr(23)Chr(24)Chr(25)Chr(26) 结束EndChr 阅读全文

摘要：转自：http://nxhujiee.blog.163.com/blog/static/298444220100342611/当你打开vbsedit 时如果弹出对话框无法创建空文档” ，没关系,你可以在C盘下搜索“vbsedit” ,会发现在目录(Win XP): C:\Documents and Settings\Admin\Local Settings\Application Data\Adersoft C:\Documents and Settings\Admin\Application Data\Adersoft 有 vbsedit 文件夹。现在将他们删除,就可以了。最好,然后清理一下 阅读全文

摘要：要先安装 mysql-connector-odbc-5.1.8-win32.msi 20160918 odbc:mysql-connector-odbc-5.3.6-winx64.msi server 2008无法安装，去微软官网搜索 Microsoft Visual C++ 2010 SP1 Re 阅读全文

摘要：Option ExplicitDim strComputer,objWMIService,colProcessListstrComputer = "."Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")Set colProcessList = objWMIService.ExecQuery("Select * from Win32_Process 阅读全文

摘要：转自：http://www.cnitblog.com/ffan/archive/2005/08/12/1487.html1.函数array()　功能:创建一个数组变量　格式:array(list)　参数:list　为数组变量中的每个数值列,中间用逗号间隔　例子:　<%　i　=　array　(“1”,”2”,”3”)　%>　结果:　i　被赋予为数组　2.函数Cint()　功能:将一表达式/其它类型的变量转换成整数类型(int)　格式:Cint(expression)　参数:expression　是任何有效的表达式/其它类型的变量　例子:　<%　f　=　”234”　respons 阅读全文

摘要：OpenTextFile方法的具体使用方法： object.OpenTextFile(filename[, iomode[, create[, format]]])其中object代表FSO对象的名称；filename指明要创建的文件路径； iomode为可选参数，可用数字和详细模式指定，代表输入\输出模式常数值描述ForReading1以只读模式打开文件。不能对此文件进行写操作。ForWriting2以只写方式打开文件。不能对此文件进行读操作。ForAppending8打开文件并在文件末尾进行写操作。 create为可选，以布尔值表示文件不存在时是否创建文件，true为允许创建，false为 阅读全文

摘要：opentextfile 写不了，要用createtextfile 阅读全文

摘要：Dim strExcelFilePath,objDialog,tfileSet objDialog = CreateObject("UserAccounts.CommonDialog")objDialog.Filter = "Excel 2003|*.xls|Excel 2007|*.xlsx"objDialog.InitialDir = CreateObject( "WScript.Shell"... 阅读全文

摘要：轉自：http://www.chinazhan.net/onlinebook/vbscript/html/vsfctdatediff.htmDateDiff 函数返回两个日期之间的时间间隔。DateDiff(interval, date1, date2 [,firstdayofweek[, firstweekofyear]])DateDiff函数的语法有以下参数：参数interval必选项。Str... 阅读全文

摘要：Option Explicit '表示所有變量必須先聲明后使用Dim mssqlconnOn Error Resume NextSet mssqlconn = CreateObject("ADODB.Connection")' DataBaseName : tbabinxm' DbUserName : sa' DbPwd : abinxm mssqlconn.Open "Provider=SQLO... 阅读全文

摘要：一段WORD转PDF文件的代码,来源于网络,我自己写的转档程序也是按这个改的,好用!代码是google来的,感谢万能的google,哈哈~~~~~~[代码] 阅读全文