请问.aspx叶面中怎么调用.vb文件中的函数？

[ykb]

Imports System.Data
Imports System.Data.SqlClient

Public Class login
Inherits System.Web.UI.Page
Protected WithEvents UserName As System.Web.UI.WebControls.TextBox
Protected WithEvents PassWord As System.Web.UI.WebControls.TextBox
Protected WithEvents lbTitle As System.Web.UI.WebControls.Label
Protected WithEvents Button2 As System.Web.UI.WebControls.Button
Protected WithEvents Message As System.Web.UI.WebControls.Label


Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'在此处放置初始化页的用户代码
End Sub


Public Function chkLogin()
If UserName.Text = "" Or PassWord.Text = "" Then
lbTitle.Text = "请输入用户明或密码！"
Else
lbTitle.Text = "登录成功！"
End If
End Function



End Class

----------------------------------------------------------
aspx中按button调用chkLogin该怎么写？

<asp:button text="确定" Onclick="chkLogin" runat="server" ID="Button2" />

[dayasky]

<script language="vbscript" src="../share/myvbscripts.vbs"></script>
然后就可以用它里面的方法了，同js

[ykb]

我这个.vb文件不是vbscript脚本
是跟login.aspx相对应得login.aspx.vb

[荣之梦]

<%@ Page Language="vb" AutoEventWireup="false" Codebehind="index.aspx.vb" Inherits="down.index" enableViewState="false" %>

[adminyao]

你可以在aspx里面点击按钮，也就是触发这个事件。
Private Sub Button2 _Click1(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click
End sub

然后把你的这个FUNCTION　COPY到这里面，你的意思好象是要判断输入框不能为空，可以用JS实现呀，也可以通过个个事件判断，然后给出提示。

[ykb]

TO:winter911(懒惰之王)
<%@ Page Language="vb" AutoEventWireup="false" Codebehind="login.aspx.vb" Inherits="hlpreg.login" enableViewState="false"%>
这样写还是报错
编译器错误信息: BC30408: 方法“Public Function chkLogin() As Object”没有与委托“Delegate Sub EventHandler(sender As Object, e As System.EventArgs)”相同的签名。

源错误:



行 27： <asp:Label id="lbTitle" style="Z-INDEX: 103; LEFT: 22px; POSITION: absolute; TOP: 139px" runat="server" Width="188px" Height="28px" ForeColor="Red"></asp:Label>
行 28： <asp:TextBox id="PassWord" style="Z-INDEX: 102; LEFT: 8px; POSITION: absolute; TOP: 42px" runat="server" MaxLength="20" TextMode="Password"></asp:TextBox>
行 29： <asp:button text="确定" Onclick="chkLogin" runat="server" ID="Button2" style="Z-INDEX: 105; LEFT: 28px; POSITION: absolute; TOP: 77px" /></FONT>
行 30： </form>
行 31： </body>

-----------------------------------------------------------------------------------

TO:adminyao(程序傻子)
我之所以分开写是想把程序跟叶面分开，在.vb的文件中还有一些操作数据库的函数