[محمدالزند]

تم حل المشكلة
بهذا الكود

PHP كود :

Dim temp As New DataTable
        If Convert.ToBoolean(GetValueFromRegistry("WindowsOrSqlServer")) = True Then
            Cnn = New SqlConnection(CnnString)
        ElseIf Convert.ToBoolean(GetValueFromRegistry("WindowsOrSqlServer")) = False Then
            Cnn = New SqlConnection(CnnString1)
        End If

        Dim r As DataGridViewRow = Me.DataGridView1.CurrentRow
        Dim code = r.Cells("clcode").Value

        Dim cmd As New SqlCommand("Select [image1] From [PC] WHERE [code]=@code", Cnn)
        cmd.Parameters.AddWithValue("@code", code)
        If Cnn.State <> ConnectionState.Open Then Cnn.Open()
        Dim obj As Object = cmd.ExecuteScalar
        Cnn.Close()

        If obj IsNot Nothing AndAlso Not IsDBNull(obj) Then
            Dim stream As New IO.MemoryStream(CType(obj, Byte()))
            Dim img As Image = Image.FromStream(stream)

            Dim SaveFileAs As New SaveFileDialog
            SaveFileAs.Title = "Save File As"
            SaveFileAs.Filter = "Image Files (JPEG)|*.jpg;*.jpeg"
            If SaveFileAs.ShowDialog() = DialogResult.OK Then
                img.Save(SaveFileAs.FileName, Imaging.ImageFormat.Jpeg)
            End If
        End If