代码搜索:Scripting
找到约 2,777 项符合「Scripting」的源代码
代码结果 2,777
www.eeworm.com/read/131795/14125806
dat vb_att17b.dat
语法
----
object.Files
object 总是一个 Folder 对象。
说明
----
下面的代码举例说明了 Files 属性的用法:
Sub ShowFileList(folderspec)
Dim fs, f, f1, fc, s
Set fs = CreateObject("Scripting.FileSystemObjec
www.eeworm.com/read/131795/14125842
dat vb_att8b.dat
语法
----
object.Count
object 总是“应用于”列表中某一项的名称。
说明
----
下面的代码举例说明了 Count 属性的使用方法:
Dim a, d, i '创建一些变量
Set d = CreateObject("Scripting.Dictionary")
d.Add "a", "Athens" '添
www.eeworm.com/read/131795/14125851
dat vb_att39b.dat
语法
----
object.SubFolders
object 总是一个 Folder 对象。
说明
----
下面的代码举例说明了 SubFolders 属性的用法:
Sub ShowFolderList(folderspec)
Dim fs, f, f1, s, sf
Set fs = CreateObject("Scripting.Fil
www.eeworm.com/read/131795/14125876
dat vb_att36b.dat
语法
----
object.ShortPath
object 总是一个 File 或 Folder 对象。
说明
----
下面的代码用一个 File 对象举例说明了 ShortName 属性的用法:
Sub ShowShortPath(filespec)
Dim fs, f, s
Set fs = CreateObject("Scripting
www.eeworm.com/read/131795/14125887
dat vb_att2b.dat
语法
----
object.AtEndOfStream
object 总是一个 TextStream 对象的名称。
说明
----
AtEndOfStream 属性仅应用于已打开供读取的 TextStream 文件;否则就会出错。
下面的代码举例说明了 AtEndOfStream 属性的用法:
Dim fs, a, retstring
Set fs = Cr
www.eeworm.com/read/124165/14592315
js commonobj.js
/*
commonObj.js
- creates instances of required objects
*/
var objNet = WScript.CreateObject("WScript.Network");
var objShell = WScript.CreateObject("WScript.Shell");
var objFSO =