函数调用的时候参数传递出了问题，请高人指点！

yumeiren777 2003-10-16 09:32:47

<html>
<head>
<Script Language=VBScript>
Function isSame(val1,val2) '两次输入密码是否一致
msgbox "第一个参数为" & val1 & "第二个参数为" & val2
if val1=val2 then
isSame=true
else
msgbox "两个密码不一致，请重新输入！"
isSame=false
end if
end Function
</Script>
</head>
<body>
<%
password1=request.form("pwd1")
password2=request.form("pwd2")
%>
<Script Language=VBScript>
call isSame(password1,password2)
</Script>
</body>
</html>
另外要把isSame函数的返回值保留，可不可以将
call isSame(password1,password2)改为
result＝ isSame(password1,password2)

...全文

43 7 打赏收藏转发到动态举报

写回复

用AI写文章

7 条回复

切换为时间正序

请发表友善的回复…

发表回复

yumeiren777 2003-10-16

打赏
举报

为什么我的函数调用语句不能把参数传过去呀？究竟是什么原因

空闲独处 2003-10-16

打赏
举报

都说完了，我没得说了。

angelheavens 2003-10-16

打赏
举报

lovehwq21 2003-10-16

打赏
举报

或者把这些判断的写在客户端
a.asp
<html>
<head>
</head>
<body>
<form>
<input type="text" name="pwd1">
<input type="text" name="pwd2">
<input type="button" name="finish" onclick="submit1()">
</form>
</body>
</html>

<Script Language=VBScript>
Function submit1()
If isSame(document.all.pwd1.value,document.all.pwd2.value) = false Then
Exit Function
End If
document.all.form1.submit
End Function
Function isSame(val1,val2) '两次输入密码是否一致
msgbox "第一个参数为" & val1 & "第二个参数为" & val2
if val1=val2 then
isSame=true
else
msgbox "两个密码不一致，请重新输入！"
isSame=false
end if
end Function
</Script>

另外，要得到isSame函数的返回值，就按你说的那样做
result＝ isSame(password1,password2)

lovehwq21 2003-10-16

打赏
举报

这样改，改为全部在服务器端执行

<html>
<head>
<%
Function isSame(val1,val2) '两次输入密码是否一致
Response.Write "第一个参数为" & val1 & "第二个参数为" & val2
if val1=val2 then
isSame=true
else
Response.Write "两个密码不一致，请重新输入！"
isSame=false
end if
end Function
%>
</head>
<body>
<%
password1=request.form("pwd1")
password2=request.form("pwd2")
'调用函数判断
call isSame(password1,password2)
%>
</body>
</html>

pp4u 2003-10-16

打赏
举报

此处：
<Script Language=VBScript>
call isSame(password1,password2)
</Script>
改为：
<Script Language=VBScript>
call isSame(<%=password1%>,<%=password2%>)
</Script>

angelheavens 2003-10-16