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
相关文档：
采集开始
第一步是分析要采集的页面。
使用浏览器打开要采集的页面（如:http://sports.sina.com.cn/k/2008-09-15/04593948756.shtml，你可以其他页面），打开后，点击右键，查源文件。
第二步，找到要采集的内容所在位置。
假如我要采集这个页面上的标题和内容所在的位置：
标题在<h1 id="artibodyTitle" st ......
本人的本本上是home版的XP，无法正常安装IIS，但是网上查到几篇博文，说是能安装IIS，于是按照上面的描述亲自试了一下。
其大致方法如下：
1、首先打开C盘Windows目录中inf目录下的sysoc.inf文件（可以在运行中直接输入“c:\windows\inf\sysoc.inf&rdqu ......
这段代码的功能是：将一个数组打乱顺序，显示出来，让每一次显示的顺序都不一样。
<%
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 ......
怎么用asp判断下面的信息这里我是看到动态网的.
FSO文件读写 √ Jmail发送邮件支持 ×
CDONTS发送邮件支� ......
<%
Do_Url = "http://"
'Do_Url = Do_Url&Request.ServerVariables("SERVER_NAME")&"/shownews.asp" 主目录
aa=Request.Servervariables("url") '虚拟目录
bb=InstrRev(aa,"/")
cc=left(aa,bb)
Do_Url = Do_Url&Request.ServerVariables("HTTP_HOST")&cc&"index.asp"
call SaveFile("index.h ......
