اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

الردود الموصى بها

قام بنشر

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

اساتذتي الافاضل

عندي سؤال واتمنى معرفته عن البار كود

كيف يتم تركيبه وتعريفة والاستفادة منه

علما انني لم امارس هذه الخاصية نهائيا

لو سمحتو هل يتكرم احد ان يشرح لي

كيف ابدأ وكيف ابدأ

وشكرا جزيلاً

  • Thanks 1
قام بنشر

نقلا من موضوع للاخ طارق حنيدق

فى الفريق العربي

الموضوع من هنا

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

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

( مع احترامى الشديد لمبرمجى اوراكل ودلفى )

و المثال المرفق لطارق و استخدم فيه اداه وضعها ابو هاجر

و لكي يعمل المثال

لابد أولا من تسجيل الocx المرفق

و ذلك من قائمة

Tools

ActivexControls

register

و تختار الملف

و أترك التعقيب للأخ طارق نفسه

و رابط الموضوع لااصلي موجود اعلاه لمزيد من التفاصيل

barcodex.rar

قام بنشر

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

اشكركم على الرد السريع واشكر اهتمامكم

وارجو ان تتحملوني اذا كان اي استفسار سألجأاليكم

وشكرا اساتذتي الافاضل

قام بنشر

السلام عليكم

شكرا لكل من ساهم في موضوع الباركود وخصوصا صاحب المثال أخي طارق ، فقد صممت برنامجا للحضور انطلاقا من هذا المثال وهو الآن من البرامج الأساسية بالشركة وقد كفانا عذاب الإدخال الشهري وأخطاء الإدخال وشكاوي الموظفين ممن لا يريحهم نتائج خارج الدوام "OV" .

من الأفكار التي طبقتها هو عمل بطاقات ثبوتية للموظفين واستخدام وجه البطاقة في الدخول وظهرها في الخروج . ويمنع منعا باتا استخدام لوحة المفاتيح في الإدخال إلا في حالة ضيقة جدا كضياع البطاقة مثلا ، ولكن استخدام لوحة المفاتيح يكون عن طريق صندوق نص آخر وبكلمة مرور وذلك لسد كل الثغرات للتلاعب بالمعلومات .

من الأمور التي أتعبتني بحق هو كيف أجعل البرنامج يتعرف على مصدر الإدخال ، لوحة المفاتيح أو القارئ ، وذلك لأن الكمبيوتر لا يفرق بين الإثنين . حتى فكرت في طريقة لإجبار البرنامج على التمييز بينهما وذلك باحتساب سرعة الإدخال بين رقم وآخر بمعنى لو كان عندنا رقم موظف 102 فسأقوم بدراسة فرق الوقت بين إدخال 1 و 0 وكذلك بين 0 و 2 . فواجهتني مشكلة تشكيك فريق تقنية المعلومات أنه يوجد من يملك سرعة الإدخال مما لن ينفع معها هذا الحقل ، ولكن لأنه لم يوجد حل آخر وكنت شبه مقتنق أن القارئ سوف يكون سريعا جدا مقارنة مع الموظف تم تطبيق الفكرة ونجحت نجاحا مدهشا ولم يستطع أحدا اللحاق بالقارئ .

البرنامج ملك للشركة فاسمحوا لي بعدم نشره :fff: .

دوشتكم :) .

تحياتي .

  • Like 1
قام بنشر
البرنامج ملك للشركة فاسمحوا لي بعدم نشره  .

بالطيع هذه حالة سنتعرض لها كثيرا

فكثير من الاعمال لن يمكننا نشرها كاملة

و لكن يكفي الاحابة علي تساؤل أو طريقة عمل جزء من الكود

عند الحاجة

و أنتهز هذه الفرصة لأوؤكد أنه فى مثل هذه الحالات نرجو عدم الالحاح من أحد أو محاولة احراج صاحب البرنامج

و انما الاكتفاء بالاستفسار العلمي البحت

نعود لموضوعنا

انا عندي استفسارات بخصوص البرنامج :rol:

هل جهاز الماسح الضوئي نفسه يأتي معه اداة ، ام استخدمت الاداة السابقة ؟؟

و بدون دعاية :) هل تم تفضيل نوع من الاجهزة بعينه ؟؟

ثانيا

لحساب الفرق بين الادخالات للرقم 102 هل هو كود Onchange لمربع النص ؟؟

فعلي ما أذكر ان هذا الكود لم يكن متاحا لمربعات النص قبل الاكس بي

قام بنشر

الاخ ابوهادي والاخوان جميعا

السلام عليكم

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

شاكرا لكم جميعا :yess:

قام بنشر

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

شكراً للجميع على هذه المعلومات القيمة :yess:

الاخ الأستاذ/ أبو هادي

ما هي اللغة التي أستخدمتها في برنامجك ؟

أم انك استخدمت الأكسس ؟

قام بنشر

السلام عليكم

الأسئلة لأخي محمد :

هل جهاز الماسح الضوئي نفسه يأتي معه اداة ، ام استخدمت الاداة السابقة ؟؟

و بدون دعاية  هل تم تفضيل نوع من الاجهزة بعينه ؟؟

لحساب الفرق بين الادخالات للرقم 102 هل هو كود Onchange لمربع النص ؟؟

لا ، لا أداة مع الماسح واستخدمت الأداة السابقة .

تم اختيار قارئ عن طريق النت وتم التركيز على أنه يمكن استخدامه بحمله باليد ويوضع على طاولة ويعلق على الجدار كذلك .

حساب الفرق عن طريق حدث On Key Press .

