注册 登录
编程论坛 ASP技术论坛

asp中如何将一个函数内的值传到另一个函数

jendy5566 发布于 2010-03-18 17:07, 709 次点击
asp中如何将一个函数内的值传到另一个函数中(以下为代码的一部分)
<%
FUNCTION checkid()
dim a11
   a11=0
  on error resume next
   connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("sfz.mdb")
     set conn=server.createobject("ADODB.CONNECTION")
     conn.open connstr
xian=request("xian")
lenx=len(xian)
if xian<>"" then

if not IsNumeric(left(xian,15)) and xian<>"" then
  a11=1
  response.write "<script>alert('请输入正确号码!');window.history.back();</script>"
end if
%>
<%
sub saveuser()
rs.open "select * from [user] where UserEmail='"&trim(request("useremail"))&"' or UserName='"&trim(request("username"))&"'or xian='"&trim(request("xian"))&"'",conn,1,1
if rs.recordcount>0 &a11=1 then
call usererr()
%>
我的问题是如何将checkid()中"a11"所得的值传给saveuser()  ??
谢谢了!!!!
3 回复
#2
jendy55662010-03-18 19:42
没人来??
#3
javaxingxing2010-03-18 20:04
你把 all放session里试试
   
#4
jendy55662010-03-18 21:12
谢谢,已经解决!!!把 dim a11 放到函数外面,使之变成一个全局变量
1