Exite esse codigo do macoratti.net que ele mostra uma imagem do banco, mas ele também cria um arquivo da imagem na pasta do software.
Private Sub btnRecuperarImagem_Click(sender As Object, e As EventArgs) Handles btnRecuperarImagem.Click
Try
Dim oValor As String = InputBox("Informe o código da Imagem", "Recupera Imagens", "1", 400, 400)
If String.IsNullOrWhiteSpace(oValor) Then
Exit Sub
End If
Using con As New SqlConnection("Data Source=(LocalDB)\v11.0;Initial Catalog=Cadastro;Integrated Security=True")
Using com As New SqlCommand("Select Imagem from Impressoes where ID=@ID", con)
com.Parameters.AddWithValue("@ID", Convert.ToInt32(oValor))
con.Open()
Dim tempImagem As Byte() = DirectCast(com.ExecuteScalar(), Byte())
If tempImagem Is Nothing Then
MessageBox.Show("Imagem não localizada", "Erro")
Exit Sub
Else
Dim strArquivo As String = Convert.ToString(DateTime.Now.ToFileTime())
Dim fs As New FileStream(strArquivo, FileMode.CreateNew, FileAccess.Write)
fs.Write(tempImagem, 0, tempImagem.Length)
fs.Flush()
fs.Close()
picImagem.Image = Image.FromFile(strArquivo)
End If
End Using
End Using
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
End Subem fs as filestream ele gera um arquivo com o nome do valor strArquivo e gostaria de saber como posso fazer esse arquivo gerado ir para determinada pasta.
exemplo : o arquivo gerado ir para "C:\Fotos"
Agradeço
