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


الملفات المرفقة
.zip   softr-Fixed.zip (الحجم : 15.83 ك ب / التحميلات : 81)

الرد }}}}
تم الشكر بواسطة:
#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"

- تحياتي .
----------------------------------------------------------------------------------
اخي العزيز
السلام عليكم ورحمة وبركاته
لكم مني جزيل الشكر والتقدير والله يحفظكم ويرعاكم

الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [vb6.0] إستفسار لو سمحتوا - كيف أعمل ملف تثبيت لملفات برنامجي عبد الرحمن على 32 477 15-04-17, 03:40 PM
آخر رد: عبد الرحمن على
Question [vb6.0] كيف اشترط على المستخدم ان يحدد السجل الذي اريد حذفه في برنامجي المرفق ؟؟ Microformt 3 275 01-04-17, 02:18 AM
آخر رد: awidan76
  خطأ في جملة الاستعلام Ahmed Abdulla 7 142 28-03-17, 11:29 AM
آخر رد: Ahmed Abdulla
Question [vb6.0] الماذا لايظهر اسم المدينة عند اختيار اسم الدولة في برنامجي المرفق ؟؟ Microformt 1 79 22-03-17, 10:25 PM
آخر رد: السيد الغالي
  كيف أجعل برنامجي يشتغل مباشرة عند اشتغال الوندوز الخير طهوري 44 1,019 15-03-17, 11:48 PM
آخر رد: الخير طهوري
  [vb6.0] ارجوا التعديل على المشروع المرفق عبدالقادرعواد 12 240 06-03-17, 01:58 AM
آخر رد: عبدالقادرعواد
  ما الخطاء في جملة الاستعلام النالية حيث لا تعمل allobaed 2 76 26-02-17, 06:59 PM
آخر رد: allobaed
  تصدير بيانات استعلام الى ملف ورد Nasa_use 3 179 23-02-17, 11:01 PM
آخر رد: مبرمج جديد
Question [vb6.0] كيف انشي استعلام يظهر عدد نتايج البحث؟؟ Microformt 1 129 29-01-17, 09:33 PM
آخر رد: السيد الغالي
Question [vb6.0] كيف انشي ملف exe عند إغلاقة يحذف نفسة ؟؟ Microformt 2 137 19-01-17, 02:34 AM
آخر رد: sendbad100

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


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