[alsalamoni]

(06-02-20, 02:11 AM)محمدالزند كتب : بحاول احفظ صورة علي الجهاز  متخزنة في قاعدة البيانات BIT

PHP كود :

 Dim x() As Byte
        Dim temp As Object = Nothing
        x = temp.Rows(0).Item("image1")
        Dim ms As New MemoryStream(x)
        pbox.Image = Image.FromStream(ms)
        ms.Dispose()
        ofd.FileName = ""
        ofd.Filter = "Image Files (JPEG,GIF,BMP,PNG,ICO)|*.jpg;*.jpeg;*.gif;*.bmp;*.png;*ico"
        Dim SaveFileAs As New SaveFileDialog
        SaveFileAs.Title = "Save File As"
        SaveFileAs.FileName = ""
        SaveFileAs.Filter = "Image Files (JPEG,GIF,BMP,PNG,ICO)|*.jpg;*.jpeg;*.gif;*.bmp;*.png;*ico"
        If SaveFileAs.ShowDialog() = System.Windows.Forms.DialogResult.OK Then
            pbox.Image.Save(SaveFileAs.FileName, Imaging.ImageFormat.Jpeg)
        End If 


كود :

If DataGridView1.SelectedRows.Count > 0 Then
   pbox.Image = DataGridView1.SelectedRows(0).Cells("image1").Value
   If pbox.Image IsNot Nothing Then
       Dim SaveFileAs As New SaveFileDialog
       SaveFileAs.Title = "Save File As"
       SaveFileAs.Filter = "Image Files (JPEG)|*jpg;*.jpeg"
       If SaveFileAs.ShowDialog() = DialogResult.OK Then
           pbox.Image.Save(SaveFileAs.FileName, Imaging.ImageFormat.Jpeg)
       End If
   End If
End If