الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

ما الخطأ فى هذه التعليمة ؟SQL

مغلق
بدأه كفاح في 8 فبراير 2006 · 10 رد · 877 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم اخوانى

اقوم بعمل بحث على اساس يكون مشروط ويكون للمستخدم حرية اختيار بحثة مثلا لو اردت ان اقوم باستعلام عن المنتجات التى بلغت حد طلب معين فيكون كود SQL كما يلى :

Select  *
from Prouduct
where Quantity  < 15
and ProductTypeName = "tool"

بمعنى اعطنى كل معلومات المنتجات التى هى اقل من 15 ومن النوع tool قمت بكاتبة التعليمة بطريقة البحث المعتادة وهذا هو الكود

"select * from  Product  where  Quantity " + FlatComboBox1.Text.Trim + "" + XpTextBox1.Text + "and ProductTypeName = " + FlatComboBox2.Text + ""

وبحصل على البيانات الموجودة فىFlatComboBox2 من جدول اخر ProductType لكن غير مؤثر لانى فقط اريد الحصول منة على الاسماء الاصناف التى سوف اعمل عليها البحث

اما بالنسبة FlatComboBox1 فهى تحتوى على بيانات المقارنة ( أكبر من و أصغر او يساوى) ومدخلة عن طريق Item

