منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] مشكلة فى زر Login الخاص بشاشة الدخول - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم قواعد البيانات (http://vb4arb.com/vb/forumdisplay.php?fid=40)
+--- قسم : قسم أسئلة قواعد البيانات تحت بيئة الـ.NET (http://vb4arb.com/vb/forumdisplay.php?fid=41)
+--- الموضوع : [VB.NET] مشكلة فى زر Login الخاص بشاشة الدخول (/showthread.php?tid=24982)

مشكلة فى زر Login الخاص بشاشة الدخول - Michael Maher - 15-05-18

ده الكود اللى استخدمته
 Private Sub LoginButton_Click(sender As Object, e As EventArgs) Handles LoginButton.Click
        Try
            Dim con As New SqlConnection("Data source=.;Initial Catalog=ChurchMembership;Integrated Security=True")

            If TextBoxUsername.Text = "" Then
                MsgBox("You Must Enter The Username", MsgBoxStyle.Exclamation, "Error")
            End If
            If TextBoxPassword.Text = "" Then
                MsgBox("You Must Enter The Password", MsgBoxStyle.Exclamation, "Error")
            End If
            Dim Str As String = "select * from Users where Username =" & TextBoxUsername.Text & "and Password=" & TextBoxPassword.Text & ""
            Dim da As New SqlDataAdapter(Str, Con)
            Dim ds As New DataSet
            da.Fill(ds)
            If ds.Tables(0).Rows.Count > 0 Then
                Me.Hide()
                MdiParent.Show()
            End If
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
    End Sub
وعند التنفيذ تظهر لى رسالة 
Incorrect syntax near 'Password'

RE: مشكلة فى زر Login الخاص بشاشة الدخول - Michael Maher - 17-05-18

28 lمشاهدة ومحدش عنده رد  Sad

RE: مشكلة فى زر Login الخاص بشاشة الدخول - سعود - 17-05-18

(17-05-18, 12:12 AM)Michael Maher كتب : 28 lمشاهدة ومحدش عنده رد  Sad

PHP كود :
Private Sub LoginButton_Click(sender As Object, e As EventArgs) Handles LoginButton.Click
        Try
            Dim con As New SqlConnection("Data source=.;Initial Catalog=ChurchMembership;Integrated Security=True")

            If TextBoxUsername.Text = "" Then
                MsgBox("You Must Enter The Username", MsgBoxStyle.Exclamation, "Error")
            End If
            If TextBoxPassword.Text = "" Then
                MsgBox("You Must Enter The Password", MsgBoxStyle.Exclamation, "Error")
            End If
            Dim Str As String = "select * from Users where Username =" & TextBoxUsername.Text & "and Password=" & TextBoxPassword.Text & ""
            Dim da As New SqlDataAdapter(Str, Con)
            Dim ds As New DataSet
            da.Fill(ds)
            If ds.Tables(0).Rows.Count > 0 Then
                Me.Hide()
                MdiParent.Show()
            End If
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
    End Sub 
ضع فراغ قبلand Password
PHP كود :
Username ='" & TextBoxUsername.Text & "' and Password=" 
للاستعلام عن نص استخدم علامات التنصيص المفردة '

RE: مشكلة فى زر Login الخاص بشاشة الدخول - Michael Maher - 17-05-18

شكرا لردك يا اخ سعود وكل عام وانت بخير  Smile

كتبت الكود وعند التنفيذ بيقولى 'invalid column name 'admin

RE: مشكلة فى زر Login الخاص بشاشة الدخول - عبد العزيز البسكري - 18-05-18

(17-05-18, 03:54 PM)Michael Maher كتب : شكرا لردك يا اخ سعود وكل عام وانت بخير  Smile

كتبت الكود وعند التنفيذ بيقولى 'invalid column name 'admin

المرسول واضح من عنوانه
راجع أخي الكريم أسماء الأعمدة لديك بقاعدة البيانات
تحياتي


RE: مشكلة فى زر Login الخاص بشاشة الدخول - سعود - 18-05-18

(17-05-18, 03:54 PM)Michael Maher كتب : شكرا لردك يا اخ سعود وكل عام وانت بخير  Smile

كتبت الكود وعند التنفيذ بيقولى 'invalid column name 'admin

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

RE: مشكلة فى زر Login الخاص بشاشة الدخول - Michael Maher - 18-05-18

شكرا لردكم 
انا عندى عمود باسم "Username" وعمود باسم "Password"
والقيم لكل منهم admin

[attachment=18072]