ASP中ByVal与ByRef的区别
废话不多说，贴代码：
先来看看ByVal传值：
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
Dim arr(2)
arr(0) = 0
arr(1) = 1
arr(2) = 2
Call sub1(arr)
Sub sub1(ByVal a)
a(0) = 9
a(1) = 8
a(2) = 7
Response.Write("我在sub过程中更改了值："&a(0)&","&a(1)&","&a(2))
End Sub
Response.Write("在sub过程外输出值："&arr(0)&","&arr(1)&","&arr(2))
%>
下面是输出结果：
我在sub过程中更改了值：9,8,7在sub过程外输出值：0,1,2
再来看看ByRef传值：
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
Dim arr(2)
arr(0) = 0
arr(1) = 1
arr(2) = 2
Call sub1(arr)
Sub sub1(ByRef a)
a(0) = 9
a(1) = 8
a(2) = 7
Response.Write("我在sub过程中更改了值："&a(0)&","&a(1)&","&a(2))
End Sub
Response.Write("在sub过程外输出值："&arr(0)&","&arr(1)&","&arr(2))
%>
下面是输出结果：
我在sub过程中更改了值：9,8,7在sub过程外输出值：9,8,7
下面我们来看看asp默认是以什么方式传值的
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
Dim arr(2)
arr(0) = 0
arr(1) = 1
arr(2) = 2
Call sub1(arr)
Sub sub1(ByRef a)
a(0) = 9
a(1) = 8
a(2) = 7
Response.Write("我在sub过程中更改了值："&a(0)&","&a(1)&","&a(2))
End Sub
Response.Write("在sub过程外输出值："&arr(0)&","&arr(1)&","&arr(2))
%>
输出结果：
我在sub过程中更改了值：9,8,7在sub过程外输出值：9,8,7
这说明在vbscript中默认的传值方式是ByRef
相关文档：
本人的本本上是home版的XP，无法正常安装IIS，但是网上查到几篇博文，说是能安装IIS，于是按照上面的描述亲自试了一下。
其大致方法如下：
1、首先打开C盘Windows目录中inf目录下的sysoc.inf文件（可以在运行中直接输入“c:\windows\inf\sysoc.inf&rdqu ......
软件名称：风渡科技ASP网上购物系统 v0912-26
软件大小：7069k
运行环境：ASP/Access
软件类别：电子商务
软件授权：免费
开发商家: 风渡科技
官方网站：http://www.chinammc.com
演示地址：http://demo01.chinammc.com
下载地址: http://w ......
今天同学装了一个xampp.来使用FTP和Mysql. 但是他是使用ASP.net来进行网页开发的,然后又不想另外装IIS,叫我帮他弄. 上网Google一下,发现国外有人发过教程了,不过是英文的.整理了一下和自己配置完成的心得重新发出来. 首先,你要上xampp的官网上下载安装xampp,安装过程官网有详细的说明. 安装完成后,确定你的xampp能成功� ......
这段代码的功能是：将一个数组打乱顺序，显示出来，让每一次显示的顺序都不一样。
<%
Dim tt
tt=Split("1,2,3,4,5,6",",")
'随机排序
leng=UBound(tt)
randomize
for ii=0 to leng-1
b=int(rnd()*leng)
temp=tt(b)
tt(b ......
最近估计很多人都碰到和我同样的问题，就是因为扫黄及备案管理非常严，一个没备案直接关服务器，一个黄站直接封机房。现在网站所有域名必需通过备案，以前还松点。但我们服务器100多个，总不能一个一个检查吧，上网搜了下，有个程序稍合适，但导出的是网站域名站点名，我修改为导出域名列表，同时解决了导出一个站点绑定多� ......