وهذا هو الكود كامل اين المشكلة هنا ؟؟؟

    Dim ConditionCriteria As Boolean = True
        Datasearch1.Clear()
        If XpTextBox1.Text <> "" Then
            Try
                Da_PROSUP_Search.SelectCommand.CommandText = "select * from  Product  where  Quantity " + FlatComboBox1.Text.Trim + "" + XpTextBox1.Text + "and ProductTypeName = " + FlatComboBox2.Text + ""
            Catch ex As Exception
                MessageBox.Show(ex.Message)
            End Try

            MessageBox.Show("هذا الرقم غير موجود", "خطأ", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
            ConditionCriteria = False
            XpTextBox1.Focus()
        End If
        If ConditionCriteria = True Then
            Da_PROSUP_Search.Fill(Datasearch1)
        End If
        Try
            Me.DataGrid1.PreferredColumnWidth = Me.DataGrid1.ClientSize.Width / 7
            Me.DataGrid1.DataSource = Datasearch1.Tables("Product")
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try

وشكرا لكم ,,,,,

تم تعديل هذه المشاركة بواسطة كفاح في 8 فبراير 2006 في 15:53

الفريق المصري للبرمجة

تحليل وتصميم برامج قواعد بيانات لاتصال بينا masry4u@hotmail.com

#2

أخي كفاح في السيكويل كويري يكون شكل السترينغ هكدا

'string'

فتكون الكويري علي الشكل الأتي:

Select  *
from Prouduct
where Quantity  < 15
and ProductTypeName = 'tool'

منارة التقنية

http://itechflare.com

 

برنامج إستخراج سندات القبض المجاني

للمزيد

#3

أخي كفاح في السيكويل كويري يكون شكل السترينغ هكدا

'string' ليست "string"

فتكون الكويري علي الشكل الأتي:

Select  *
from Prouduct
where Quantity  < 15
and ProductTypeName = 'tool'

منارة التقنية

http://itechflare.com

 

برنامج إستخراج سندات القبض المجاني

للمزيد

#4

شكرا اخى لكن ما اقصدة اين الخطا البرمجى بمعنى تحويل تلك التعليمة الى ادوات ؟

الفريق المصري للبرمجة

تحليل وتصميم برامج قواعد بيانات لاتصال بينا masry4u@hotmail.com

#5

شكرا اخى لكن ما اقصدة اين الخطا البرمجى بمعنى تحويل تلك التعليمة الى ادوات ؟ مع الاسف لم مازال يحدث فيها خطأ

الفريق المصري للبرمجة

تحليل وتصميم برامج قواعد بيانات لاتصال بينا masry4u@hotmail.com

#6

بسم الله الرحمن الرحيم

"select * from  Product  where  Quantity " & FlatComboBox1.Text.Trim & " " & XpTextBox1.Text & " and ProductTypeName = " & FlatComboBox2.Text

أخي حافظ على المسافات و يفضل إستخدام علامه & عن إستخدام علامه + في عمليات دمج النصوص

و أرجو أن يكون الخطأ فقط في المسافات بين الجمل

#7 
"select * from  Product  where  Quantity " & FlatComboBox1.Text.Trim & " " & XpTextBox1.Text & "   & "'"and ProductTypeName = '" & FlatComboBox2.Text 
[code]
the missing thing is the sigel cotaion (') in the last 
the sigel cotation thats around 'tool'

      
      

      
    

  

    
    

      
#8
        
        

      
شكرا لكم لقد قمت باستخدام بجميع النصائح لكن دون جدوى لا اعرف ما السبب ؟؟؟؟!!!!!!!!!

      
      

      
الفريق المصري للبرمجة
تحليل وتصميم برامج قواعد بيانات لاتصال بينا masry4u@hotmail.com

    

  

    
    

      
#9
        
        

      
السلام عليكم أخى كفاح 
اقتباس
وبحصل على البيانات الموجودة فىFlatComboBox2 من جدول اخر ProductType لكن غير مؤثر لانى فقط اريد الحصول منة على الاسماء الاصناف التى سوف اعمل عليها البحث
أخى هل جدول الProduct عمود ProductTypeName لأنك ذكرت أن نتيجة هذا العمود تأتى من جدول أخر ProductType
فيجب أن تكون هناك علاقة بين الجدولين حتى يستطيع أن يربط بينهم فمثلا أن يكون هناك عمود Productid  فى كل من الجدولين لكى يتم الربط بينهم وتكون جملة الselect 
Select  *
from Prouduct 
join ProductType 
on Product.Puoductid =  ProductType.Productid 
where Product.Quantity  < 15
and ProductType.ProductTypeName = 'tool'
وأكمل أنت باقى الcode الموجود فى الapplication تبعك  والله أعلم
أختك إنجى

      
      

      
يا حى يا قيوم برحمتك أستغيث اصلح لى شأنى كله ولا تكلنى إلى نفسى طرفة عين
اللهم أعنا على ذكرك وشكرك وحسن عبادتك
اللهم انك عفو كريم حليم تحب العفو فاعفو عنا
اللهم إنى أسألك رضاك والجنة وأعوذ بك من سخطك والنار
اللهم إرحمنا فوق الأرض وإرحمنا تحت الأرض وإرحمنا وإعتق رقابنا يوم العرض
اللهم لا تدع لنا ذنبًا إلا غفرته ولا همًا إلا فرجته ولا مريضًا ولا دينًا إلا قضيته ولا عيبا إلا سترته ولا حاجًا هى لك رضا إلا قضيتها
اللهم انى أسألك موجبات رحمتك وعزائم مغفرتك والسلامة من كل إثم والغنيمة من كل بر والفوز بالجنة و النجاة من النار اللهم أمين يا رب العالمين

    

  

    
    

      
#10
        
        

      
شكرا للآستجابة الاخت انجى  بالنسبة للكموبكوس يتم تحميل البيانات فية من جدول اخر لكن انا عملت حساب ذلك انا فقط اقوم بملئ الكمبوبوكس من جدول ProductType
اما فى جدول Product يوجد حقل يسمى  ProductTypeName وهو نص انا اقوم باضافة الى جدول Product  لتسيهل عمليات البحث ليس اكثر 
فانا اريد من هذا الاستعلام ان اقوم بعرض فئة معينة من المنتجات  بلغت حد معين من الكمية  وشكرا لللاستجابة واتمنى ان اجد حالا قريبا

      
      

      
الفريق المصري للبرمجة
تحليل وتصميم برامج قواعد بيانات لاتصال بينا masry4u@hotmail.com

    

  

    
    

      
#11
        
        

      
السلام عليكم 
إحتمال ان يكون الخطئ عندما تضع ال ProductTypeName
ProductTypeName='"&FlatComboBox2.Text &"' "

      
      

      
    

  

    
    
 هذا الموضوع مغلق.

    
 مواضيع مشابهة