Depois de ter adicionado o FileUpload do ASP, e no botão do evento salvar, vamos converter em Byte();
Dim
img
As
FileUpload =
CType
(FileUpload1, FileUpload)
Dim
imgByte
As
Byte() = Nothing
If
img.HasFile
AndAlso Not
img.PostedFile
Is Nothing Then
Dim
File
As
HttpPostedFile = FileUpload1.PostedFile imgByte =
New Byte
(File.ContentLength - 1) {} File.InputStream.Read(imgByte, 0, File.ContentLength)
End If
Depois de converter, adicionamos;
Dim
con
As
MySqlConnection =
New
MySqlConnection(SEU_SERVIDOR)
Dim
cmd
As
MySqlCommand
Try
con.Open()
Dim
CmdSql
As String
= "INSERT INTO clientes (Nome, Foto) VALUES (@Nome, @Foto)" cmd = New MySqlCommand(CmdSql, con) cmd.Parameters.AddWithValue("@Nome", Txt_Nome.Text) cmd.Parameters.AddWithValue("@Foto", imgByte) cmd.ExecuteNonQuery()
Catch
ex
As
Exception MsgBox(ex.ToString)
Finally
con.Close()
End Try
E pronto, upamos uma imagem no banco de dados!
0 comentários:
Postar um comentário