tengo este codigo, con que grabo la imagen en un directorio especifico. Pero necesito su ayuda ya que se desea que sea transparente para el usuario.
En este caso, cuando grabo los datos, me pide el nombre de la imagen, digito el nombre de la imagen y graba todo ok, la imagen en el directorio que se quiere y los datos en la base de datos.
Lo que quiero cambiar, es no poner el dato o el nombre de la imagen, y que automaticamente este tome el dato que estara en el txt_codigo.text, y no asi digitando el codigo que le corresponde.
Código:
If Not Me.PictureBox1.Image Is Nothing Then
Dim saveFileDialog1 As New SaveFileDialog
saveFileDialog1.Filter = "JPeg Image|*.jpg|Bitmap Image|*.bmp|Gif Image|*.gif"
saveFileDialog1.Title = "Guarda como imagen JPG o BMP"
saveFileDialog1.InitialDirectory = "C:\Transito\fotos\"
saveFileDialog1.ShowDialog()
If saveFileDialog1.FileName <> "" Then
Dim fs As System.IO.Stream = CType(saveFileDialog1.OpenFile(), System.IO.FileStream)
Me.SaveFileDialog1.FileName = Me.txt_codigo.Text
Select Case saveFileDialog1.FilterIndex
Case 1
Me.PictureBox1.Image.Save(fs, _
System.Drawing.Imaging.ImageFormat.Jpeg)
Case 2
Me.PictureBox1.Image.Save(fs, _
System.Drawing.Imaging.ImageFormat.Bmp)
Case 3
Me.PictureBox1.Image.Save(fs, _
System.Drawing.Imaging.ImageFormat.Gif)
End Select
fs.Close()
End If
End If
gracias y felices fiestas.