编程论坛 → ASP技术论坛

怎么调用function 函数

ab382717036 发布于 2011-03-31 16:42， 7710 次点击

怎么实现下面功能啊
a.asp页面
<html>
<body>
<form action="page.asp" method="post" name="form1">
<input name="UserName" type="text">
<input name="submit" type="button" value="检查用户">
<input name="submit" type="submit" value="提交">
</form>
</body>
</html>
当我点击检查用户时，会弹出一个页面如果用户名合法则提示成功，如果用户名含有非法字符则提示他用户名含有非法字符
检查用户是否非法，问一下怎么调用function函数（调用下面类里的function函数）
Class Che_class
public Function IsValidUserName(byVal UserName)

    on error resume next
    Dim i,c
    Dim VUserName
    IsValidUserName = True
    For i = 1 To Len(UserName)
        c = Lcase(Mid(UserName, i, 1))
        If InStr("$!<>?#^%@~`&*();:+='""　     ", c) > 0 Then
                IsValidUserName = False
                Exit Function
        End IF
    Next
    For Each VUserName in Register_UserName
        If UserName = VUserName Then
            IsValidUserName = False
            Exit For
        End If
    Next

    End Function
End Class

13 回复

#2

hams2011-03-31 16:54

=IsValidUserName(UserName)

#3

a7688419692011-03-31 17:02

什么意思不懂

#4

ab3827170362011-03-31 17:04

=IsValidUserName(UserName)
版主你这个写的是什么意思

#5

hams2011-03-31 17:08

不是调用么

#6

dzt00012011-03-31 17:14

在你的page.asp页面，加代码啊
if IsValidUserName(Request.Form("UserName"))=False then 提示用户名含非法字符

#7

ab3827170362011-03-31 18:22

我用了你的方法但是出现错误
Microsoft VBScript 运行时错误 (0x800A000D)
类型不匹配: 'IsValidUserName'
/test1/page.asp, 第 3 行
page。asp

<%
  if IsValidUserName(Request.Form("UserName"))=False then
  response.Write("提示用户名含非法字符")
  End if

%>

#8

ab3827170362011-03-31 18:32

我知道错哪里了少了一句话Set Qsite = New Che_class
if Qsite.IsValidUserName(Request.Form("UserName"))=False then
response.Write("提示用户名含非法字符")
End if

#9

ab3827170362011-03-31 18:33

但是我想用button这个按钮来实现这个功能呢

#10

dzt00012011-03-31 18:34

将这两行删除

Class Che_class
End Class

#11

dzt00012011-03-31 18:37

这是用的ASP在后台判断，你是不是想用JS在前台判断？

网上代码也有很多的哇，只要在表单提交前用JS验证就行了

#12

ab3827170362011-03-31 18:43

能不能在a.asp进行判断，就是点击检查用户就出现对话框，对话框里是显示它是否用了非法字符

#13

ab3827170362011-03-31 18:48

有一段代码是这样写的是什么意思
a.asp页面
function CheckUser()
    {
        if(!checkLength("UserName" , "用户名称" , 3 , 16 , "~!@#$%^&*+=\\\'\"\<\>"))
            return false;
        window.showModalDialog("Person_CheckUser.asp?UserName=" + RegForm.UserName.value ,"Person_CheckUser","");
    }
person_checkUser.asp 页面
If Qsite.IsValidUserName(UserName) = True Then
    response.write "温馨提醒：\n\n·用户名称只能是字母，数字或下划线"
End If
它在中间加了一个这样的页面（person_checkUser.asp 页面）

#14

hams2011-04-01 08:09

ASP就是后台的，JS才是前台的，你不能让后台做前台的工作。另外思路要先理清楚，到底是要知道怎么调用函数还是要知道怎么判断非法字符，如果是要用别人的一段代码，最后是找这段代码的使用说明。

1