asp引用参数的疑惑(ByRef)

[sdts]

<%
Sub Tran(ByRef sql)
'将sql语句定义为事务
sql="set xact_abort on"& _
" begin tran"& _
" "&sql& _
" commit tran"& _
" set xact_abort off"
END Sub
Dim sql
sql="select * from a"
Response.Write sql
Response.Write "<br><br>"
Tran(sql)
Response.Write sql
%>

这段代码先后两个sql输出的是一样的,可是有声明Dim sql 又是ByRef调用,Tran(ByRef sql)后sql的值应该改变才对?帮忙解释一下 谢谢!

[尚和空四]

sf

[HITS]

ByVal是传递值 源数据不会被修改
你可以把这个值当作自己的局部变量来使用

ByRef是传递地址 ， 源数据可能被修改
你对这个变量的操作将对你传入的那个变量产生影响，就像指针的感觉

具体事例找一下星魂的帖子

[是是非非]

<%
Sub Tran(ByRef sql)
'将sql语句定义为事务
sql="set xact_abort on" & _
" begin tran" & _
" " & sql & _
" commit tran " & _
" set xact_abort off"
END Sub
Dim sql
sql="select * from a"
Response.Write sql
Response.Write "<br><br>"
Tran sql
Response.Write sql
%>

把调用 Tran 过程的括号去掉就可以了