folder 相关的软件列表

首页

用VBScript实现解压缩目录中的所有文件(Zip)

2020-02-16 标签:vbscript,实现,解压缩,目录,文件,zip,代码,如下,error,resume,next,dim,objfso,sourcepath,targetpath,function,getzipfile,path,file,folder

实现代码如下: On Error Resume Next Dim objFSO,sourcepath,targetpath Function GetZipFile(path) Dim file,folder,sfolder,subfolder,files If Not objFSO.FolderEx

首页

使用脚本自动压缩指定目标下的所有文件的代码

2020-02-16 标签:使用,脚本,自动,压缩,指定,目标,下的,文件,代码,解决,这类,问题,我使,visual,basic,scripting,设计,达到,避免

为了解决这类问题,我使用Visual Basic Scripting设计了一个脚本,可以自动达到这个目标。在本脚本中,自动压缩所有文件。为了避免将脚本自己也压缩进去,使用了一些判断。 实现代码如下: call main() Sub main() Dim fs '文件系统。 Dim f 'folder

首页

使用JS进行目录上传(相当于批量上传)

2020-02-16 标签:使用,js,进行,目录,上传,相当于,批量,实现,代码,如下,doctype,html,public,w,c,dtd,xhtml

实现代码如下: 测试文件上传 $(function(){ //ShowFolderFileList("D:\\CodeNet\\web\\Images\\shopTemplets"); }); function ShowFolderFileList(FilePath){ var fso,

首页

vbs下用Shell.Application获取图片分辨率

2020-02-16 标签:vbs,shell,application,获取,图片,分辨率,简单,google,未果,发邮件,请教,很快,就有,回复,实现,代码,如下,path,c,test

简单Google了一下,未果,于是发邮件请教了一下,很快就有了回复。 实现代码如下: Path = "C:\test.jpg" arr = Split(Path,"\") FileName = arr(Ubound(arr)) FolderPath = Left(Path, Len(Path) -

首页

css js 图片压缩批处理命令(基于YUI Compressor)

2020-02-16 标签:css,js,图片,压缩,批处理,命令,基于,yui,compressor,实现,代码,如下,echo,off,设置,启动,目录,set,yuifolder,d

实现代码如下: @echo off ::设置YUI Compressor启动目录 SET YUIFOLDER=D:\yuicompressor-2.4.2\build\ ::设置你的JS和CSS根目录,脚本会自动按树层次查找和压缩所有的JS和CSS SET INFOLDER=D:\jscss\src

在文件夹右键菜单中添加“进入DOS”命令的方法
首页

在文件夹右键菜单中添加“进入DOS”命令的方法

2020-02-16 标签:文件夹,右键,菜单,添加,进入,dos,命令,方法,就在,增加,快捷,选项,点击,直接,该文,目录,操作方法,方案

那么就在文件夹右键菜单中增加一个“进入DOS”的快捷选项吧。点击后直接进入DOS下该文件夹目录操作方法:方案A:1.打开注册表(regedit)2.找到下面的路径 HKEY_CLASSES_ROOT\Folder\shell3.新建 项:CmdPrompt并设置默认值: “进入DOS” (不带引号,

首页

php中随机显示图片的函数代码

2020-02-16 标签:php,随机,显示,图片,函数,代码,例如,博客,展示,实现,如下,filename,img,author,freemouse,web,www,cnphp,info

例如博客的展示窗 实现代码如下: * ***********************************************/ if($_GET['folder']){ $folder=$_GET['folder']; }else{ $folder='/images/'; } //存放图

首页

一段ASP单页显示文件夹下所有图片的代码

2020-02-16 标签:一段,asp,显示文件,夹下,图片,代码,实现,如下,dim,fso,objfolder,objfiles,filelist,set,server,scripting

实现代码如下: " End If Next '释放对象 Set objFolder=nothing Set fso=nothing '获取文件类型 Function getExt(str) getExt = Lcase(Right(str,Len(str)-InstrRev(str,"."))) E

首页

文件名修改的批处理

2020-02-16 标签:文件名,修改,批处理,实现,代码,如下,echo,off,setlocal,替换,去除,v,set,p,folder

实现代码如下:@echo off & setlocal enabledelayedexpansion echo -==文件名称替换(去除文件名中的_v2和_V3)==- echo. echo. set /p folder=请输入一个路径: for /r %folder% %%i in (*)