أحترت في كيفية البحث في قاعدة بيانات الأكسس مع مراعاة حالة الأحرف مثلاً
dim rec as ADODB.Recordset dim woed as string word = "Saleh" Set rec = New ADODB.Recordset rec.Source = "SELECT * FROM Table WHERE Fild=" & word rec.ActiveConnection = cnn rec.Open , , adOpenStatic, adLockOptimistic
في هذا المثال أريد أن أبحث فقط عن من يبدأ أسمه بالحرف الكبير ( S ) ولكن الكود لا يفرق بين الكابتل لتر والسمول لتر ..؟؟
أرجوا ممن لديه أي فكرة من الإخوان إرشادي إليها ..
وجزاكم الله خيراً .
من مواضيعي :
إجعل برنامجك يعمل على كل جهاز في العالم
النسخة الاحتياطية الاكثر تطورا على مستوى المنتديات
هذا الكود يحتاج لكثير من الذكاء وقليل من العمل
إليكم بعض المعلومات عن المكتبة الشاملة التي يجهلها الكثير وهي مصممة بالvb6
برنامجين مع السورس كود قديمين جداً
مثال كامل لــانشاء ملف txt*. النصي
الاداة رائعة جدا بكل المقاييس swbbtnba.ocx
كود ممتاز ؟ ومساعدة في الاضافة / الحذف
احلى حركة وجدتها اخيرا بعد وقت طويل
وأخيرا حصلت المعجزة : تحويل الفلم الى صورة متحركة وكانك تشاهد فلما Camtasia Studio
مشكور أخي المهنا على الرابط ..
قمت بتنزيل الملف في الموضوع السابق ولكن ليس هذا ما كنت أريد .. أنا مشكلتي في تحديد البحث في اللغة الإنجليزية بين الأحرف الكبيرة والصغيرة .. بحيث إذا كنت أريد البحث عن أحرف كبيرة لا يتظمن البحث الأحرف الصغيرة ...
قمت بإضافة أسماء إنجليزية في المشروع السابق حتى تتضح الصورة أكثر .. فقط قم بالبحث عن الأسماء التي تبدأ بـ ( S ) حرف كبير وأنظر نتيجة البحث ..
جزاك الله خير على المشاركة ..
بسم الله الرحمن الرحيم
الأخوة الكرام
السلام عليكم ورحمة الله وبركاته
ألأخ shoqi
يمكنك بالطبع عمل ما تريد وأكثر ..واريد ان اعطيك معلومة جميلة
وهى
يجب ان تعرف ان الأكسس يعتمد على Ansi-SQL 92
,وهذه الأصدارة من ألأكسس تعتمد بشكل جبار على دوال VBA
يعنى ببساطة معظم دوال الفيجول بيسيك المعروفة يمكنك ان تستخدمها فى عمل الـ SQL Statements الخاصة بألأستعلامات فى الأكسس
وبالنسبة لطلبك ... فإليك هذا الحل
SELECT TableName.FiledName FROM TableName where Strcomp(left(FiledName,1),'e',0)=0
فى هذه الجملة إستخدمنا بعض الدوال الجميلة والتى توجد بالظيط فى الفيجوال بيسيك والـ VBA
وهى تستخدم بنفس الطريقة ... وبنفس الأسلوب
الدالة StrComp
الدالة Left
واكيد انت عارف طريقة ألأستخدام
ولو انت لا تعرف .. حاول البحث فى المنتدى ,.,. او فى الـ MSDN
ارجو من الله التوفيق
والسلام عليكم ورحمة الله وبركاته
شكرا لك اخي NOURHASSANIEN فأنا أول مرة اعرف ان الأكسس يمكن ان استخدم في الإستعلامات الخاصة به دوال vb هذا رائع
شكرا لك مرة اخرى
التخصص : نظم معلومات - جامعة سبأ - اليمن
من مواضيعي :
السلسلة الذهبية في تعلم البرمجة [شرح عن الإجراءات والدوال function وبناء الـ Classes] .
جزاك الله خير يا NOURHASSANIEN وكثر الله من أمثالك .. والله إني فرحت بردك كثيييييييييييييييييييييير
أنا كنت أعرف أنه يمكن إستخدام بعض الدوال على عبارات ( SQL ) وكنت أستخدمها في قاعدة بيانات ( Mysql ) ولكن بعد تطبيق بعض هذه الدوال على قاعدة الأكسس لم تفلح مثل ( Binary ) وغيرها فظننت أن الدوال لا تنفع مع قاعدة الأكسس .. فذهبت أبحث عن حلول أخرى صعبه .. ولم أكن أتصور أن الحل سيكون أيضاً عن طريق الدوال ..
ومشكلتي الأساسية كانت في أن قاعدة البيانات مشفرة عندي بالكامل .. وكان يعيقني مشكلة البحث في النص المشفر حيث يحتوي بعد التشفير على أحرف إنجليزية كبيرة وصغيرة .
وكان الحل بكل بساطة هي جملة الإستعلام هذه :-
"SELECT * FROM [Table] WHERE Instr( 1, [Fild], '" & Word & "', 0) <> 0;"
شكراً جزيلاً أخي NOURHASSANIEN . والعشاء على حسابي .. بس تعال المدينة . B)
بسم الله الرحمن الرحيم
الأخوة الكرام
السلام عليكم ورحمة الله وبركاته
الأخوة shoqi و فواز الشمري
لاشكر على واجب
وبعدين ياعم shoqi ايه موضوع العشا على حسابى ... بس تعال المدينة . ..
شكلك كدا بتعزم عزومة مراكبية .. ولاانت دمياطى .
على العموم ...الف شكر
هههههههههههههههههههههههههههههههههههههههههههههه
والسلام عليكم ورحمة الله وبركاته
هذا الموضوع مغلق.
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…