تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] تصدير صورة من السكانر
#1
السلام عليكم ورحمة الله
استخدمت برنامج الاخ عبد الله الدوسري لاخذ صورة من السكانر وهو يعمل بالشكل المطلوب
لكن المشكله الان اني لا استطيع حفظ هذه الصورة الى القرص الصلب
كيف اقوم بذلك

- برنامج الاخ عبد الله بالمرفقات


الملفات المرفقة
.rar   Scanner Project VB2008.rar (الحجم : 925.98 ك ب / التحميلات : 301)
الرد
تم الشكر بواسطة:
#2
وعليكم السلام ورحمة الله وبركاته

اخي بعد ما تعرض الصورة في اداة الصور

هذا كود حفظ الصورة في مجلد البرنامج

كود :
PictureBox1.Image.Save(Application.StartupPath & "\Img1.jpeg", Imaging.ImageFormat.Jpeg)
ولو حبيت تحفظها في القرص المحلي C

يكون الكود كالتالي :

كود :
PictureBox1.Image.Save("C:" & "\Img1.jpeg", Imaging.ImageFormat.Jpeg)
الرد
تم الشكر بواسطة: prj
#3
You can use SaveFileDialog

Try this

كود :
If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
PictureBox1.Image.Save(SaveFileDialog1.FileName, Imaging.ImageFormat.Bmp)
End If

RolleyesRolleyesRolleyes
{‏‏ يَرْفَعِ اللَّهُ الَّذِينَ آمَنُوا مِنكُمْ وَالَّذِينَ أُوتُوا الْعِلْمَ دَرَجَاتٍ‏ }

 " Mohamed M. Bedair     -     " Abu Anas
Genius Live , Egypt
الرد
تم الشكر بواسطة: prj
#4
السلام عليكم ورحمة الله وبركاته

يا اخوان الصور لا تظهر في اداة PictureBox1
تظهر في اداة Panel16
فكيف الحل مع الحفظ رعاكم الله
الرد
تم الشكر بواسطة: prj
#5
كود :
If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
Panel16.BackgroundImage.Save(SaveFileDialog1.FileName, Imaging.ImageFormat.Bmp)
End If
(وَقُل رَّبِّ زِدْنِي عِلْمًا)

الرد
تم الشكر بواسطة: aftfm , prj
#6
الف شكر على تعاونك اخي العزيز kslawy

لكن بعد وضع الكود والتنفيذ ظهر خطاء

لم يتم تعيين مرجع كائن لمثيل كائن.
الرد
تم الشكر بواسطة: prj
#7
هل أنت متأكد أن الصورة موجودة بأداة Panel16 Huh
(وَقُل رَّبِّ زِدْنِي عِلْمًا)

الرد
تم الشكر بواسطة: prj
#8
شكرا على تعاونكم جميعا لكن الصورة لا يتم عرضها في اي اداة تابعة للفجوال انما اداة مستقلة من leadtools اسمها RasterImageViewer
الرد
تم الشكر بواسطة:
#9
هذا كود اضافة صورة من RsterImageviewer1 الي قاعدة البيانات
  Dim myimage As RasterImage
                myimage = RasterImageViewer1.Image
                Dim ms As New IO.MemoryStream()
                Dim bmpImage As New Bitmap(myimage.ConvertToGdiPlusImage())
                bmpImage.Save(ms, System.Drawing.Imaging.ImageFormat.Jpeg)
                Dim data As Byte() = ms.GetBuffer()
                cmd.Parameters.AddWithValue("x2", data)

انا ابحث عن مكتبة leadtools.codecs.cmp.dll
من لديه ينزله من فضلكم 
وشكرا
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] تصدير قاعدة بيانات SQL لملفAccess ahmedmansour 1 86 27-02-19, 03:40 AM
آخر رد: elgokr
  تصدير البيانات الى ملف اكسل ابراهيم ايبو 3 125 23-02-19, 10:59 PM
آخر رد: asemshahen5
  مشكلة في تصدير الداتا الى PDF alshandodi 3 129 22-02-19, 07:58 PM
آخر رد: elgokr
  [كود] طريقة البحث عن صورة في قاعدة البيانات access باستعمال صورة أخرى technomedia 6 194 20-02-19, 04:01 PM
آخر رد: elgokr
  عرض صورة في الكريستال ريبورت ولكنها موجوده في جدول منفصل Emam emam 8 259 07-02-19, 04:34 PM
آخر رد: عبد العزيز البسكري
  عرض صورة في الكريستال ريبورت Emam emam 11 375 02-02-19, 10:42 PM
آخر رد: Emam emam
  [VB.NET] مشكلة في تصدير بيانات الى إكسيل محمد بوقزاحة 3 163 26-01-19, 11:29 PM
آخر رد: محمد بوقزاحة
  [VB.NET] تصدير بيانات من DGV الى ملف اكسيل محمد بوقزاحة 1 121 24-01-19, 03:52 PM
آخر رد: sendbad100
  مشكلة برفع صورة من خلال الويب براوزر ابو روضة 7 274 23-01-19, 07:12 PM
آخر رد: elgokr
  مسح صورة من الملف الموجود في البرنامج hassan 14 23 848 08-01-19, 01:50 PM
آخر رد: hassan 14

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


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