25-04-18, 10:17 PM
ألف شكر لك
أنا فعلا أستخدم هذه المكتبة لكن وجدت فيها صعوبة نوعا ما في حفظ صورة الباركود داخل قاعدة البيانات بعد تحويلها إلى بايتات
كود التحويل الذي أستخدمه هو :
فإن كان لديك أي اقتراح أكون ممتنا
شكرا لك مرة أخرى
أنا فعلا أستخدم هذه المكتبة لكن وجدت فيها صعوبة نوعا ما في حفظ صورة الباركود داخل قاعدة البيانات بعد تحويلها إلى بايتات
كود التحويل الذي أستخدمه هو :
كود :
Public Function ConvertToData(ByVal MyImage As Image) As Byte()
Dim ms As New MemoryStream()
PicBarCode.BackgroundImage.Save(ms, System.Drawing.Imaging.ImageFormat.Bmp)
Dim mybyte(ms.Length - 1) As Byte
ms.Position = 0
ms.Read(mybyte, 0, ms.Length)
MsgBox(mybyte)
Return mybyte
End Functionفإن كان لديك أي اقتراح أكون ممتنا
شكرا لك مرة أخرى

