应用开发与实践第6章内置对象课案.pptVIP

【例6-41】 应用Server对象的ScriptTimeout属性来设置ASP脚本的超时时间，如果脚本在规定的时间内还没有执行完毕，将显示超时错误信息。代码如下： %@LANGUAGE=VBSCRIPT CODEPAGE=936% %server.ScriptTimeout=2 设置脚本的运行期限% html head meta http-equiv=Content-Type content=text/html; charset=gb2312 title无标题文档/title /head body % Response.Write 该页面运行的最长时间为server.ScriptTimeout秒。br 输出页面运行的最长时间是多少秒 % % Dim sun,ssml 定义变量 Randomize 初始化随机数生成器 Do Until ssml = vbno 当“否”按钮被单击时停止循环 sun = Int((6 * Rnd) + 1) 产生1～6之间的随机数 Loop % /body /html 实例的运行结果如图6-42所示。 图6-42 ScriptTimeout属性的应用 2．调用CreateObject方法创建服务器组件对象实例 CreateObject方法主要用于创建组件、应用对象或脚本对象的实例。 语