تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
طريقة عمل عداد لمستخدمين البرنامج
#1
السلام عليكم ورحمه الله و بركاته اهل المنتدي ..
مثل ما قرأتم عنوان الموضوع ..
بحثت عن ذلك الشئ كثيراً ..
و لم اجد ..
فكيف اقوم بعمل هذه الميزه ..
بشرط جمع جميع المستخدمين ..
اي ان كل من فتح التطبيق اكثر من مره ..
فتحتسب بزيارة واحده فقط ..
و معرفة عدد مستخدمي البرنامج حالياً ..
و شكرا  Heart
الرد }}
تم الشكر بواسطة:
#2
و عليكم السلام ورحمة الله وبركاته
هذا يتوقف على اسلوب برنامجك كيف يكون؟
الفكرة بالنسبة لي سهلة جدا لكن  اغلب الاخوة لا يناسبهم ما يناسب غيرهم.
بالنسبة لي اتعامل مع موقع رفع وقاعدة بيانات اكسس واخزن سيريال المعالج وعند كل تشغيل افحص السريال ان كان هو  يخرج من الاجراء او يضيف رقم.
لكن هذا يتطلب الاتي:
Webservice مرفوع على موقع وبه ملف اكسس بسيط.
=====* التوقيع *======
=================
الرد }}
تم الشكر بواسطة: elgokr , elgokr
#3
طريقة اخرى كما قدمه شرحه الاخ سعود

قم باستدعاء كلاً من 
كود :
Imports System.Management
Imports System.Net

بعد ذلك اسفل سطر 
كود :
Public Class Form1

قم باضافة الكود التالى
كود :
   Dim HW As New SEC_Informations
   Dim MB As String

   Public Class SEC_Informations
       Friend Function GetMotherBoardID() As String
           Dim strMotherBoardID As String = String.Empty
           Dim query As New SelectQuery("Win32_BaseBoard")
           Dim search As New ManagementObjectSearcher(query)
           Dim info As ManagementObject
           For Each info In search.Get()
               strMotherBoardID = info("product").ToString()
           Next
           Return strMotherBoardID
       End Function
   End Class

وقبل الاستخدام قم بانشاء جدول تحت اسم مثلاً
VUsers
ويحتوى بداخله على اعمدة التالية
MyID - MyUSERS - G-DATE

الاول ترقيم تلقائى - الثاني نصي [المستخدم] - الثالث تاريخ

بعد ذلك سيتم عمل التالي
فى منطقة الـ Form1_Load

ضع السطر التالى
كود :
MB = HW.GetMotherBoardID()

واسفل منه كود الاستعلام بالجدول 
(يتوقف على طريقة كتابة كود الاتصال بقاعدة البيانات وطريقة كتابة الاسطر فقط بالنهاية استخدم الاستعلام بهذا الشكل)
كود :
"SELECT MyUSERS FROM VUsers WHERE MyUSERS='" & MB & "'"

بعد ذلك عمل التحقق
كود :
If dt.Rows.Count = 0 Then
' ضح كود الادخال بقاعدة البيانات وهو عبارة عن الكود التالى
' "INSERT INTO VUsers (MyUSERS, G-DATE) VALUES ('" & MB & "', '" & NOW.ToString() & "')"
End If

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

وفى حالة قام بفتحه العديد من المرات بعد ذلك
ومن اشخاص مختلفين ولكن من جهاز الكمبيوتر نفس فلم يقوم بفعل شئ

يارب يكون الكود والشرح بسيط

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد }}
تم الشكر بواسطة: سعود , ابو روضة , dubai.eig
#4
شرح جميل من سعود و elgoker
و لكن لم افهم جيدا من elgoker ..
فهل من شرح بالصور او فيديو
الرد }}
تم الشكر بواسطة:
#5
اليك مشروع وبرنامج مرفق
يوضح فى توزيعة الاكواد

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

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

بحيث ان البرنامج للمعينة وانه جهاز واحد يتم اختبار عليه الكود

ملحوظة:
قد تحتاج الى اضافة 
PHP كود :
System.Management 

داخل References
حتى يتم استدعائه كما فى الكود بالاعلى
فى الرد السابق... صورة توضيح


