تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مشكلة في ارسال بارميتير من نوع الصورة
#1
السلام عليكم اريد ارسال براميتر من نوع الصورة كpictureBox للكلاس المتواجد فيه داله 
 (CategoriesClass.Insert(Text_Num.Text, Text_Name.Text, Text_Pri.Text, ComboBox1.SelectedValue, PictureBox3.BackgroundImage
خطأ في جملة  PictureBox3.BackgroundImage
وبارك الله فيكم
الرد
تم الشكر بواسطة:
#2
وعليكم السلام ورحمة الله

أين الدالة أخي الكريم؟
الرد
تم الشكر بواسطة:
#3
(Shared Sub Insert(ByVal Num As String, ByVal Name As String, ByVal price As String, ByVal Types As String, ByVal pic As PictureBox
هذة الدالة الموجودة في كلاس ولكن عند ارسال متغير Pic من نوع الصورة كيف ارسل PictureBox3.BackgroundImage
 (CategoriesClass.Insert(Text_Num.Text, Text_Name.Text, Text_Pri.Text, ComboBox1.SelectedValue, PictureBox3.BackgroundImage
خطأ في  PictureBox3.BackgroundImage كيف ارسلها الصورة الي دالة التي متغيرها pic
الرد
تم الشكر بواسطة:
#4
طلبت منك الدالة لتعديلها بشكل أفضل، ولكن بما أنك لا تريد وضعها جرب هذه الطريقة للتعامل معها
PHP كود :
CategoriesClass.Insert(Text_Num.TextText_Name.TextText_Pri.TextComboBox1.SelectedValuePictureBox3
الرد
تم الشكر بواسطة:
#5
لا ياأخي هذة كل دالة 
(Shared Sub Insert(ByVal Num As String, ByVal Name As String, ByVal price As String, ByVal Types As String, ByVal pic As PictureBox)
        Dim cmd As New SqlCommand("INSERT INTO Categories (Num,Name,price,Types,pic) VALUES(@Num,@Name,@price,@Types,@pic
       ( cmd.Parameters.AddWithValue("@Num", Num
        (cmd.Parameters.AddWithValue("@Name", Name
        (cmd.Parameters.AddWithValue("@price", pric
       ( cmd.Parameters.AddWithValue("@Types", Types
        {}=Dim imageData() As Byte 
        Dim ms As New IO.MemoryStream
 (BackgroundImage.Save(ms, pic.BackgroundImage.RawFormat
        imageData = ms.GetBuffer
       ( cmd.Parameters.AddWithValue("@pic", imageData
        (ExecuteCommand(cmd
    End Sub

واعتذر لم اقصد والله

وبارك الله فيك نجحت الطريقة واعتذر للمرة التانية
الرد
تم الشكر بواسطة: a.wagdi
#6
(25-12-18, 02:09 PM)Adata كتب : لا ياأخي هذة كل دالة 
(Shared Sub Insert(ByVal Num As String, ByVal Name As String, ByVal price As String, ByVal Types As String, ByVal pic As PictureBox)
        Dim cmd As New SqlCommand("INSERT INTO Categories (Num,Name,price,Types,pic) VALUES(@Num,@Name,@price,@Types,@pic
       ( cmd.Parameters.AddWithValue("@Num", Num
        (cmd.Parameters.AddWithValue("@Name", Name
        (cmd.Parameters.AddWithValue("@price", pric
       ( cmd.Parameters.AddWithValue("@Types", Types
        {}=Dim imageData() As Byte 
        Dim ms As New IO.MemoryStream
 (BackgroundImage.Save(ms, pic.BackgroundImage.RawFormat
        imageData = ms.GetBuffer
       ( cmd.Parameters.AddWithValue("@pic", imageData
        (ExecuteCommand(cmd
    End Sub

واعتذر لم اقصد والله

وبارك الله فيك نجحت الطريقة واعتذر للمرة التانية


وفيك بارك أخي الكريم
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  طريقة تكرار الامر تلقائيا | حل مشكلة script error في webbrowser عند فتح صفحة ما soloxocf1 6 267 أمس, 09:16 AM
آخر رد: 5000
  مشكلة فى تحزيم البرنامج ؟ احمد خطاب 1 71 15-03-19, 08:18 PM
آخر رد: 5000
  حفظ الصورة محمد خيري 4 99 12-03-19, 10:25 PM
آخر رد: محمد خيري
  مشكلة في إضافة الصنف بالباركود في الفاتورة Hamoody 3 101 12-03-19, 06:44 PM
آخر رد: elgokr
  حل مشكلة حاتمي 1 63 09-03-19, 07:31 PM
آخر رد: حريف برمجة
  [VB.NET] مشكلة تظهر عند تنصيب فيجوال ستوديو 2019 اباذر 3 130 09-03-19, 12:41 AM
آخر رد: اباذر
  [VB.NET] مشكلة Data Type Mismatch in criteria expression basboos95 3 160 01-03-19, 04:19 PM
آخر رد: elgokr
  [VB.NET] مشكلة فى عرض محتويات DataGridView فى TextBox mr_hso 9 306 26-02-19, 09:18 PM
آخر رد: mr_hso
  مشكلة في تصدير الداتا الى PDF alshandodi 3 129 22-02-19, 07:58 PM
آخر رد: elgokr
Photo مشكلة في تسطيب كريستال ريبورت عند العميل صالح حمادي 4 158 21-02-19, 01:34 PM
آخر رد: elgokr

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


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