منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
ما هو سبب بطئ البرنامج - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أمثلة ومشاريع vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=30)
+---- الموضوع : ما هو سبب بطئ البرنامج (/showthread.php?tid=16364)



ما هو سبب بطئ البرنامج - scsi7000 - 05-07-16

السلام عليكم ,
        ما هو سبب البطئ الشديد للبرنامج عندما يشتغل من كمبيوتر اخر متصل بالسيرفر
علما ان السيرفر مركب عليه قاعدة بيانات سكيوال سيرفر 2008 انتربريز والبرنامج علي نفس السيرفر سريع
ولكن علي الكمبيوترات الاخرى بطئ والفاير وول ملغي...
وهذا البروفايدر للاتصال بالسيرفر :
كود :
Option Explicit

Public conn1 As ADODB.Connection
Public rs1 As ADODB.Recordset

Sub connect1()

Set conn1 = New ADODB.Connection
    conn1.CursorLocation = adUseClient
    conn1.Provider = "sqloledb;Data Source=192.168.2.7,49710;Initial Catalog=dbss1;User ID=sa;Password=123123;"
    conn1.Open
    
Set rs1 = New ADODB.Recordset
    rs1.ActiveConnection = conn1
    rs1.CursorLocation = adUseClient
    rs1.CursorType = adOpenDynamic
    rs1.LockType = adLockOptimistic
    rs1.Source = "SELECT * FROM table1"
    rs1.Open
    
End Sub



RE: ما هو سبب بطئ البرنامج - مصطفى السعدي - 19-06-18

(05-07-16, 05:21 PM)scsi7000 كتب : السلام عليكم ,
             ما هو سبب البطئ الشديد للبرنامج عندما يشتغل من كمبيوتر اخر متصل بالسيرفر
علما ان السيرفر مركب عليه قاعدة بيانات سكيوال سيرفر 2008 انتربريز والبرنامج علي نفس السيرفر سريع
ولكن علي الكمبيوترات الاخرى بطئ والفاير وول ملغي...
وهذا البروفايدر للاتصال بالسيرفر :
كود :
Option Explicit

Public conn1 As ADODB.Connection
Public rs1 As ADODB.Recordset

Sub connect1()

Set conn1 = New ADODB.Connection
   conn1.CursorLocation = adUseClient
   conn1.Provider = "sqloledb;Data Source=192.168.2.7,49710;Initial Catalog=dbss1;User ID=sa;Password=123123;"
   conn1.Open
   
Set rs1 = New ADODB.Recordset
   rs1.ActiveConnection = conn1
   rs1.CursorLocation = adUseClient
   rs1.CursorType = adOpenDynamic
   rs1.LockType = adLockOptimistic
   rs1.Source = "SELECT * FROM table1"
   rs1.Open
   
End Sub
انا اضم صتوي الى صوتك اعني من نفس المشكلة


RE: ما هو سبب بطئ البرنامج - elgokr - 19-06-18

تم الرد على موضوعك اخى
فى قسم الاسئلة..
[/url]
[url=http://vb4arb.com/vb/showthread.php?tid=25432]http://vb4arb.com/vb/showthread.php?tid=25432

تحياتى لك
وتمنياتى لك التوفيق



RE: ما هو سبب بطئ البرنامج - Amir_Alzubidy - 20-06-18

السلام عليكم و رحمة الله و بركاته 
مداخلة بسيطة ان سمحتم لي 
بالاضافة الى ما ذكره الاخ الحبيب elgoker 
احدى التوصيات التي يجب الاخذ بها بعين الاعتبار للشبكات الخارجية او الشبكات الداخلية 
و ربطها ببرنامجك اخي الحبيب في المرتبة الاولى تعود الى طريقة كتابتك للاوامر البرمجية 
و نصوص الاتصال التي تتبعها و التقنية التي تستخدمها في اعلى هرم الاولويات. 
ثانيا للشبكات الداخلية : يجب التاكد من الكيبلات المتصلة بين الاجهزة هي ذات جودة عالية 
مثلا هناك فرق بين كيبلات cat-5e و كيبلات cat5 و المقارنات تتزايد وصولا الى cat8e  او اكثر .. 
بالاضافة الى مراجعة المشغلات التابعة للنظام مثلا المعالج و سرعته و الرامات و الخ ...
كذلك الامر مع  السيرفرات الخارجية ( الشبكات الخارجية ) 
يجب التأكد من سرعتها فهي تختلف باختلاف السرعة بينها و بين الاخرى 
احدى الاقتراحات لتسريع استدعاء السجلات انصح باستخدام 
 Multi Threaded Process