ممكن مساعدة كتابة كود ضرورييييييي

ولا رد لهسة بليييييييييز بحاجة الو هسة ضروري كتيرر

السلام عليكم ورحمه الله وبركاته

اختي العزيزة ده كود تسجيل الدخول

string Query = "Select * From Users Where Username = " + TxtUserName.Text + " and Password = " + TxtPassword.Text;
        SqlConnection Connection = new SqlConnection("ConnectionString");

        SqlCommand ObjCom = new SqlCommand();

        ObjCom.Connection = Connection;
        ObjCom.CommandType = CommandType.Text;
        ObjCom.CommandText = Query;

        Connection.Open();

        SqlDataReader Reader = ObjCom.ExecuteReader();

        if (Reader.Read())
        {
            Session.Add("ID", Reader["ID"].ToString());
            Session.Add("UserName", Reader["UserName"].ToString());
            Session.Timeout = 15;
            Response.Redirect("Default.aspx?Welcome=" + Reader["UserName"].ToString() + "Login=" + "True");

        }

        else
        {
            //  Show Error Message  As  You like
        }

        Connection.Close();

وده كود ال Validation اللي في الصفحه بتاعت الرسائل علشان مش اي حد يدخل الصفحة

if (Session["ID"] != null)
        {
            // Writting any thin as u like 
        }

        else
        {
            Response.Redirect("Login.aspx");
        }

والله اختي العزيزة لو بحثتي في المنتدي لوجدتي الكثير من المواضيع ارجو استخدام البحث اولا ثم كتابه المواضيع

و ارجو من المرفين متابعه المواضيع رجاءا

اخي احنا هون نستخدم vb والاكسس مش الsql وكمان انا بدي كود الرسائل المرسلة عشان اجيبهم من قاعدة البيانات وكمان الرسائل الواردة واللوج اوت

ال Logout

Session["ID"] = null;

التسجيل ب Vb

Dim Connection As New SqlConnection("ConnectionString")

Dim ObjCom As New SqlCommand()

ObjCom.Connection = Connection
ObjCom.CommandType = CommandType.Text
ObjCom.CommandText = Query

Connection.Open()

Dim Reader As SqlDataReader = ObjCom.ExecuteReader()

If Reader.Read() Then
	Session.Add("ID", Reader("ID").ToString())
	Session.Add("UserName", Reader("UserName").ToString())
	Session.Timeout = 15

	Response.Redirect("Default.aspx?Welcome=" & Reader("UserName").ToString() & "Login=" & "True")
Else
		'  Show Error Message  As  You like 

End If

Connection.Close()

اختي العزيزة ده اللي انا شايفه انه بيختلف حسب تحليلك داخل الداتابيز يعني بيختلف من شخص لاخر وممكن يتعمل بكذا طريقه ياريت تدينا فكرة عن تحليلك للداتابيز بتاعتك وان شاء الله اعملك الكود

ماشي هاد على sql انا مشتغلة ع الاكسس تاني اشي انا طلبت الكود اللي بدي اجيب الرسائل من قاعدة البيانات كمان وانو احذف كمان رسائل انت قرات منيح انا شو طالبة ويا ريت لو شفت البرنامج اللي عملتو

اخي بالنسبة للداتا بيز انا عملت المسجات بنفس القاعدة انا ما بدي يرسل بس بدي يجيبلي الرسائل الموجودة داخل قاعدة البيانات اللي محطوط عليها نعم هي الرسائل المرسلة واللي مش محطوط عليها نعم هي الرسائل الواردة افهمت علي

Imports System.Data

Imports System.Data.OleDb

Partial Class Default1

Inherits System.Web.UI.Page

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

dim con as new OleDbConnection ("provider=microsoft.jet.oledb.4.0;datasource" + server.MapPath ("~\app_data\db1.mdb")

con.open()

Dim cmd As New OleDbCommand()

cmd.CommandText = "select*from users"

cmd.Connection = con

Dim rdr As OleDbDataReader

rdr = cmd.ExecuteReader()

If rdr.Read() Then

Session.Add("password", rdr("password").ToString())

Session.Add("name", rdr("name").ToString())

Response.Redirect("Default.aspx?Welcome=" & rdr("name").ToString() & "Login=" & "True")

Else

End If

con.close()

End Sub

End Class

ممكن احد يشوفلي اذا هاد الكود صح او خطا

سبحان الله ولا اله الا الله اختي العزيزة جربي الكود وشوفي الخطا ايه وقولي الخطا

جربيه وهيشتغل معاكي

مش فاهمة بحكيلي انو في خلط بين الفيجوال بيسك والc#

شو اخي شو صار