📄 login.aspx
字号:
<%@ Page Language="VB" %>
<%@ Register TagPrefix="Banana" TagName="Header" Src="header.ascx" %>
<%@ Register TagPrefix="Banana" TagName="Menu" Src="menu.ascx" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>
<script runat="server">
Sub Login(obj As Object, e As EventArgs)
dim objUser as New BananaMobile.User
dim objBM as New BananaMobile.BananaMobile
dim intID as integer
intID = objUser.Login(tbUsername.Text, tbPassword.Text)
if intID <> 0 then
Session("UserID") = intID
'check if user has a cart
if not objBM.CartExists(intID) then
objBM.AddCart(intID)
end if
FormsAuthentication.RedirectFromLoginPage(intID, false)
else
lblMessage.Text = "<font color=red>That is not a valid login or password</font>"
end if
End Sub
</script>
<html><body background="images/banana_bg.gif">
<table height="100%" cellspacing=0 cellpadding=0 width="100%">
<Banana:Header runat="server"/>
<tr height="100%">
<Banana:Menu runat="server"/>
<td align=left valign="top" width=100% nowrap>
<table height="100%" align="left" cellspacing=0 cellpadding=0 width="100%">
<tr height="100%" valign="top">
<td nowrap>
<table cellspacing=0 cellpadding=0 width="100%">
<tr>
<td valign="top">
<br>
Please enter your username and password
to gain access to these secure features.
<p>
Or, if you are a new user, click
<a href="register.aspx">here</a> to
register and gain access to our site!<p>
<asp:Label id="lblMessage" runat="server" />
<form runat="server">
<table>
<tr>
<td width="75" rowspan="3">
</td>
<td width="50" valign="top">
<font face="arial">
Username:
</font>
</td>
<td width="50" valign="top">
<font face="arial">
<asp:Textbox id="tbUsername" runat="server" />
</font>
</td>
</tr>
<tr>
<td valign="top">
<font face="arial">
Password:
</font>
</td>
<td valign="top">
<font face="arial">
<asp:Textbox id="tbPassword" runat="server"
TextMode="password" /><p>
</font>
</td>
</tr>
<tr>
<td align="right" colspan="2">
<font face="arial">
<asp:Button id="btSubmit" runat="server"
OnClick="Login"
Text="Submit" />
</font>
</td>
</tr>
</table>
</form>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</body></html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -