CSDN博客

img musclecn

利用asp.net制作登录页面

发表于2003/9/19 0:02:00  2159人阅读

利用asp.net制作登录页面

                                                  create by 王明刚 2002-05-16

一般在一个系统里总会有一个登录页面,同时,登录页面的制作对于所有系统开发者来说,都是必经之路!

首先,我们先来看看这个登录页面里主要的功能是:

1.       验证用户输入的数据是否完整!

2.       验证用户输入的数据是否满足要求,比如:姓名是否是4-10位字符,密码是否是4-8位字符。

3.       同时在这个页面里还用到了asp.netPagelet(网页配件)。

现在,我们一起来看看具体是怎么制作这个页面的。

第一.   怎样验证用户输入的数据是否完整,这个做过asp的人都能理解。不同的是在asp.net里显示信息的话是用Label.text,表示这个Label将要显示的信息。

if userid="" and password=""then

  Label2.Text &= "请输入姓名和密码!"

exit sub

 

else

if userid=""then

  Label2.Text &= "请输入姓名!"

exit sub

 

else

if password=""then

  Label2.Text &= "请输入密码!"

exit sub

第二.验证用户输入的数据是否满足要求

在这里使用asp.netRegularexpressionvalidator控制元件,Regular Expression是一种功能强大的字符串定义规则,让我们直接来看个实例:如下图,表单中的〔姓名〕栏必须输入4-10个字符,而〔密码〕栏必须输入4-8个字符。

姓名:[a-zA-Z0-9]{4,10}

密码 [a-zA-Z0-9]{4,8}

有关以上定义的Regular Expression字符串,说明如下:

[]:用来定义可接受的字符,a-z表示小写的a-z都是可以接受的字符,A-Z也是,还有数字0-9都是可以接受的。

{}:用来定义必须输入的字符数,{410}表示至少含有4个字符,最多含有10个字符。

现在让我们来看看Regular Expression在网页中的布置方法:

<td>姓名:</td>

    <td><asp:TextBox id="Text1" runat="server"/>

    <asp:regularexpressionvalidator id="valid1" runat="server" controltovalidate="text1"

    validationexpression="[a-zA-Z0-9]{4,10}">

    (请输入4-10位字符)

    </asp:regularexpressionvalidator><p>

    </td>

  </tr>

  <tr>

    <td>密码:</td>

    <td><asp:TextBox id="Text2" TextMode="Password" runat="server"/>

     <asp:regularexpressionvalidator id="valid2" runat="server" controltovalidate="text2"

     validationexpression="[a-zA-Z0-9]{4,8}">

    (请输入4-8位字符)

</asp:regularexpressionvalidator><p>

一般Regular Expression它是放在要控制的表单元件后面。在网页中,E-mail,电话,地址是常见的输入栏,具体使用方法我们通过上面的例子可以举一反三。

第二.   同时在这个页面里还用到了asp.netPagelet(网页配件)。

Pagelet(网页配件)?何谓Pagelet(网页配件),说的通俗点的话,就想是圣诞树上的小挂件,

看页面的上面部分:

我的第一个Header

2002-4-30 14:49:32

 

和下面部分:


学习asp.net找我

这个就是两个Pagelet!我们来看看它是怎么制作的:

在这个登录页面的最上面的两行代码,表示在使用Pagelet之前,要先将其登录成为网页可以引用的控件,登录header.ascxfooter.ascx的标记如下

<%@ register tagprefix="wangmg" tagname="header" src="header.ascx" %>

<%@ register tagprefix="wangmg" tagname="footer" src="footer.ascx" %>

其中几个属性的设定如下:

Src: Pagelet来源文件。

Tagname: Pagelet类别名称,本例是headerfooter

TagPrefixPagelet类别前导名称,本例是:wangmg

   经过以上的设定之后,header.ascxfooter.ascx将成为网页可以引用的Pagelet,而Pagelet的类别名称是:“wangmg:Table”,定义了类别名称之后,在网页中布置控制元件的标记如下:

<wangmg:header id ="header1" runat="server" title="我的第一个Header"/>

除了必须利用<%@ register %>登录Pagelet之外,使用Pagelet的方法与使用asp.netweb控制元件的方法是完全相同的,也一样可以为Pagelet设定id,也一样要将runat属性设定成“server”。

接下去我们看看header.ascxfooter.ascx

header.ascx

<script language="vb" runat="server">

public title as string

sub page_load(sender as object,e as eventargs)

label1.text=title

label2.text=cstr(filedatetime(server.mappath(request.filepath)))

end sub

</script>

footer.ascx:

 

<a href="http://asp.6to23.com/musclecn" target="_top">

学习asp.net找我</a>

 

 

在这个页面里设定了title变量,然后在login.aspx页面里定义它的具体内容

<wangmg:header id ="header1" runat="server" title="我的第一个Header"/>

 

附:login.aspx

<%@ register tagprefix="wangmg" tagname="header" src="header.ascx" %>

