تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[كود] مشكلة ارجو حلها بيجاد الكود المناسب
#1
Exclamation 
السلام عليكم
انا يجماعة عملت برنامج ياريت حد يساعدنى فيه
هو برنامج للموظفين بس فية مشكله انه مرفق فى  صور مع كل موظف ايه الحل
بمعنى ايه الاكواد المطلبوه لكده انى اضيف صور ACCESS
الرد
تم الشكر بواسطة:
#2
Lightbulb 
يمكن ذلك من خلال تحويل الصورة الى نص أي
نفتح ملف الصورة و ندخله في فيجوال بيسك من خلال :
كود :
dim s as string
Open App.Path &"\pic.png" for input as #1
s=input$(LoF(1),1)
close #1

و ادخالها بشكل عادي في قاعدة البيانات
ملاحظة:إن pic.png هو مثال لاسم الصورة و يمكن إدخال أي صورة باستخدام أداة CommonDialog
عمر داوود
الرد
تم الشكر بواسطة:
#3
ويمكنك أيضا تحويل الصورة الى بايت (البيانات الاولية) وتخزينها في عمود نوع بياناته (كائن OLE )

PHP كود :
Dim ms As New System.IO.MemoryStream
        Dim img 
As Image PictureBox1.Image
        img
.Save(msImaging.ImageFormat.Jpeg)
 
       Dim buffer As Byte() = ms.GetBuffer 

كذلك تحويل أي نوع من الملفات الى بايت ليتم خزنها في قاعدة البيانات

PHP كود :
Dim pi As Byte() = File.ReadAllBytes("FileName"

بعد التحويل قم بالحفظ

PHP كود :
com.CommandText "insert into [TableName](ColumnName) values(@Image)" 
 
                   com.Parameters.AddWithValue("@Image"pi)
 
                   conSettings.Open()
 
                   com.ExecuteNonQuery()
 
                   conSettings.Close()
 
                   MsgBox("تم الحفظ"

حيث أن com إتصال سبق تعريفه
الرد
تم الشكر بواسطة: Omar 6.0
#4
أهلا أخي الكريم ، شاهد المثال الموجود في هذه المشاركه فيه كل الاكواد اللازمه لعمل ماتريد :

http://vb4arb.com/vb/thread-14874.html
الرد
تم الشكر بواسطة: Omar 6.0


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [vb6.0] مشكلة في تشغيل تطبيق تم إنشاءه بإستخدام VB6 محب الإسلام 7 150 03-10-18, 10:00 PM
آخر رد: محب الإسلام
  مشكلة عندي مشكلة في فتح قاعدة بيانات اكسس 2000 بيتم التعامل مع اكسس 97 fathyfarag122 3 57 03-10-18, 02:54 AM
آخر رد: عبدالله الصافي
  [vb6.0] مشكلة فى الكريستال ريبورت 4.6 ahmed ragab 9 201 02-10-18, 03:11 PM
آخر رد: ahmed ragab
  احبابى فى الله ارجو المساعدة برنامج طباعة الباركود mhareek 2 104 19-09-18, 07:37 PM
آخر رد: mhareek
  احبابى فى الله ارجو المساعدة تغير ربط قاعدة البينات من (.accdb) الى mbp mhareek 6 131 14-09-18, 11:18 PM
آخر رد: mhareek
  [vb6.0] حل مشكلة حفظ الصورة في ملف وليس على قاعدة البياناتDataBase عبدالقادرعواد 2 143 11-09-18, 02:45 PM
آخر رد: عبدالقادرعواد
  [vb6.0] مشكلة اللغة العربية فى النسخ واللصق ahmad.roz 6 220 27-08-18, 01:58 AM
آخر رد: عبدالله الصافي
  [سؤال] [تم الحل] مشكلة برنامج حساب نسب الموظفين awidan76 29 1,467 08-08-18, 08:51 PM
آخر رد: awidan76
  ربط اداة datareport مع قاعدة البينات عن طريق الكود عبدالله الصافي 2 179 15-07-18, 02:30 AM
آخر رد: عبدالله الصافي
  السلام عليكم ورحمة الله وبركاتة - ارجو المساعدة فى ترتيب البيانات داخل الفلكس جريد mhareek 4 211 14-07-18, 09:17 PM
آخر رد: mhareek

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


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