[Emam emam]

السلام عليكم
لو سمحتوا
عندي كومبو بوكس 
واقوم بتحميل جدول العملاء من قاعدة بيانات سيكوال 
علي حسب ال id فيظهر الترتيب بحسب ال id 
الامور تمشي تمام
ولكن اريد ان يظهر اسم عميل معين في الكومبوبوكس 
فقمت باضافة عمود في الداتا بيز من نوع boolean بحيث اني اضع علامة صح امام العميل اللي عاوزه يظهر افتراضي في الكمبوبوكس
دي الفكره ولكن عاوز كود لتنفيذها
وبارك الله فيكم

[ابراهيم ايبو]

السلام عليكم ورحمة الله وبركاته
اخي الكريم امام
كل ما في الامر ستعمل جملة Select على جدول اسماء العملاء  بشرط ان يكون عمود الشرط True

[Emam emam]

(11-03-22, 11:08 PM)ابراهيم ايبو كتب : السلام عليكم ورحمة الله وبركاته
اخي الكريم امام
كل ما في الامر ستعمل جملة Select على جدول اسماء العملاء  بشرط ان يكون عمود الشرط True

بارك الله فيك اخي ابراهيم علي اهتمامك
ولكن لو انا عملت select بشرط ان يكون true 
كده مش هيجيبلي غير عميل واحد 
لكن عذرا لو انا معرفتش اوضح سؤالي
انا عاوز يحمل لي كل العملاء في الكومبوبوكس بس الاسم الفتراضي اللي يكون مختاره الكومبوبوكس هو العميل اللي عليه علامة صح في الداتا بيز

[ابراهيم ايبو]

السلام عليكم 
اخي امام
يمكنك الاستعلام كما قلت لك سيجلب اسما واحدا كما انت تريد لانك ستحدد عميل واحد
الان لديك اسم العميل ضعه في متغير وبعدها استعلم عن كل الاسماء وعبئ الكومبو بداتاتابل اسم مختلف
ثم اجعل النص في الكومبو مثل ماهو موجود في المتغير

كود :

Dim dt2 As New DataTable
       da = New SqlDataAdapter("select Name from Table1 Where ColumChek = true", Cn)
       da.Fill(dt2)
       Dim AA As String = dt.Rows(0).Item(0)
       ' الان ستملا الكومبو بكل الاسماء
       ' جملة استعلام جديدة مع داتاتابل باسم اخر لتملا الكومبو
       comboAllName.text = AA

[Emam emam]

(11-03-22, 11:28 PM)ابراهيم ايبو كتب : السلام عليكم 
اخي امام
يمكنك الاستعلام كما قلت لك سيجلب اسما واحدا كما انت تريد لانك ستحدد عميل واحد
الان لديك اسم العميل ضعه في متغير وبعدها استعلم عن كل الاسماء وعبئ الكومبو بداتاتابل اسم مختلف
ثم اجعل النص في الكومبو مثل ماهو موجود في المتغير

كود :

Dim dt2 As New DataTable
       da = New SqlDataAdapter("select Name from Table1 Where ColumChek = true", Cn)
       da.Fill(dt2)
       Dim AA As String = dt.Rows(0).Item(0)
       ' الان ستملا الكومبو بكل الاسماء
       ' جملة استعلام جديدة مع داتاتابل باسم اخر لتملا الكومبو
       comboAllName.text = AA

لو امكن اخي الكود كاملا وبارك الله فيك
لانه لم يعمل معي
فقد تم تحميل البيانات بالكامل ولو يقوم باختيار العميل المطلوب

[ابراهيم ايبو]

السلام عليكم ورحمة الله وبركاته
تفضل اخي امام

[Emam emam]

(12-03-22, 12:26 AM)ابراهيم ايبو كتب : السلام عليكم ورحمة الله وبركاته
تفضل اخي امام

الف مليون شكر اخي ابراهيم
بارك الله فيك وجعله الله في ميزان حسناتكم

[ابراهيم ايبو]

الحمد لله والشكر لله

ولك اخي امام 

تكرم  ... اسمك على اسم جدي يسعدني ذلك

[Emam emam]

(12-03-22, 12:39 AM)ابراهيم ايبو كتب :

الحمد لله والشكر لله

ولك اخي امام 

تكرم  ... اسمك على اسم جدي يسعدني ذلك

ده شرف ليا ان اسمي يكون علي اسم جدك
زادك الله علما وبارك الله فيك

[مصمم هاوي]

(12-03-22, 12:26 AM)ابراهيم ايبو كتب : السلام عليكم ورحمة الله وبركاته
تفضل اخي امام

جعلك الله ذخرا وسندا وعونا لإخوانك في هذا المنتدى العزيز