<%@ register tagprefix="wangmg" tagname="footer" src="footer.ascx" %>

<%@ Import Namespace="System.Data" %>

<%@ Import Namespace="System.Data.OleDb" %>

 

<script language="VB" runat="server">

  sub IsLoginOK (Sender As Object, E As EventArgs)

   if page.isvalid then

  

      Dim Provider, SQL, ConnStr As String

      dim userid,password,isok as string

     

      userid=trim(text1.text)

      password=trim(text2.text)

  if userid="" and password=""then

  Label2.Text &= "请输入姓名和密码!"

exit sub

 

else

if userid=""then

  Label2.Text &= "请输入姓名!"

exit sub

 

else

if password=""then

  Label2.Text &= "请输入密码!"

exit sub

else

      Provider = "Microsoft.Jet.OLEDB.4.0;"

      ConnStr = "Provider=" & Provider & _

           "Data Source=" & Server.MapPath( "Sample.mdb" )

      Dim Conn As OleDbConnection = New OleDbConnection( ConnStr )

      Conn.Open()

      SQL = "Select * From Users Where UserID='" & UserID & _

            "' And Password='" & Password & "'"

 

      Dim Cmd As OleDbCommand

      Cmd = New OleDbCommand( SQL, Conn )

      Dim Adapter As OleDbDataAdapter = New OleDbDataAdapter

      Adapter.SelectCommand = Cmd

      Dim ds As DataSet = new DataSet()

      Adapter.Fill(ds, "Users")

      Dim dt As DataTable = ds.Tables("Users")

       If dt.Rows.Count > 0 Then

        isok=true

        dim i,m as integer

       i=0

       m=3

       Label1.Text &= "user: " & userid & "<br>"

       Label1.Text &= "password: " & password & "<br>"

       Label1.Text &= "登录成功" & "<br>"

       session("ok") = "" & dt.Rows(i).Item(m)  & "<br>"

       response.redirect ("first.aspx")

      Else

         isok=false

         Label1.Text &= "user: " & userid & "<br>"

         Label1.Text &= "password: " & password & "<br>"

       Label1.Text &= "登录失败" & "<br>"

      End If

      end if

       end if

       end if

  else

   exit sub

   end if  

End sub

</script>

<Html>

<title>我的登录页面</title>

<Body BgColor="White">

<wangmg:header id ="header1" runat="server" title="我的第一个Header"/>

<H3>登录页面<Hr></H3>

<form runat=server>

<Table BgColor="white" BorderColor="Black"

  Cellspacing="10">

  <tr>

    <td>姓名:</td>

    <td><asp:TextBox id="Text1" runat="server"/>

    <asp:regularexpressionvalidator id="valid1" runat="server" controltovalidate="text1"

    validationexpression="[a-zA-Z0-9]{4,10}">

    (请输入4-10位字符)

    </asp:regularexpressionvalidator><p>

    </td>

  </tr>

  <tr>

    <td>密码:</td>

    <td><asp:TextBox id="Text2" TextMode="Password" runat="server"/>

     <asp:regularexpressionvalidator id="valid2" runat="server" controltovalidate="text2"

     validationexpression="[a-zA-Z0-9]{4,8}">

    (请输入4-8位字符)

     </asp:regularexpressionvalidator><p>

    </td>

  </tr>

  <tr>

    <td></td>

    <td><asp:Button id="button1" Text="确定" runat="server" onclick="IsLoginOK"/></td>

  </tr>

</table>

</form>

<asp:Label id="Label1" runat="server"/>

<asp:Label id="Label2" runat="server"/>

<wangmg:footer id="footer1" runat="server"/>

</body>

</html>

Header.ascx

<script language="vb" runat="server">

public title as string

sub page_load(sender as object,e as eventargs)

label1.text=title

label2.text=cstr(filedatetime(server.mappath(request.filepath)))

end sub

</script>

<Table border="1" cellpadding="2" cellspacing="0"

       width="100%" bgcolor="#AAAADD">

  <tr>

    <td align="center"><font size="4">

       <B><asp:Label id="Label1" runat="server"/>

       </B></font>

    </td>

  </tr>

</Table>

 

<Div Align="right"><Address><Font Size="-1">

<asp:Label id="Label2" runat="server"/>

</Font></Address></Div>

</H2>

footer.ascx

<div align="right">

<hr>

<a href="http://asp.6to23.com/musclecn" target="_top">

学习asp.net找我</a>

</div>

 

这就是这个登录页面简单教程,因为对asp.net接触的时间并不长,所以难免有错误的地方,欢迎大家批评指正,有不明白的地方欢迎发邮件给我:musclecn@sina.com

 

                                        created by 王明刚(musclecn

 

                                        websize:www.musclecn.com

 

                                        E-mail:musclecn@vip.sina.com

 

                                        QQ:2085432

 

0 0

相关博文

我的热门文章

img
取 消
img