تقييم الموضوع :
  • 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] ما هي جملة الكود لعرض ازرار الرسائل بالعربية larbihamri 5 76 أمس, 12:36 AM
آخر رد: عبد العزيز البسكري
Thumbs Up مشكلة دعم اللغة العربية المبرمج العتيق 4 213 17-05-17, 07:43 AM
آخر رد: alma2
  مشكلة فى حجم البرنامج عبد الرحمن على 6 112 05-05-17, 12:44 PM
آخر رد: عبد الرحمن على
  ارجو المساعدة في اقرب وقت (حول ملأ الكمبو بوكس من جدول في قاعدة البيانات) larbihamri 6 183 01-05-17, 03:06 PM
آخر رد: mosamosa
  مشكلة في حفظ البيانات عن طريق الليست بوكس مصمم هاوي 3 82 28-04-17, 05:23 AM
آخر رد: Ahmed_Mansoor
  [vb6.0] ارجو المساعدة باجراء البحث بين MSHFlexGrid1 و MSHFlexGrid2 بحقل واحد و إجراء عملية ح عبدالقادرعواد 6 152 27-04-17, 11:56 AM
آخر رد: عبدالقادرعواد
  [vb6.0] طريقة ترقيم عمود في الداتا قريد و حل مشكلة الترقيم التلقائي في قاعدة البيانات larbihamri 9 235 16-04-17, 08:28 PM
آخر رد: larbihamri
  مشكلة في حفظ البيانات في الجدول مصمم هاوي 3 78 08-04-17, 07:34 AM
آخر رد: مصمم هاوي
  [vb6.0] مشكلة تعترضني كثيراً محمد ئوزبك 6 176 20-03-17, 11:32 PM
آخر رد: السيد الغالي
  مشكلة في Data environnement zine pef 15 341 19-03-17, 08:21 PM
آخر رد: sendbad100

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


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