السؤال للأخ أبو شاهر :fff: :

ياليت ثم ياليت ان توضح طريقة عمل الباركود من البداية الى النهاية وعلى شكل خطوات

الرد للأخ محمد طاهر :

و أترك التعقيب للأخ طارق نفسه

و رابط الموضوع لااصلي موجود اعلاه لمزيد من التفاصيل

السؤال للأخ ابن مسقط :

ما هي اللغة التي أستخدمتها في برنامجك ؟

أم انك استخدمت الأكسس ؟

أكسسسسسسسسسس وبس :)

تحياتي .

قام بنشر

السلام عليكم

الأحداث لمعرفة الدخول من الخروج وذلك بعد أن أضيف علامة + للدخول و - للخروج على رقم الموظف في البطاقة فقط وأقوم بتغطية العلامات عند الطباعة .

علما أن أرقام الموظفين المبني عليها الكود تتكون من 3 خانات رقمية فقط .

فارق الوقت والمعرف هنا بالـ Gap ممكن يختلف من جهاز لآخر ، قد يحتاج لتقليله أو زيادته .

Option Compare Database


Dim InTime As Single

Const Gap As Double = 0.02


Private Sub txtBadgeNo_BeforeUpdate(Cancel As Integer)

  Select Case Right(Me.txtBadgeNo.Text, 1)

    Case "+"

      Me.GrpInOut = 1

      Me.txtBadgeNo = Left(Me.txtBadgeNo.Text, Len(Me.txtBadgeNo.Text) - 1)

    Case "-"

      Me.GrpInOut = 2

      Me.txtBadgeNo = Left(Me.txtBadgeNo.Text, Len(Me.txtBadgeNo.Text) - 1)

  End Select

End Sub



Private Sub txtBadgeNo_KeyDown(KeyCode As Integer, Shift As Integer)

  If KeyCode = 13 Then

    If Timer - InTime > Gap Then Me.txtBadgeNo.Tag = ""

    Me.txtBadgeNo.Tag = Right(Me.txtBadgeNo.Tag, 4)

    Me.txtBadgeNo.Text = Me.txtBadgeNo.Tag

    Me.txtBadgeNo.Tag = ""

  End If

End Sub


Private Sub txtBadgeNo_KeyPress(KeyAscii As Integer)

  Select Case Chr(KeyAscii)

    Case "0" To "9", "+", "-"

      If Me.txtBadgeNo.Tag = "" Then InTime = Timer

      If Timer - InTime <= Gap Then

        Me.txtBadgeNo.Tag = Me.txtBadgeNo.Tag & Chr(KeyAscii)

        InTime = Timer

      Else

        Me.txtBadgeNo.Tag = Chr(KeyAscii)

        InTime = Timer

      End If

    Case Else

      Me.txtBadgeNo.Tag = ""

  End Select

End Sub

تحياتي .

قام بنشر

أخي العزيز بوهادي كيف حالك أنت والاخوان جميعا

طيب لو تكرمت ممكن تقول لي لو أحب أن أعمل مثل ماعملت أنا احتاج لإيش ؟

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

تحياتي لك

قام بنشر

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

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

انا شفت جهاز الباركود يركب مع الكيبورد

لكن الجديد الى شفته واعجبنى كثيرا

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

قام بنشر

السلام عليكم

البصمة وما أدراك .. لقد قامت إحدى الشركات بعمل تجربة واستدعينا 5 موظفين من مختلف الإدارات والنتيجة كانت مذهلة حيث فشل الجهاز بالتعرف على بصمة 3 من 5 !!.

ولكن يوجد بديل لنفس الفكرة تقريبا وهي قارئ كف اليد وهي أفضل بكثير من البصمة حيث هنا يقوم الجهاز بالتعرف على قياس اليد وليس البصمة ، ولكن يبقى هناك نسبة خطأ في التعرف على الكف كذلك .

عموما يبقى الباركود في نظري أفضل الحلول .

- سرعة فائقة .

- لا تحتاج إلى أجهزة إضافية .

- لا صيانة .

- طباعة البطاقات من خلال طابعة دسك جت ( يعني التكلفة لا تذكر ) .

تحياتي .

قام بنشر (معدل)

والله ياخوان تراني مافهمت شي من اللي قلتوه :lol:

هل الكلام السابق عن طباعة الملصقات او كيف يقوم الباركود بالقراءة وماهو السبب في تعدد ملصقات الباركود تحياتي :fff:

تم تعديل بواسطه ابوشاهر
قام بنشر (معدل)

السلام عليكم

اخواني الأعزاء جميعا .. أود أن أنوه أني هنا في الموضوع مشارك كغيري في إبداء الرأي وبطرح تجربتي . فآمل أن لا يزعل أحد علي وخصوصا الأخوين ha98 و أبو شاهر . فالحقيقة أنا لا أقوم عادة بشرح أمثلتي في مواضيعي فكيف بي أن أقوم بشرح برنامج متكامل قد اعتذرت عن عرضه ، ومع ذلك أنا وضعت أمامكم أصعب كود قمت بكتابته في هذا البرنامج :fff: .

ولكن أود أن أجيب لمن تاه في دوشة الكلام أن هذه الأداة حتى تستفيد منها فمن المؤكد أنت تحتاج إلى ملصق أو بطاقة تحتوي على رسم الباركود وكذلك أنت في حاجة إلى قارئ الباركود حتى تتمكن من قراءة هذا الملصق :d .

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

تحياتي .

تم تعديل بواسطه أبو هادي
  • 1 month later...

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information