أريد كود ال login وكود لل Insert بلغة ASP.NET

معقولة ما في أحد قدر يساعدني ..

تكفون ساعدوني.. ترى تكفى تهز الرجاجيل..

السلام عليكم.

أولا من أجل أي مبتدئ يقرأ عنوان الموضوع، ASP.NET ليست لغة بحد ذاتها، لكنها المنصة التي تتيح استخدام أي لغة من لغات Microsoft .NET Framework في بناء تطبيقات web تفاعلية تعمل على الـ Server side. طبعا هذا غير كافي، لكن يمكن معرفة المزيد بالبحث في المنتدى العامر بمواضيح تشرح كل مصطلح مما ذكرته.

أما بالنسبة لكِ أخت سلمى (إذا لم تخني فراستي)، فقد علمت من مشاركاتك التي سبق لي قراءتها كم أنت متعجلة و ما إلى ذلك، لكن (كما و لابد أنكِ لاحظتِِ) هنا لا أحد يعطي إجابات كاملة على أسئلة عامة يفترض أن يكون السائل قد بذل جهدا فيها قبل السؤال دون أن نرى أي شئ يدل على جهده هذا.أنا نفسي لولا أنني رأيت نماذج من محاولاتك في المشاركت السابقة لقلت أنك تريدين كود جاهز دون محاولة أو تجربة منكِ (و هذا عموما غير ممكن تقنيا حتى، فلا أحد يعرف شكل قاعدة البيانات التي تستخدميها، بالإضافة إلى رفضه من حيث المبدأ طبعا)، و لكني عوضا عن ذلك سأطلب منك أن تضعي الكود الذي حاولتي فيه، حتى يتسنى لي أو لأي من الاخوة إرشادك لما ينقصه إن شاء الله.

السلام عليكم.

ياأختي أنا على إستعداد على تلبية طلبك لكن لابد من أمور لابد أن تعرفينها قبل كتابة مثل هذا الكود مثل التعامل مع ال web.confg وكذلك الADO.Net وجمل الSQL على العموم أنا سأضع درس كامل عن التعامل مع الlogin في النسخة الجديدة من الدوت نت 2005 .

السلام عليكم.

