الله يررضى عليكم أبغى كوود للكتابة أسم المستخدم والباسورد
بas p.net
ووفي حالة لم يكن المستخدم مسجل أبغى كوود للتسجيل المستخدم كماان بasp.net
وشووكرا
الله يررضى عليكم أبغى كوود للكتابة أسم المستخدم والباسورد
بas p.net
ووفي حالة لم يكن المستخدم مسجل أبغى كوود للتسجيل المستخدم كماان بasp.net
وشووكرا
اللهم أرزقني علما نافعا وعملا صالحا
يفترض أن لديك قاعدة بيانات وفيها جدول اسمه Users مكون من ID=Autonumber وحقل Password وحقل UserID
<%@ Page Language="VB" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.SqlClient" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<script runat="server">
Protected Sub btn_login_Click(ByVal sender As Object, ByVal e As System.EventArgs)
If Page.IsValid Then
Dim myaddress As String
Dim myconn As New SqlConnection
Dim mysql As String
Dim myrs As String
Dim mycount As SqlCommand
Dim mypassword As SqlCommand
Dim intusercount As Integer
Dim strpassword As String
mysql = "SELECT COUNT (*) FROM Users WHERE UserID='" & txt_username.Text & "'"
myrs = "SELECT Password FROM Users WHERE UserID='" & txt_username.Text & "'"
myconn.ConnectionString = ConfigurationManager.ConnectionStrings("MyConnectionString").ConnectionString
mycount = New SqlCommand(mysql, myconn)
mypassword = New SqlCommand(myrs, myconn)
myconn.Open()
intusercount = mycount.ExecuteScalar()
strpassword = mypassword.ExecuteScalar()
myconn.Close()
If intusercount > 0 Then
If strpassword = txt_pass.Text Then
Session("Login") = txt_username.Text
FormsAuthentication.RedirectFromLoginPage(txt_username.Text, True)
Else
lbl_msj.Text = "Invalid Password."
End If
Else
lbl_msj.Text = "Invalid username."
End If
End If
End Sub
</script>
<html xmlns="http://www.w3.org/1999/xhtml">
<head runat="server">
<title>.::Login::.</title>
<style type="text/css">
.style3
{
font-size: 10pt;
}
.style4
{
text-align: right;
}
</style>
</head>
<body style="text-align: center; background-color:#9D91A2 ">
<form id="form1" runat="server">
<div>
<br />
<table align="center">
<tr>
<td bgcolor="#0099cc" colspan="2" style="height: 12px">
<strong>
Login</strong></td>
</tr>
<tr>
<td bgcolor="lightgrey" style="width: 77px; height: 12px" align="left"
class="style3">
User Name
</td>
<td bgcolor="lightgrey" style="width: 124px; height: 12px; text-align: left">
<asp:TextBox ID="txt_username" runat="server" Width="100px"></asp:TextBox><asp:RequiredFieldValidator ID="RequiredFieldValidator1" runat="server"
ControlToValidate="txt_username" ErrorMessage="*"></asp:RequiredFieldValidator></td>
</tr>
<tr>
<td bgcolor="lightgrey" style="width: 77px" align="left" class="style3">
Password</td>
<td bgcolor="lightgrey" style="width: 124px; text-align: left">
<asp:TextBox ID="txt_pass" runat="server" TextMode="Password" Width="100px"></asp:TextBox><asp:RequiredFieldValidator ID="RequiredFieldValidator2" runat="server"
ControlToValidate="txt_pass" ErrorMessage="*"></asp:RequiredFieldValidator></td>
</tr>
<tr>
<td rowspan="3" style="width: 77px">
</td>
<td style="width: 124px; background-color:="#0099cc": left">
<asp:Button ID="btn_login" runat="server" Text="Login"
onclick="btn_login_Click" Width="58px" /></td>
</tr>
<tr>
<td style="width: 124px; text-align: left">
<asp:Label ID="lbl_msj" runat="server"></asp:Label></td>
</tr>
</table>
</div>
</form>
</body>
</html>تم تعديل هذه المشاركة بواسطة مبرمج القاعده في 24 مارس 2011 في 22:27
اللهم أطل عمري وأحسن عملي واختم بالشهادة أجلي
مشكووووووووووووووووووووووور أخووي الله يعطيك العااافية :) :) :) :) :) :) :)
اللهم أرزقني علما نافعا وعملا صالحا