تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[vb6.0] كيف انشي استعلام مثل الاستعلام المجود في برنامجي المرفق استعلام عن طريق استعلام SQL
#1
Question 
كيف انشي استعلام مثل الاستعلام المجود في برنامجي المرفق استعلام عن طريق استعلام SQL ؟؟
ارجو من الله التعديل على برنامجي المرفق والله يحفظكم ويرعاكم


الملفات المرفقة
.zip   softr-Fixed.zip (الحجم : 15.83 ك ب / التحميلات : 129)
إذا ضاقت بك الأحوال يوماً     فَثِقْ بالواحِدِ الفَرْدِ العَلِيِّ
الرد
تم الشكر بواسطة:
#2
السلام عليكم

- المطلوب غير واضح , يبدو أنك أخطأت في المثال , لأنه هذا المثال كان لسؤال سابق لك , يرجى التوضيح .

- في هذا الرابط : http://vb4arb.com/vb/showthread.php?tid=1168

- تحياتي .
كود :
For each Breathe in MyLife
Breathe.Say " سبحان الله والحمد لله ولا إله إلا الله والله أكبر أستغر الله العظيم وأتوب إليه"
Next
الرد
تم الشكر بواسطة:
#3
ما شاء الله عليك يا أخي VB_Coder من السباقين للمساعدة...
منقطع .. للدراسة Confused
الرد
تم الشكر بواسطة: VB_Coder
#4
(08-12-13, 11:07 PM)VB_Coder كتب : السلام عليكم

- المطلوب غير واضح , يبدو أنك أخطأت في المثال , لأنه هذا المثال كان لسؤال سابق لك , يرجى التوضيح .

- في هذا الرابط : http://vb4arb.com/vb/showthread.php?tid=1168

- تحياتي .

-----
اخي العزيز
السﻻم عليكم ورحمة الله وبركاته
ﻻ يوجد خطاء في المثال ولكن السوال هذه المره
كيف انشي نفس اﻻستعلام المجود في المثال السابق بصيغة sql؟
والله يحفظكم ويرعاكم
إذا ضاقت بك الأحوال يوماً     فَثِقْ بالواحِدِ الفَرْدِ العَلِيِّ
الرد
تم الشكر بواسطة:
#5
السلام عليكم

- معليش أعتذر منك أخي العزيز ، لازال ماتريده غامض ، أرجو التوضيح أكثر .

- تحياتي .
كود :
For each Breathe in MyLife
Breathe.Say " سبحان الله والحمد لله ولا إله إلا الله والله أكبر أستغر الله العظيم وأتوب إليه"
Next
الرد
تم الشكر بواسطة:
#6
السلام عليكم ورحمة الله وبركاته
[code]Dim SQLs As String

SQLs = "Select Operation as ÑÞã_ÇáÚãáíÉ" & _
",Date as ÊÇÑíÎ_ÇáÚãáíÉ" & _
",Statement as ÇáÈíÇä" & _
",Format(Deposit,'0.00') as ÅíÏÇÚ" & _
",Format(Clouds,'0.00') as ÇáÓÍÈ" & _
",Format(Balance,'0.00') as ÇáÑÕíÏ_ÇáãÊÈÞí" & _
" From sam2 Where Account_Number=" & Val(Trim$(Text.Text)) & _
" Order By Date,Operation ASC"

If RS.State = adStateOpen Then RS.Close
RS.Open SQLs, DB, adOpenKeyset, adLockPessimistic

DoEvents

If RS.RecordCount > 0 Then
Set MSHFlexGrid1.DataSource = RS
Else
MsgBox "áã íÊã ÇáÚËæÑ Úáì ÑÞã ÇáÍÓÇÈ"
End If
بالتوفيق
الرد
تم الشكر بواسطة:
#7
Question 
(09-12-13, 07:57 AM)VB_Coder كتب : السلام عليكم

- معليش أعتذر منك أخي العزيز ، لازال ماتريده غامض ، أرجو التوضيح أكثر .

- تحياتي .
-------------------------------------------------------------------------------------
اخي العزيز
السلام عليكم ورحمة وبركاته
اريد ان يكون استعلام البرنامج مثال صيغه هذا الاستعلام
Set rs = db.OpenRecordset("SELECT * FROM sam1 WHERE Account_Number=" & Val(txtNo.Text))
مع عدم ذكر اسماء حقول اسماء فيلكس في الاستعلام
والله يحفظكم ويرعاكم
إذا ضاقت بك الأحوال يوماً     فَثِقْ بالواحِدِ الفَرْدِ العَلِيِّ
الرد
تم الشكر بواسطة:
#8
السلام عليكم

