تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
السلام عليكم تصحيح الكود
#1
PHP كود :
     Sondoss_Connection()
 
       Dim Cmd As New SqlCommand()
 
       With Cmd
            
'  Dim RX As New SqlConnection(Sondoss_Connection)

            Cmd.Connection = RX
            Cmd.CommandType = CommandType.Text
            '
Cmd.CommandText "INSERT INTO agsat_s3 Photo2=@Photo2 Where idz=@idz
            Cmd.CommandText = "
UPDATE agsat_s3 SET Photo2=@Photo2 Where idz=@idz"
            Cmd.Parameters.Clear()

            'Update PictureBox
            Dim Ms_Photo As New MemoryStream()
            Dim bmpImage As New Bitmap(PictureBox2.Image)
            bmpImage.Save(Ms_Photo, System.Drawing.Imaging.ImageFormat.Jpeg)
            Dim Data_Photo As Byte() = Ms_Photo.GetBuffer()
            Dim PhotoPersonnelle As New SqlClient.SqlParameter("
@Photo2", SqlDbType.Binary)
            PhotoPersonnelle.Value = Data_Photo
            Cmd.Parameters.Add(PhotoPersonnelle)

            Cmd.Parameters.AddWithValue("
@idz", SqlDbType.Int).Value = TextBox9.Text

        End With
        Try
            If Conn.State = 1 Then Conn.Close()
            Conn.Open()
            Cmd.ExecuteNonQuery()
            Conn.Close()
            Cmd = Nothing
            MessageBox.Show("
تمت بنجاح عملية حفظ الصورة و تعديل البيانات", "تعديل البيانات", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
        Catch ex As Exception
            Conn.Close()
            MsgBox(Err.Description, MsgBoxStyle.Information)
        Finally
            If Conn.State = ConnectionState.Open Then Conn.Close()
        End Try 
هنا الخطاء 
     Sondoss_Connection()
       Dim Cmd As New SqlCommand()
       With Cmd
           '  Dim RX As New SqlConnection(Sondoss_Connection)

           Cmd.Connection = RX
           Cmd.CommandType = CommandType.Text
           'Cmd.CommandText = "INSERT INTO agsat_s3 Photo2=@Photo2 Where idz=@idz
           Cmd.CommandText = "UPDATE agsat_s3 SET Photo2=@Photo2 Where idz=@idz"
           Cmd.Parameters.Clear()

تظهر رسالة  ExecuteNonQuery



ما هو الحل بارك الله فيكم.
الرد
تم الشكر بواسطة: أسعد


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] السلام عليكم mbou5060 0 663 05-11-20, 01:49 AM
آخر رد: mbou5060
  شرح بالصور لطريقة استخدام و كتابة قصاصات الكود Code Snippet المرفقة مع VB.Net Mohamad Anan 4 3,959 07-12-18, 08:45 AM
آخر رد: محمد خرد
  تصميم الواجهات من أهم الامور بعد الكود في المشاريع viv 6 2,253 10-05-18, 03:33 AM
آخر رد: ملهمـ
  السلام عليكم اخواني محتاج مساعدة بسيطة اوس باسم عبد الحميد 2 1,395 15-05-17, 11:56 PM
آخر رد: اوس باسم عبد الحميد
  Conventers مجموعة برمج لتحويل الكود بين لغات البرمجه zinom 2 2,208 29-12-15, 01:30 AM
آخر رد: zinom
  كيفية تغيير خلفية محرر الكود في Visual Studio 2010 إلى صورة أبو عمر 0 2,795 06-09-15, 06:44 PM
آخر رد: أبو عمر
  معلومة :: الحل لمشكلة الخطأ في الكود For Each i As Button In Me.Controls Aly El-Haddad 2 2,393 10-11-12, 09:15 PM
آخر رد: Mr. DotNet
  جديد 2010- اكتب الكود الذي سيستخدم فئتك ثم قم بإنشائها RaggiTech 0 1,369 03-10-12, 12:27 PM
آخر رد: RaggiTech
  الدالة Environ العظيمه جميع بيانات الحاسب فى يدك بسطر واحد من الكود RaggiTech 0 1,579 02-10-12, 04:40 PM
آخر رد: RaggiTech

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


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