مشكلة مع الباراميتار

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

أرجو نقل الموضوع لقسم VB حتى ينتبه الإخوة للسؤال ويقوموا بالرد على الأخ الكريم

لا اتعامل الان مع VB6 و لكن كحل عليك اولاً ان تحسب ال RowCount لعدد الصفوف التى سيعيدها ال SP ثم قم بعمل عدد من ال Rows فى ال MS FlexGrid مساو لعدد الصفوف التى ستعود من التنفيذ

ثم قم بعمل دوارة Loop تضيف كل Recordset لل MS FlexGrid Row

و لكنى اتسائل ما الذى جعلك تستخدم ال SP لإرجاع سجلات لماذا لم تستخدم ال UDF حيث اننا نعتمد على ال SP فى ال DML كعمليات ال Insert و ال Update و ال Delete و ال Select

اقتباس

كيف يمكنني تمرير البيانات من فيجوال بيسك 6 الى الإجراء

بدل هذا السطر :

RS.Open"SPCust",CN, adOpenStatic, adLockReadOnly

ليكون:

dim SQL as string
SQL="exec SPCust " & str(myalues)
RS.Open SQL,CN, adOpenStatic, adLockReadOnly

اقتباس

ثم بعد ذلك كيف يمكن إظهار النتائج

بمعنى هل اتعامل مع الإجراء المخزن كما لو كنت أتعامل مع جدول عادي لعرض النتائج من خلال فليكس جريد مثلا

إضافة للطريقة التي ذكرها الأخ طارق

قم بتنفيذ جملة select count لترجع لك عدد السجلات المطابقة، والتي على أساسها ستقوم بتجهيز الFlex grid ، مثلا:

SQL="SELECT count(*) as the_count FROM CUST WHERE CustCode =" & Str(myValue) 
set rs=cn.execute(SQL)
me.MSFlexGrid.rows=rs!the_count 
rs.close()

بالتوفيق بإذن الله :)

ممتازززززززززززززززززززززززززززززززز يا walcom