与 objs 相关的软件列表

    首页

    vbs,hta中选择文件夹对话框实现代码

    2020-02-16 标签:vbs,hta,中选,文件夹,对话框,实现,代码,如下,error,resume,n,ext,function,const,computer,h,11,window

    实现代码如下：on error resume next SelectFolder function SelectFolder() Const MY_COMPUTER = &H11& Const WINDOW_HANDLE = 0 Const OPTIONS = 0 Set objSh

    首页

    asp 读取文件和保存文件函数代码

    2020-02-16 标签:asp,读取,文件,保存,函数,代码,function,byval,file,dim,objstream,rtext,array,set,server,adodb,stream

    '************************************* '读取文件 '************************************* Function LoadFromFile(ByVal File) Dim objStream Dim RText RText =

    自己写的一个定时关机或重启的vbs脚本
    VB

    自己写的一个定时关机或重启的vbs脚本

    2020-02-16 标签:写的,定时,关机,重启,vbs,脚本,dim,actionid,注销,actiontime,2006,13,42,30,时间,function

    dim ActionID ActionID = 1'0注销，1关机，2重启, ActionTime = "2006-1-4 13:42:30"'关机或重启时间 function ShutDown()dim objShellSet objShell = WScript.CreateObject("Ws

    首页

    javascript显示选择目录对话框的代码

    2020-02-16 标签:javascript,显示,选择,目录,对话框,代码,实现,如下,function,seldir,var,dir,objsrc,n,ew,shell,application

    实现代码如下：function seldir() //选择目录 { var Dir; var objSrc= new ActiveXObject("Shell.Application").BrowseForFolder(0,'Select the directory', 0, ''); if (ob

    用vbs判断系统补丁的脚本
    VB

    用vbs判断系统补丁的脚本

    2020-02-16 标签:vbs,判断,系统,补丁,脚本,set,objsession,microsoft,update,session,objsearcher,objresults,search,type,software,colupdates,updates,i

    Set objSession = CreateObject("Microsoft.Update.Session") Set objSearcher = objSession.CreateUpdateSearcher Set objResults = objSearcher.Search("Type=

    vbs复制文件的脚本
    首页

    vbs复制文件的脚本

    2020-02-16 标签:vbs,复制,文件,脚本,实现,代码,如下,c,sourcefile,windows,log,date,set,objshell,shell,application,objfolder

    实现代码如下：parentfolder = "c:\" sourcefile = "c:\windows\log.log" targetfolder = parentfolder & date & "\" set objshell = createobject("shell.appl

    首页

    文件备份vbs脚本

    2020-02-16 标签:文件,备份,vbs,脚本,objs,c,aaa,支持,unc,路径,objd,d,自行,修改,上面,set,objshell,scripting

    objs = "c:\aaa\*" '支持UNC路径 objd = "d:\aaa\" '请自行修改上面两个路径 Set objshell = CreateObject("Scripting.FileSystemObject") objshell.CopyFolder(Objs,objD) '当文件

    首页

    asp遍历目录及子目录的函数

    2020-02-16 标签:asp,遍历,目录,子目录,函数,language,vbscript,以及,下文,function,bianli,path,set,fso,server,scripting

    ---"Response.write Objfile.nameNextResponse.write ""Bianli(nowpath)'递归NextSet Objfolder=nothingSet Objsubfolders=nothingSet Fso=nothingEnd Function%&g

    首页

    BytesToBstr获取的源码转换为中文的代码

    2020-02-16 标签:bytestobstr,获取,源码,转换,为中,代码,函数,作用,参数,body,变量,cset,类型,function,dim,objstream,set,server

    '================================================== '函数名：BytesToBstr '作用：将获取的源码转换为中文 '参数：Body ------要转换的变量 '参数：Cset ------要转换的类型 '====================