دخول

**rookan** · 24-08-14, 09:11 PM

السلام عليكم ورحمة الله وبركاتة
كل عام وانتم بخير
ابي كود ضروري الله يحفظكم عند اختياري رقم من الارقام داخل الكمبو بكس يعطيه اللون الاحمر أي(مشغول) وتكون بقية الارقام متاحه باللون الاخظر داخل الكمبو
دمتم بود مبرمجينا المحترفين والمبتدئين امثالي

**rookan** · 25-08-14, 09:15 AM

غريبة وين المحترفين ؟!!!

**abulayth** · 25-08-14, 10:59 AM

السلام عليكم

اليك هذا المثال المنقول للتحكم بالوان الكمبو كما تريد

يعطيك العافية

**rookan** · 25-08-14, 03:08 PM

هلابك اخوي abulayth
ومشكور يعطيك العافيه لكن ماعتقد ان هذا اللي ابي لو فيه اخر ؟ اذا امكن

**king2512010** · 25-08-14, 06:40 PM

الأخ / rookan

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

تنويه بسيط للبرنامج المرفق صورتة أعلاه .... لم تذكر فى قاعدة البيانات ان الشقة خالية او مسكنة ..!!!!! لذا يجب ادخال هذه المعلومة فى الداتا ، وعلى كلٍ سواء استخدمت كومبو بوكس او استخدمت اى شىء للبحث يجب ادراج هذه النقطة ..

ثانياً : مرفق مشروع صغير للبحث (ليس بالكومبو بوكس) بحث بواسطة تكست بوكس وعند البحث بكلمة خالية او مسكنة تحصل على تلوين مختلف لنتيجة البحث... هذا مع امكانية حصر عدد الشقق الملونة ، وايضا ترتيبهم حسب التسلسل من خلال الكومبو بوكس ..

مرفق مثال للبحث وهو منقول من النت ومعدل علشان عيونك ...

ارجو ان يفيدك ...

تحياتي ..

**rookan** · 25-08-14, 10:46 PM

king2512010 جعل اميمتك وابيك بالجنه ومن يقراء... وبارك الله فيك وفي اخوي abulayth ماقصرتو
اي موضح اللي ذكرت بالقاعدة الان ابجرب هذا زي ما تفضلت

جاري التحميل

**rookan** · 26-08-14, 12:34 AM

اخوي king2512010
عندي المشكلة الرساله هذي بس مادري كيف احلها؟ بعد ماركبت المطلوب

**rookan** · 26-08-14, 02:14 AM

هذا المتداد بالشكل هذا ونفس المشكلة
Connect_AdoControl Adodc1, App.Path & "qser.mdb", "SELECT * FROM index Order By [Last Name]", False, ""

**king2512010** · 26-08-14, 04:21 AM

جرب الكود ده

PHP كود :

Private Sub Form_Load()
  Dim DB_Path As String
  DB_Path = App.Path & "\ qser.mdb"
  Me.Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & DB_Path & ";Persist Security Info=False"
  Me.Adodc1.Refresh
  Me.Adodc1.CommandType = adCmdUnknown
  Me.Adodc1.RecordSource = "select * from Last Name "
  Me.Adodc1.Refresh
End Sub 

**rookan** · 26-08-14, 10:06 PM

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

دخول
إسم المستخدم
كلمة المرور :	فقدت كلمة المرور ؟
	تذكرني بالمرة القادمة

المواضيع المحتمل أن تكون متشابهة .
الموضوع :		الكاتب	الردود :	المشاهدات :	آخر رد
	[vb6.0] تغيير نوع الخط فى عمود معين داخل الdatagrid	haitham Muhammed	6	364	20-12-23, 01:11 PM آخر رد: mhareek
	اريد طريقه او مثال ...للطباعة من الجهتين في الاكتيف ريبورت	scsi7000	4	440	02-11-23, 11:06 PM آخر رد: Microformt
	تلوين صف فى MSHFlixGrid	mhareek	12	979	31-10-23, 01:52 PM آخر رد: mhareek
	[vb6.0] سؤال حول كيفية عمل زر كوماند داخل عمود Msflexgrid	جلال اليمني	5	584	14-09-23, 05:12 AM آخر رد: جلال اليمني
	[vb6.0] هل يوجد مثال لاعداد جداول الاوقات المدرسي	2003amin	0	217	15-08-23, 01:11 PM آخر رد: 2003amin
	جمع حقلين داخل rpttext فى داتا ريبورت	haithamelareny	3	353	10-08-23, 11:56 PM آخر رد: ahmedabdelaliem
	محتاج مثال لتحويل (QR barcode) الي نص	scsi7000	2	327	04-08-23, 09:19 AM آخر رد: scsi7000
	دمج صورة Picture داخل صورة Picture	hannileo	5	2,499	05-03-23, 04:29 PM آخر رد: Taha Okla
	[vb6.0] اضافة صورة دائرية داخل داتا ريبورت	mohammed_atallah	2	622	13-09-22, 12:14 AM آخر رد: كاظم هاشم البهادلي
	[vb6.0] ادخال الاعدادات من داخل نافذة البرنامج وليس من محرر الاكواد	وادي العوضي	4	941	03-07-22, 02:00 PM آخر رد: وادي العوضي