在本节描述的示例代码,提供真实的例子来示范在 FileSystemObject 对象模式中可用的许多功能。该代码显示了如何一起使用对象模式的所有功能,以及如何在您自己的代码中有效地使用这些功能。 ..
请注意,由于该代码是极一般的,所以要使该代码能够真正在您的机器上运行,可能需要一些其他代码和小小的变更。这些改变之所以必要,是因为在 Active Server Pages 和 Windows Scripting Host 之间,为输入和输出给用户采用了不同的方法。 特别注意:本站所有转载文章言论不代表本站观点,本站所提供的摄影照片,插画,设计作品,如需使用,请与原作者联系
要在 Active Server Pages 上运行该代码,则采取以下步骤: 。
创建一个标准的 Web 页,后缀名为 .asp。
把下面的示例代码复制到 <BODY>...</BODY> 标记之间的文件中。
把所有代码封装到 <%...%> 标记内。
把 Option Explicit 语句从当前位置移动到 HTML 页的最顶部,甚至在 <HTML> 开始标记前。
把 <%...%> 标记放置在 Option Explicit 语句周围,以保证它在服务器端运行。
把下面的代码添加到示例代码末尾:
Sub Print(x) Response.Write "<PRE><FONT face="宋体"" SIZE=""1"">" Response.Write x Response.Write "</FONT></PRE>" End Sub Main
前面的代码增加一个将在服务器端运行,但在客户端显示结果的打印过程。要在 Windows Scripting Host 上运行该代码,则把下面的代码添加到示例代码的末尾:
Sub Print(x) WScript.Echo x End Sub Main
下面就是示例代码: ..
以下为引用的内容:
-------------------------------------------------------------------------------- .. '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' Option Explicit ! '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' |
' 对于代码质量:
'
' 1) 下面的代码有许多字符串操作,用"&"运算符来把短字符串连接在一起。由于
' 字符串连接是费时的,所以这是一种低效率的写代码方法。无论如何,它是
' 一种非常好维护的写代码方法,并且在这儿使用了这种方法,因为该程序执行
' 大量的磁盘操作,而磁盘操作比连接字符串所需的内存操作要慢得多。
' 记住这是示范代码,而不是产品代码。
'
' 2) 使用了 "Option Explicit",因为访问声明过的变量,比访问未声明的变量要
' 稍微快一些。它还能阻止在代码中发生错误,例如,把 DriveTypeCDROM 误拼
' 成了 DriveTypeCDORM 。
'
' 3) 为了使代码更可读,该代码中没有错误处理。虽然采取了防范措施,来保证代码