CompareMode 属性 设置并返回在 Dictionary 对象中比较字符串关键字的比较模式。 object . CompareMode [ = compare] 参数 object 必选项。 Dictionary 对象的名称。 compare 可选项。如果提供此参数， compare 参数为数值，表示由函数如 StrComp 使用的比较模式。 设置 compare 参数设置如下: Constant Value Description

FileSystemObject 对象 提供对计算机文件系统的访问。 说明 以下代码举例说明如何使用 FileSystemObject 对象返回一个 TextStream 对象，此对象可以被读取或写入： Dim fso, MyFileSet fso = CreateObject(' Scripting.FileSystemObject ')Set MyFile = fso.CreateTextFile('c:\testfile.txt', True)MyFile.WriteLine('This

marr=20 selectcasetrue casemarr12 response.write'小于12' casemarr12 response.write'大于12' casemarr=12 response.write'==' endselect 还可以这样用 casemarr7andmarr12

Folder 对象 提供对文件夹所有属性的访问。 说明 以下代码举例说明如何获得 Folder 对象并查看它的属性： Function ShowDateCreated(folderspec) Dim fso, f, Set fso = CreateObject('Scripting.FileSystemObject') Set f = fso.GetFolder(folderspec) ShowDateCreated = f. DateCreatedEnd Function

Count 属性 返回一个集合或 Dictionary 对象包含的项目数。只读。 object . Count object 可以是“应用于”列表中列出的任何集合或对象的名称。 说明 以下代码举例说明如何使用 Count 属性： Function ShowKeys Dim a, d, i, s '' 创建一些变量。 Set d = CreateObject('Scripting.Dictionary') d.Add 'a', 'Athens' ''

问怎么用VBSCRIPT控制不让表单提交，感觉很好玩。我试着写了一段程序，竟然不能控制，气坏我了。于是搬出搜索引擎，一阵搜索，找到了答案 VBSCRIPT控制FORM Function form1_onSubmit() Msgbox '就不让你提交' form1_onSubmit = false End Function [Ctrl+A 全选 注:如需引入外部Js需刷新才能执行]

Folders 集合 包含在一个 Folder 对象中的所有 Folder 对象的集合。 说明 以下代码举例说明如何获得 Folders 集合并使用 For Each...Next 语句枚举集合成员： Function ShowFolderList(folderspec) Dim fso, f, f1, fc, s Set fso = CreateObject('Scripting.FileSystemObject') Set f = fso.GetFolder(folderspec) Se

DateCreated 属性 返回指定的文件或文件夹的创建日期和时间。只读。 object .DateCreated object 应为 File 或 Folder 对象的名称。 说明 以下代码举例说明如何使用 DateCreated 属性： Function ShowFileInfo(filespec) Dim fso, f Set fso = CreateObject('Scripting.FileSystemObject') Set f = fso.GetFile(filespec) S