للأسف هي لا تعمل بـ 2005، :(

و إلا لكنت أرشدتها للكثير من الدروس المقدمة في هذا الجزء، فقد تم قتله بحثاّ في مقالات بل و دروس video أيضا، و حتى في المؤتمرات تجد session أو اثنين حوله!

مثلا أخبرني برأيك في هذه القائمة و بخاصة هذا المقال، و هذا المقال المبسط

طبعا هذا بالإضافة إلى الـ Quickstarts

و لنفس السبب أنصحك ألا تبدد جهدك في الكتابة حول هذا الموضوع، هناك العديد من الخصائص الأخرى القوية في ASP.NET 2.0 التي لم تتم تغطيتها بنفس القدر، و يمكنك اختيار ما يناسبك منها.

بالمناسبة، هذا أجمل درس Video رأيته عن الـ Security في ASP.NET 2.0، و هناك المزيد.

السلام عليكم.

أشكركم كثيرا أخوي محمد وأخوي FBTC_Devloper على تفاعلكم معي أنا أستخدم قاعدة البيانات SQL SERVER 2000 مع

2003 VB.NET ..

كود الـ login الذي استخدمته هو :

        Dim strPath As String
        strPath = Server.MapPath(Request.ApplicationPath) & "\" & txtUserName.Text
        If Directory.Exists(strPath) Then
            Session("Path") = strPath
            Server.Transfer("Register.aspx")
        Else
            litNoAccount.Text = ("<p>The Name " & txtUserName.Text & " wasnt found." & "Check the name, or click <A href='NewAccont.aspx'>here</A>" & "if you areba new user.</p>")
        End If

ولكنه يعمل عندما لا أدخل شيْ في ال User Name و Password

وإذا دخلت بأي اسم آخر لا يعمل.. فأرجو منك أن تعدل عليه أخوي أحمد أو أي واحد يستطيع التعديل عليه أن يعدل عليه مشكورا، بحيث إذا دخل ِUser Name صح ودخل ال Password خطأ يطلع Error بأن ال Password خاطئة

إذا دخل Password صح و دخل ال ِUser Name خطأ يطلع Error بأن ال ِUser Name خاطئة

إذا دخل Password وال ِUser Name خطأ يطلع Error بأن ال Password و ِUser Name خطأ

و إذا لم يدخل شيْ يطلب منه أن يدخل ِUser Name و Password

علما بأن ِUser Name و Password يقارنهم بقاعدة البيانات في جدول الUser ..

كود الـ insert الذي استخدمته هو :

        Dim Connection As New SqlClient.SqlConnection

        Dim strConnectionString As String = "Server=SALMA-H1STH3TGR;DataBase=CASFSU;Trusted_Connection=True"
        Connection.ConnectionString = strConnectionString

        Dim sql_statment As String

        If Me.txtSTD_ID1.Text = "" Then
            MsgBox("Some fields lefted empty!!", MsgBoxStyle.Exclamation)
        Else
            ASTD_ID = Val(Me.txtSTD_ID1.Text)
            AFirst_Name = CStr(Me.txtFirst_Name1.Text)
            AMid_Name = CStr(Me.txtMid_Name.Text)
            ALast_Name = CStr(Me.txtLast_Name.Text)
            ADate_Of_Birth = CDate(Me.DTP_DateOfBirth.SelectedDate)
            'ANationality_Value = Nationality_Value
            'ASex_Value=Sex_Value
            ASection_name = Me.CB_Section1.SelectedValue

            Dim cmdSection As New SqlCommand
            cmdSection.CommandText = "select Section_ID from Section where Section_name='" & ASection_name & "';"
            cmdSection.Connection = Connection


            'to define the sql to retrive Section_ID that is chosen

            If Connection.State = ConnectionState.Closed Then
                Connection.Open()
            End If

            Dim ASection_ID_Value As Integer
            Dim drGetSection As SqlDataReader = cmdSection.ExecuteReader
            drGetSection.Read()
            ASection_ID_Value = drGetSection("Section_ID")
            drGetSection.Close()
            Connection.Close()

            '-----------------------------------------------------

            ACity_ID_Value = Val(Me.CB_City1.SelectedValue)
            AStudent_Email = CStr(Me.txtEmail.Text)
            AStudent_Mob = Val(Me.txtStudent_Mob.Text)
            AStudent_Address = CStr(Me.txtStudent_Address.Text)

            'AUser_Name = CStr(Me.txtStudentUserName.Text)
            'APassword = CStr(Me.txtStudentPass.Text)
            APercentage = Val(Me.txtPercentage1.Text)
            ASkills = Val(Me.txtSkillsTest1.Text)
            ACompound_Percentage = Val((APercentage * 0.7) + (ASkills * 0.3))

            'MsgBox("APercentage=" & APercentage)
            'MsgBox("ASkills=" & ASkills)
            'MsgBox("ACompound_Percentage=" & ACompound_Percentage)

            ASponsor_Name = CStr(Me.txtSponsor_Name.Text)
            ASponsor_Address = CStr(Me.txtSponsorAddress.Text)
            ASponsor_Email = CStr(Me.txtSponsor_Email.Text)
            ASponsor_Mob = Val(Me.txtSponsorMobile.Text)
            ASponsor_Fax = Val(Me.txtSponsorFax.Text)


            sql_statment = "insert into student(STD_ID,First_Name,Mid_Name,Last_Name,Date_Of_Birth,Nationality,Sex,Section_ID,City,Student_Email,Student_Mob,Student_Address,User_Name,Password,Accepted,Percentage,Skills_Test,Compound_Percentage,Sponsor_Name,Sponsor_Address,Sponsor_Email,Sponsor_Mob,Sponsor_Fax)" & _
                " values(" & ASTD_ID & ",'" & AFirst_Name & "','" & AMid_Name & "','" & ALast_Name & "'," & ADate_Of_Birth & "," & Nationality_Value & "," & Sex_Value & "," & ASection_ID_Value & "," & ACity_ID_Value & ",'" & AStudent_Email & "'," & AStudent_Mob & ",'" & AStudent_Address & "','" & AUser_Name & "','" & APassword & "',0," & APercentage & "," & ASkills & "," & ACompound_Percentage & ",'" & ASponsor_Name & "','" & ASponsor_Address & "','" & ASponsor_Email & "'," & ASponsor_Mob & "," & ASponsor_Fax & "); "

            'sql_statment = "insert into student(STD_ID,First_Name,Mid_Name,Last_Name,Date_Of_Birth,Nationality,sex,Section_ID,City,Student_Email,Student_Mob,Student_Address,User_Name,Password,Accepted,Percentage,Skills_Test,Compound_Percentage,Accepted,Percentage)" & _
            '" values(" & ASTD_ID & ",'" & AFirst_Name & "','" & AMid_Name & "','" & ALast_Name & "'," & ADate_Of_Birth & "," & Nationality_Value & "," & Sex_Value & "," & ASection_ID_Value & "," & ACity_ID_Value & ",'" & AStudent_Email & "'," & AStudent_Mob & ",'" & AStudent_Address & "','" & AUser_Name & "','" & APassword & "',0," & APercentage & "); "



            Dim cmdStudent As New SqlCommand
            cmdStudent.CommandText = sql_statment
            cmdStudent.Connection = Connection

            If Connection.State = ConnectionState.Closed Then
                Connection.Open()
            End If

            cmdStudent.ExecuteNonQuery()

            Connection.Close()

            'to initialize the Global_Sex
            Global_Sex = Sex_Value
            Global_STD_ID = ASTD_ID
            Global_Section = ASection_ID_Value

            'Me.SB_Student.Text = "Data Saved Correctlly"

            'to load the next form
            Dim frmStudentApplicationAndQualification As New StudentApplicationAndQualifications
            Me.Response.Redirect("StudentApplicationAndQualifications.aspx")
        End If

ولكن أريد أن أسأل هل يوجد في ASP.NET أداة GroupBox أو Frame حتى إذا كان هناك اثنين RadioButton يختار أحدهم.. أو أداة تقوم مقامهم لأني لم أجد هذه الأدوات.. كما هو موجود في WindowsApplication..

وهل يوجد أداة مثل هذه الأداة DateTimePicker بحيث تطلع التقويم في شكل ComboBox و الطالب يختار منه التاريخ مثل ما هو موجود في WindowsApplication..

فأرجوا منكم الرد علي بسرعة لأني في عجلة من أمري وأنا على ثقة تامة أنكم لن تبخلوا علي.. فهذا ما عهدته فيكم..

وشكرررررررررررررررا..

السلام عليكم..

في أحد يقدر يساعدني ولا أفقد الأمل.. بس ردو علي قولوا إي أو لا..

السلام عليكم..

أخوي محمد أعتذر على إزعاجك.. ولكني أريد أن أسألك هل الكود الذي كتبته صحيح؟!

وهل يكفيك لكي تساعدني..

قليل من البحث تجدين الحل بدلا من انتظار الرد ،

سبق أن أضفت موضوع بعنوان مشروع (نظام تسجيل الدخول) كامل الكود المصدر

فيه بإذن الله ما تحتاجين

مع تغيير بسيط في اسم مستخدم قاعدة البيانات