اسلام الكبابى

عرفت الحل والحمد لله الحل هو أن يكون تعاملى مع RS وليس مع الADODC نفسه أى أن يكون الكود هكذا If RS.State = adStateOpen Then RS.Close RS.Open "SELECT * FROM table1", db, adOpenStatic, adLockPessimistic RS.MoveFirst: RS.Move (9) XXX = RS.Fields(3)  

طبعآ التوجه للسجل العاشر يكون يالكود Adodc1.Recordset.MoveFirst Adodc1.Recordset.Move (9)  

لدى adodc مرتبط بأحد جداول قاعدة بيانات كيف يمكن معرفة قيمة حقل معين فى سجل معين (مثلآ قيمة حقل رقم 3 فى السجل العاشر) كل ما أعلمه من أجل ذلك أن أتوجه للسجل العاشر ثم أكتب الجملة XXX = Adodc1.Recordset.Fields(3) فكيف يمكن معرفة ذلك دون التوجه للسجل العاشر أى كيف يمكن معرفة ذلك مع ترك الADODC فى مكانه عند السجل الواقف عنده ولكم ألف شكر

لا أستطيع فتح النت https://www.sombes.com/sub/68fb46e220c23278f191a7315f7c9990 كيف أتخلص من هذا الموقع لا أستطيع فتح أى موقع على النت بسببه هذه الكلمات التى تقرءونها الآن اضطررت لكى أضعها لكم فى المنتدى الى كتابتها أولآ فى ملف وورد ثم نسخها ثم لصقها هنا بسرعة حتى لا تطير صفحة المنتدى ويظهر بدلآ منها صفحة هذا الموقع فكيف أتخلص من هذا الموقع ولكم ألف شكر

وجدت الحل والحمد لله انه فى الحدث AfterColEdit أى أن الكود يكون هكذا Private Sub DataGrid1_AfterColEdit(ByVal ColIndex As Integer) Z = MsgBox(" ", vbYesNo, "       هل أنت متأكد؟ ") If Z = 6 Then Adodc1.Recordset.UpdateBatch adAffectCurrent: GoTo 100 Adodc1.Recordset.CancelBatch adAffectCurrent  100End Sub  

لدى DataGrid متصلة بAdodc متصل بأحد جداول قاعدة بيانات ما هو الكود الللازم لتوجيه الماوس الى حقل معين فى سجل معين ؟ مثلآ توجيهه الى الحفل رقم 2 فى السجل رقم 34 ولكم ألف شكر

لم أجد أى اجابة حتى الآن

أريد تنفيذ كود معين كلما تغيرت خلية الDATAGRID بحيث اذا قام المستخدم بعمل تعديل فى احدى الخلايا ثم انتقل الى خلية أخرى يقوم البرنامج بتنفيذ هذا الكود مع العلم أن حدث الDataGrid_Change لم يصلح فى ذلك لأنه يجعل البرنامج ينفذ هذا الكود بمجرد كتابة المستخدم حرف واحد أو رقم واحد فى هذه الخلية التى يريد تعديل ما فيها ولكنى لا أريد تنفيذ هذا الكود الا بعد أن ينتهى المستحدم من كتابته ويخرج من هذه الخلية الى غيرها ولكم ألف شكر

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

 

ألا يمكن الاستغناء عن هذه الجملة الطويييييييلة .......... OR...OR...OR...OR...OR...OR ولكم ألف شكر

أم لابد لعمل ذلك من عمل جدول من حقل واحد بقاعدة بيانات ووضع هذه الأرقام فيه كسجلات وكلما أردت كتابة هذه الجملة كتبت جملة البحث select عن قيمة X فيه ألا يمكن عمل ذلك بطريقة سهلة بدلآ من هذا اللف والدوران ؟ ولكم ألف شكر    

لدى جملة طويييييييلة بسبب أرقامها الكثيييييرة أحتاجها كثيرآ فى الكود وأريد اخنصارها بدلآ من تكرارها بنفس هذا الطووووول كود : X = Val(Text1.Text) Y = 200 If X = 7 Or X = 20 Or X = 23 Or X = 38 Or X = 69 Or X = 188 Or X = 213 Or X = 239 Or X = 246 Then Y = 100 Print Y ألا يمكن عمل مجموعة تحتوى هذه الأرقام بحيث تكون صيغة هذه الجملة الشرطية الطويييييييلة هكذا THEN Y=100    ضمن أرقام المجموعة     IF X ولكم ألف شكر

ألا يمكن هذا الذى سأل عنه صاحب السؤال نتحكم في نوعية الخط ( فونت ) و حجم الخط في رسالة msgbox

فى لغة الvb6 كيف أمنع المستخدم من اغلاق الفورم سواء بالضغط على علامة x أو بالضغط على مفتاح Alt+F4 أو بأى طريقة أخرى أريد ألا يسنطيع المستخدم غلقها الا بالضغط على زر الغلق الذى أضعه فى الفورم وأكتب طبعآ كود الغلق فى حدث الضغط عليه           و أظهره وقتما أشاء و أخفيه وقتما أشاء ولكم ألف شكر