تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مشكلة فى الاستعلام
#1
السلام عليكم ورحمة الله وبركاته
اليوم كانت بدايتى مع sql server 2008
تم تسطيب البرنامج بنجاح وانشاء قاعدة بيانات

ذهبت للفيجول دوت نت انشأت مشروع جديد
اضافة كلاس وضعت فيه كود
كود :
Imports System.Data.SqlClient
Public Class Class1
    Public Shared sqlcon As New SqlConnection
End Class
اضافة مودل وضعت فيه هذا الكود
كود :
Module Module1

    Public Hima As New Class1

End Module


وفى حدث الفورم لود للبرنامج وضعت هذا الكود
كود :
Try
            Class1.sqlcon.ConnectionString = "data source=initial catalog=test;integrated security=true "
            MsgBox("تم الاتصال بنجاج", vbInformation, "تنبيه")
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try

تم الاتصال بنجاح وظهرت الرسالة

المشكلة الان فى الاستعلام
كتبت هذا الكود
كود :
Try
            Class1.sqlcon.ConnectionString = "data source=initial catalog=test;integrated security=true "
            Dim str As String = "select Userid,Userpassword from Users where userid=" & Txtnumber.Text & "  and Userpassword='" & txtpass.Text & "'"

            Dim sda As New SqlDataAdapter(str, Class1.sqlcon)

            Dim ds As New DataSet

            sda.Fill(ds)

            If ds.Tables(0).Rows.Count > 0 Then
                Me.Hide()
                frmmain.Show()
            Else
                MsgBox("هناك خطـ فى ادخال البيانات")
            End If
        Catch ex As Exception
            MsgBox(ex.Message)

        End Try

ظهرت لي هذه الرسالة

   
ارجو المساعدة العاجلة انا على وشك الاحباط
بعد عشرة 3 سنين مع الاكسس أول بدايتى مع السكول مشكلة فى الاستعلام حراااااااااامHuh
الرد }}}}
تم الشكر بواسطة:
#2
اخي العزيز قبل البدء بعملية ملئ الDataset بالبيانات يجب فتح الاتصال مع قاعدة البيانات بعد الانتهاء من عملية الملئ يجب غلق الاتصال

وارى انك لم تفتح الاتصال وقد ملئت الDatset!!!!!!!

يكون الكود هكذا:

PHP كود :
Try
            
Class1.sqlcon.ConnectionString "data source=initial catalog=test;integrated security=true "
            
Dim str As String "select Userid,Userpassword from Users where userid=" Txtnumber.Text "  and Userpassword='" txtpass.Text "'"

            
Dim sda As New SqlDataAdapter(strClass1.sqlcon)

            
Dim ds As New DataSet
Class1
.sqlcon.Open()
            
sda.Fill(ds)
Class1.sqlcon.Close()
            If 
ds.Tables(0).Rows.Count 0 Then
                Me
.Hide()
                
frmmain.Show()
            Else
                
MsgBox("هناك خطـ فى ادخال البيانات")
            
End If
        Catch 
ex As Exception
            MsgBox
(ex.Message)

        
End Try 

تحياتي
الرد }}}}
تم الشكر بواسطة: ali.alfoly


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مشكلة في تصميم قاعدة البيانات djelloul 2 36 06-12-16, 12:36 PM
آخر رد: djelloul
  [C#.NET] مشكلة في استعلام مابين تاريخين abdallah_alashwal 1 57 09-11-16, 12:04 PM
آخر رد: ممدوح
Sad [Acces2007] عاجل ارجو المساعدة لدي مشكلة مع برمجة زر البحث في الاكسس saimon 4 120 24-10-16, 07:54 PM
آخر رد: saimon
  مشكلة في حساب كمية السلع في المخزن djelloul 0 90 06-10-16, 02:15 PM
آخر رد: djelloul
  [Acces2003] المساعدة في كود لحذف البيانات من الاستعلام محمد خلف زكي 2 144 28-08-16, 11:24 AM
آخر رد: محمد خلف زكي
  مشكلة في ادخال قيمة موجودة في textbox نسيم 9 351 20-06-16, 04:23 PM
آخر رد: الوادي
  مشكلة الترقيم التلقائي للعمود الاول في الداتا جريد فيو kofa 31 730 18-06-16, 03:53 AM
آخر رد: khodor1985
Sad مشكلة عدم حفظ البيانات في قاعدة البيانات wrd 10 540 10-06-16, 10:20 PM
آخر رد: ابو ليلى
  مشكلة ربط قواعد البيانات للفورمات المختلفة ali jamal 0 158 07-06-16, 02:31 PM
آخر رد: ali jamal
  مشكلة في نقل قاعدة البيانات الى جهاز اخر Namer 5 288 02-06-16, 12:01 PM
آخر رد: Namer

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم