%'服务器超时设置Response.Buffer = FalseServer.ScriptTimeOut = 9999' 错误处理On error Resume next% html head title ::. 硬盘目录罗列脚本 .:: /title meta http-equiv=Content-Type content= text/html; charset=GB2312 / STYLE type=text/css Body FONT-SIZE: 12px; FONT-FAMILY: Ve

/>FileSystemObject 对象模型 在为 Active Server Pages、Windows Scripting Host、或其他可以使用 scripting 的应用程序写脚本时，在 Web 服务器上添加、移动、改变、创建或删除文件夹（目录）和文件通常是很重要的。获得有关信息和操作连接在 Web 服务器上的驱动器也可能是必要的。 /> FileSystemObject 对象 FileSystemO

很好用的一个基本的无组件上传的类 首先是class文件 upclass.inc % '---------------------------------------------------------------------- '******************* 无组件上传类 ******************************** '类属性包括 '文件属性：例如上传文件为c:\myfile\doc.txt 'FileName 文件名 字符串 doc.txt 'FileSize 文

本程序检查当前目录下是否存在指定的文件，如果存在就重新命名 % function JudgeFileExit(strFileName) Dim objFSO,objFile,objFJ Dim strFilePath Dim blFJ Dim intFlag intFlag=0 set objFSO=CreateObject(Scripting.FileSystemObject) strFilePath=server.MapPath(./) if right(strFilePath,1)/ or

下面的程序，使用fso组件，实现文件改名。 fso组件不提供简单的文件改名的方法，但是可以利用另存为这个功能来实现。 ＜% @LANGUAGE = VBSCRIPT %＞ ＜%Option Explicit%＞ ＜% ''以下程序批量改名文件夹中的文件名，并将所有文件移动到新的文件夹； Response.Write ＜html＞ VbCrLf ＜head＞ VbCrLf Response.Write ＜titl

FSO组件的开启和关闭方法 Dll文件的注册和注销： win2000系统： 在CMD命令行状态输入以下命令： 关闭命令：RegSvr32 /u C:\WINNT\SYSTEM32\scrrun.dll 打开命令：RegSvr32 C:\WINNT\SYSTEM32\scrrun.dll win2003： 运行regsvr32 scrrun.dll即可。 如果想关闭FSO组件，请运行 regsvr32 /u scrrun.dll即可。

由于该组件和文件操作很很多关系，所以规类到fso里面讨论。 组件：Adodb.Stream 有下列方法： Cancel 方法 　 使用方法如下 　 Object.Cancel 　 说明：取消执行挂起的异步 Execute 或 Open 方法的调用。 Close 方法 　 使用方法如下 　 Object.Close 　 说明：关闭对像 CopyTo 方法 　 使用方法如下 　 Object.CopyTo(dest

Dim fso Set fso = CreateObject(Scripting.FileSystemObject) fso.DeleteFile d:\xx.txt '删除文件函数 function sdDel(purl) on error resume next dim fso set fso=server.CreateObject(Scripting.FileSystemObject) fso.DeleteFile server.MapPath(purl),true set fso=not