ويتم ذلك من خلال كلك يمين على References
من ثم اختيار AddReference...
وطبق كما فى الصورة

قم بتحميل السورس والبرنامج من المرفقات
السورس(VB2015)


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


الملفات المرفقة
.zip   Pro RegUsers.zip (الحجم : 55.06 ك ب / التحميلات : 45)
.zip   RegUsers.zip (الحجم : 268.29 ك ب / التحميلات : 52)
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد }}
تم الشكر بواسطة: سعود , sendbad100
#6
هناك مضكلة في السورس كود ..
يحتاج دوت نيت فرايم ورك 6.5.0
الرد }}
تم الشكر بواسطة:
#7
ماذا تقصد بـ مضكلة
وايضاَ كيف يحتاج الى 
.net framework 6.5.0

بينما اخر اصدار هو 4.7.2
على حيث علمى

الرجاء التوضيح لما يحدث معك

تحياتى لك
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد }}
تم الشكر بواسطة:
#8
(21-06-18, 03:15 AM)elgokr كتب :
ماذا تقصد بـ مضكلة

اعتقصد يقصد بها " يوجد مشكلة " ليس يوجد مضكلة
الرد }}
تم الشكر بواسطة: elgokr
#9
(21-06-18, 03:15 AM)elgokr كتب :
ماذا تقصد بـ مضكلة
وايضاَ كيف يحتاج الى 
.net framework 6.5.0

بينما اخر اصدار هو 4.7.2
على حيث علمى

الرجاء التوضيح لما يحدث معك

تحياتى لك

عفواً قصد إصدار 4.7.2

اسف علي كلمة مضكلة
فأنا أقصد كلمة مشكلة
الرد }}
تم الشكر بواسطة: elgokr
#10
حيث ان ما بالجهاز لدى هو 4.6.1
كما ان المستخدم فى المشروع هو نفس الاصدار

لكن الك التالى..
يمكنك تحميل اى اصدار تريده من خلال الرابط التالى
ستجد الاصدارات من 3.5 حتى 4.7.2

كما انه مرفق المشروع والمثال بعد تحويل الاصدار الى 4.5
تجنباً لعدم وجود اى اخطاء بالاكواد

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


الملفات المرفقة
.zip   Pro RegUsers.zip (الحجم : 55.1 ك ب / التحميلات : 17)
.zip   RegUsers.zip (الحجم : 215.52 ك ب / التحميلات : 17)
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد }}
تم الشكر بواسطة: dubai.eig


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Heart لو تكرمتم عدلوا لي هذا البرنامج أبو خالد الشكري 7 174 23-06-22, 10:25 PM
آخر رد: أبو خالد الشكري
  ربط البرنامج بتوكين هيئة الزكاة و الدخل السعودية nabil.1710 4 1,112 10-06-22, 05:55 PM
آخر رد: bird.sad
  ممكن طريقة لتحويل هذا الكود ابو روضة 9 387 10-06-22, 02:21 AM
آخر رد: ابو روضة
  جلب أسماء الجداول- البرنامج يتوقف عن العمل mmaalmesry 5 267 05-06-22, 04:30 PM
آخر رد: asemshahen5
Question [VB.NET] استفسار حول طريقة الضغط على زر برمجيا lmofallis 4 3,055 01-06-22, 12:02 PM
آخر رد: عبد الجليل سراج
  طريقة تحميل البيانات بطريقة سريعة عن طريق الاستعلام sql Codack 1 262 23-05-22, 07:17 PM
آخر رد: سعود
  كيف يمكن اضافة عناصر للكومبوبوكس اثناء تشغيل البرنامج عن طريق المستخدم haithammoftah 1 787 09-04-22, 02:15 AM
آخر رد: asmarsou
  [سؤال] طريقة تمرير صور من Form1 الي Form2 MMn 2 483 08-04-22, 11:26 PM
آخر رد: MMn
  طريقة تثبيت البرنامج عن بعد mohmmadadli1 1 503 29-03-22, 12:36 AM
آخر رد: Taha Okla
  ممكن طريقة اضافة باسورد عند انشاء برنامج للقنوات لكي عندما احد يريد ان يدخل الى البرن omar dz 6 1,074 20-03-22, 07:37 PM
آخر رد: omar dz

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


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