تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
معرفة الاشخاص المتصلين بقاعدة البيانات في الشبكة المحلية ببساطة مثل مقاهي الانترنت
#1
طلب كود اريد معرفة كم شخص متصل في قاعدة  البيانات الموجودة عندي على السيرفر
الرد }}}}
تم الشكر بواسطة:
#2
تفضل
كود :
Dim ret As Integer
Using cmd As New SqlCommand("SELECT COUNT(*) FROM sys.sysprocesses WHERE spid>50 ", cnn)
    If cnn.State <> ConnectionState.Open Then cnn.Open()
    ret = cmd.ExecuteScalar
    cnn.Close()
    SqlConnection.ClearPool(cnn)
End Using
MsgBox(ret)

كما تلاحظ تم تنفيذ الأمر SqlConnection.ClearPool بعد إغلاق الاتصال لازالة هذا الاتصال المغلق من الحسبة

وهنا يجب التنبيه إلى تنفيذ هذا الأمر والذي هو SqlConnection.ClearPool بعد غلق الاتصال مباشرة بالامر cnn.Close


قد تلاحظ أن الناتج 1 أو2 بالرغم من عدم وجود اتصالات، فقم بطرح هذا العدد من الناتج.
الرد }}}}
تم الشكر بواسطة: thevirus
#3
(29-10-16, 03:01 AM)ممدوح كتب : تفضل
كود :
Dim ret As Integer
Using cmd As New SqlCommand("SELECT COUNT(*) FROM sys.sysprocesses WHERE spid>50 ", cnn)
   If cnn.State <> ConnectionState.Open Then cnn.Open()
   ret = cmd.ExecuteScalar
   cnn.Close()
   SqlConnection.ClearPool(cnn)
End Using
MsgBox(ret)

كما تلاحظ تم تنفيذ الأمر SqlConnection.ClearPool بعد إغلاق الاتصال لازالة هذا الاتصال المغلق من الحسبة

وهنا يجب التنبيه إلى تنفيذ هذا الأمر والذي هو SqlConnection.ClearPool بعد غلق الاتصال مباشرة بالامر cnn.Close


قد تلاحظ أن الناتج 1 أو2 بالرغم من عدم وجود اتصالات، فقم بطرح هذا العدد من الناتج.

شكرا لك اخي الكريم لكن عندما عندي قاعدة بيانات من نوع اكسس لازم اغيرها الى SQL ام هناك حل افضل علما ان المستخدمون للقاعدة لن يتعدى 7 اجهزة وحسب معلومات قرأتها ان قاعدة بيانات من نوع اكسس يمكنها تحمل 15 جهاز كحد اقصى
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] ظهور رسالة خطأ: نوع البيانات غير متطابق في تعبير المعايير. Waleed Al-Khamesy 13 146 منذ 1 ساعه مضت
آخر رد: wale90
  [VB.NET] اريد كود للكشف عن تغير عنوان الشبكة e-coder 0 17 أمس, 03:21 AM
آخر رد: e-coder
  كيف الاتصال بقاعدة بيانات SQLite أحمد إبراهيم سعد 2 62 19-09-17, 09:18 PM
آخر رد: أحمد إبراهيم سعد
  سبب ظهور خطأ في حفظ البيانات مصمم هاوي 2 64 19-09-17, 12:33 PM
آخر رد: مصمم هاوي
  [VB.NET] لخبراء قواعد البيانات create table dubai.eig 4 85 19-09-17, 10:39 AM
آخر رد: dubai.eig
  سرعة الانترنت عبدالرحمن المكاوي 0 45 12-09-17, 01:40 AM
آخر رد: عبدالرحمن المكاوي
  [VB.NET] هل هناك كود افضل من هذا الكود ضغط القاعدة البيانات 0theghost0 0 56 11-09-17, 12:58 PM
آخر رد: 0theghost0
Photo [VB.NET] معرفة من لم يدفع في نظام الفواتير الشهرية ( مهم جدا) Rabeea Qbaha 10 299 10-09-17, 05:14 AM
آخر رد: Rabeea Qbaha
  [سؤال] كود حفظ البيانات من التكست بوكس الي الحقل shingray 1 64 08-09-17, 04:53 PM
آخر رد: Amjad
  [VB.NET] أريد رفع قاعدة البيانات على النت والتعامل معها من أي جهاز tarek 4 158 05-09-17, 05:53 PM
آخر رد: سعود

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


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