طريقة اسم مستخدم وكلمة مرور بأبسط شكل ..

انت ممكن تعمل حاجه بسيطه جدا زى كده بس طبعا درجه الامان قليله جدا فى الصفحه

اقتباس

Imports System.Data.SqlClient

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

Dim cn As New SqlConnection

Dim cmd As New SqlCommand

Dim ds As New Data.DataSet

Dim xxx As String

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

------------------- Button1_Click --------------------------------------

cn.ConnectionString = "Password=sa;Persist Security Info=True;User ID=sa;Initial Ctalog=Mta;Data aSource=F-4"

xxx = "SELECT * from firends_table where fir_name='" & TextBox1.Text & "' and password='" & TextBox2.Text & "'"

Dim adapt As New SqlDataAdapter(xxx, cn)

adapt.SelectCommand.Connection.Open()

adapt.Fill(ds, "katkoot")

If ds.Tables("katkoot").Rows.Count > 0 Then

DataGrid1.DataSource = ds.Tables("katkoot")

Page.DataBind()

DataGrid1.Visible = True

Else

TextBox1.Text = ""

TextBox2.Text = ""

Response.Write("there is no result")

DataGrid1.Visible = False

End If

يعنى و بدل Sql ب Imports System.Data.OleDb

و ممكن تضيف سيشن بسيط للصفحه الى بعد تسجيل الدخول

و بالنسبه للسوال الثانى على نموذج Login ممكن كل ما عليك هو R.Click -----> Convert to Template

و اكتب الاكواد عادى خالص بدون اى مشاكل

و اى استفسار انا موجود فى خدمتك ان شاء الله تعالى

و شكرا

اخوك / محمد طلعت

ألف شكر أخي الفاضل .. لكن هلا تفضلت بمزيد توضيح للأكواد ؟!

وهل يمكن الحصول على طريقة أبسط وأوضح ؟!

لأن عملي بدائي نوعاً ما ولا أريد أن أستخدم فيه طريقة متطورة ..