Dreamweaver CS4 ASP教程-子过程

Posted by Ren Gang | Posted in Dreamweaver | Posted on 17-05-2010-05-2008

0


< %="子过程"=%>
< %
response.Write("
“)
textSub(1000)
sub testSub(textNumber)
dim i,sum
i=0
sum=0
while i< =textNumber
sum=sum+i
i=i+1
wend
response.Write(textNumber)
response.Write("1000以内所有整数的和为:")
response.Write(sum)
end sub
%>

VBScript do while loop 语句范例 | Dreamweaver CS4

Posted by Ren Gang | Posted in Dreamweaver | Posted on 14-05-2010-05-2008

0

VBScript do while loop 语句范例 | Dreamweaver CS4 来自任刚博客 http://blog.rengang.org

<%@LANGUAGE=”VBSCRIPT” CODEPAGE=”65001″%>
<!DOCTYPE html PUBLIC “-//W3C//DTD XHTML 1.0 Transitional//EN” “http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd”>
<html xmlns=”http://www.w3.org/1999/xhtml”>
<head>
<meta http-equiv=”Content-Type” content=”text/html; charset=utf-8″ />
<title><%=”VBScript do while loop 语句范例”%> | 任刚博客 blog.rengang.org</title>
</head>
<body>
<%
dim i,sum
i=0
sum=0
do while not i>1500
sum=sum+i
i=i+1
loop
response.Write(“2000以内所有整数和为:”)
response.Write(sum)
response.Write(“任刚的博客 – VBScript do while loop 语句范例”)
%>
</body>
</html>
结果:

2000以内所有整数和为:1125750


VBScript 运行错误代码大全

Posted by Ren Gang | Posted in Dreamweaver | Posted on 14-05-2010-05-2008

0

VBScript 脚本执行系统无法实施的操作,则会产生 VBScript 运行时错误。只有在运行脚本、为变量表达式赋值或
  分配内存时,才会产生 VBScript 运行时错误。


以下是65个运行时错误:
  错误编号 描述
  十进制 十六进制 说明
  5 800A0005 无效过程调用或参数
  6 800A0006 溢出
  7 800A0007 内存不足
  9 800A0009 下标越界
  10 800A000A 该数组为定长的或临时被锁定
  11 800A000B 被零除
  13 800A000D 类型不匹配
  14 800A000E 字符串空间溢出
  17 800A0011 无法执行请求的操作
  28 800A001C 堆栈溢出
  35 800A0023 未定义 Sub 或 Function
  48 800A0030 加载 DLL 错误
  51 800A0033 内部错误
  52 800A0034 坏文件名或数
  53 800A0035 文件未找到
  54 800A0036 坏文件模式
  55 800A0037 文件已经打开
  57 800A0039 设备I/O错误
  58 800A003A 文件已经存在
  61 800A003D 磁盘空间已满
  62 800A003E 输入超出文件尾
  67 800A0043 文件太多
  68 800A0044 设备不可用
  70 800A0046 权限禁用
  71 800A0047 磁盘未准备好
  74 800A004A 不能用不同的驱动器重新命名
  75 800A004B 路径/文件访问错误
  76 800A004C 路径未找到
  91 800A005B 未设置对象变量
  92 800A005C For 循环未初始化
  94 800A005E 非法使用 Null
  322 800A0142 不能建立所需临时文件
  424 800A01A8 需要对象
  429 800A01AD ActiveX 部件无法创建对象
  430 800A01AE 类不支持自动化
  432 800A01B0 在自动化操作中未找到文件名或类名
  438 800A01B6 对象不支持该属性或方法
  440 800A01B8 Automation错误
  445 800A01BD 对象不支持此操作
  446 800A01BE 对象不支持指定的参数
  447 800A01BF 对象不支持当前的区域设置
  448 800A01C0 未找到命名参数
  449 800A01C1 参数不可选
  450 800A01C2 错误的参数个数或无效的参数属性值
  451 800A01C3 对象不是一个集合
  453 800A01C5 指定的dll函数未找到
  455 800A01C7 代码源锁错误
  457 800A01C9 这个键已经是本集合的一个元素关联
  458 800A01CA 变量使用了一个 VBScript 中不支持的自动化(Automation)类型
  462 800A01CE 远程服务器不存在或不能访问
  481 800A01E1 无效图片
  500 800A01F4 变量未定义
  501 800A01F5 违法的分配
  502 800A01F6 脚本对象不安全
  503 800A01F7 对象不能安全初始化
  504 800A01F8 对象不能安全创建
  505 800A01F9 无效的或不合格的引用
  506 800A01FA 类未被定义
  507 800A01FB 发生异常
  5016 800A1398 需要正则表达式对象
  5017 800A1399 正则表达式中的语法错误
  5018 800A139A 错误的数量词
  5019 800A139B 在正则表达式中需要 ‘]’
  5020 800A139C 在正则表达式中需要 ‘)’
  5021 800A139D 字符集越界
  32811 800A802B 元素未找到