- إذا كان لايهمك ظهور أسماء أعمدة الفليكس قريد بالعربي فقم فقط بإزالة التسمية المستعاره التي بالعربي في الإستعلام , وأنتهت المشكلة , أما إذا كنت تريد ظهور أسماء الأعمدة بالعربي فهناك طريقتين ,
- الأولى :- هي أن تقوم بتسمية حقول الجدول نفسه بالعربي وأيضاً لابد أن تكتبها بالعربي في الإستعلام وهذه الطريقة غير مستحسنه لأنك ربما قد تواجه مشاكل .
- الثانية أن تقوم بتغيير أو ‘إعادة تسمية أعمدة الفليكس قريد في كل مرة تسند نتيجة الإستعلام في الفليكس قريد , كما يلي :
كود :
MSHFlexGrid1.TextMatrix(0,0)="Name"

- تحياتي .
كود :
For each Breathe in MyLife
Breathe.Say " سبحان الله والحمد لله ولا إله إلا الله والله أكبر أستغر الله العظيم وأتوب إليه"
Next
الرد
تم الشكر بواسطة: Microformt
#9
(09-12-13, 11:02 PM)VB_Coder كتب : السلام عليكم

- إذا كان لايهمك ظهور أسماء أعمدة الفليكس قريد بالعربي فقم فقط بإزالة التسمية المستعاره التي بالعربي في الإستعلام , وأنتهت المشكلة , أما إذا كنت تريد ظهور أسماء الأعمدة بالعربي فهناك طريقتين ,
- الأولى :- هي أن تقوم بتسمية حقول الجدول نفسه بالعربي وأيضاً لابد أن تكتبها بالعربي في الإستعلام وهذه الطريقة غير مستحسنه لأنك ربما قد تواجه مشاكل .
- الثانية أن تقوم بتغيير أو ‘إعادة تسمية أعمدة الفليكس قريد في كل مرة تسند نتيجة الإستعلام في الفليكس قريد , كما يلي :
كود :
MSHFlexGrid1.TextMatrix(0,0)="Name"

- تحياتي .
----------------------------------------------------------------------------------
اخي العزيز
السلام عليكم ورحمة وبركاته
لكم مني جزيل الشكر والتقدير والله يحفظكم ويرعاكم
إذا ضاقت بك الأحوال يوماً     فَثِقْ بالواحِدِ الفَرْدِ العَلِيِّ
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ممكن البرنامج يبعت رسايل للموبايل عن طريق النت رجل الكهرباء 5 682 12-05-22, 12:52 PM
آخر رد: الاصيله
Question كيف يمكن فتح ملف exe من خلال برنامجي ؟؟ Microformt 2 189 02-05-22, 12:21 AM
آخر رد: Microformt
Wink هل يمكن تحديث بيانات من استعلام لجدول مصمم هاوي 10 886 04-11-21, 01:33 PM
آخر رد: مصمم هاوي
Question [vb6.0] هل يمكن نسخ ما في Text عن طريق زر الامر ؟؟ Microformt 2 535 02-10-21, 02:39 PM
آخر رد: Microformt
Question [vb6.0] كيف انشي لبرنامجي المرفق تصفح سجلات مثال الذي في الصوره ؟؟ Microformt 3 692 24-05-21, 10:01 AM
آخر رد: Ahmed_Mansoor
Question [vb6.0] نامل المساعدة في هذا الكود المرفق إن امكن ذلك ؟؟ Microformt 3 726 23-05-21, 08:50 AM
آخر رد: Ahmed_Mansoor
  احناج مثال لكيفية استيراد بيانات من ملف اكسيل الى قاعدة البيانات عن طريق الفيجوال amro1965 0 839 19-01-21, 06:22 PM
آخر رد: amro1965
Question الماذا لا يعمل هذا الاستعلام بخصم الكميه من المخزون ؟؟ Microformt 3 2,403 16-11-20, 11:31 PM
آخر رد: ahmed201
  اخى الغالى الاستاذ امير سول فى الاستعلام من اكثر من جدول mhareek 2 702 03-10-20, 09:05 PM
آخر رد: mhareek
Question [vb6.0] كيف انشي زر امر يتأكد انه يوجد برنامج Wordعلى الحاسب وإذا لم موجود يظهر رسالة لمستخدم Microformt 2 1,071 01-08-20, 07:23 PM
آخر رد: Microformt

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


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