Ir para conteúdo

Caio G Sa Silva

Members
  • Total de itens

    2
  • Registro em

  • Última visita

Reputação

0 Comum

Sobre Caio G Sa Silva

  1. eu já vi diversos vídeos no youtube,mas não consegui resolver o problema.
  2. Estou com problemas ao pesquisar fotos armazenadas no banco de dados MYSQL no PHPADMIN no picturebox e no datagridview <> Imports System.IO Imports System.Data.Odbc Imports System.Drawing.Imaging Public Class FrmAlunos_Cadastrados Private Sub listar() filtrar("select * from aluno", "aluno") DataGridView1.DataSource = dados DataGridView1.DataMember = "aluno" olecon.Close() End Sub Private Sub btnpesquisar_Click(sender As Object, e As EventArgs) Handles btnpesquisar.Click Dim comando = "select * from aluno where cod_rm =" + txtra.Text pesquisar(comando) If guarda.Read() Then txtra.Text = guarda(1).ToString() Dim bytePicData() As Byte bytePicData = guarda.Item("foto") Dim PicMemStream As New System.IO.MemoryStream(bytePicData) PictureBox1.Image = Image.FromStream(PicMemStream) Else MsgBox("RM não localizado") txtra.Clear() PictureBox1.Image = Nothing End If guarda.Close() olecon.Close() End Sub Private Sub btnlistar_Click(sender As Object, e As EventArgs) Handles btnlistar.Click listar() olecon.Close() End Sub Private Sub Button2_Click(sender As Object, e As EventArgs) Handles btnhome.Click FrmFuncionários.Show() Me.Close() End Sub Private Sub DataGridView1_CellContentClick(sender As Object, e As DataGridViewCellEventArgs) Handles DataGridView1.CellContentClick Dim linha = DataGridView1.CurrentCellAddress.Y txtra.Text = DataGridView1(1, linha).Value.ToString() Dim comando = "select * from aluno where cod_rm =" + txtra.Text pesquisar(comando) If guarda.Read() Then Dim bytePicData() As Byte bytePicData = guarda.Item("foto") 'o erro ocorre aqui erro: "An unhandled exception of type 'System.OverflowException' occurred in System.Data.dll Additional information: Operação aritmética resultou em um estouro." Dim PicMemStream As New System.IO.MemoryStream(bytePicData) PictureBox1.Image = Image.FromStream(PicMemStream) End If olecon.Close() guarda.Close() End Sub End Class </> gostaria de ajuda? Obs: o banco de dados está armazenado no php admin atráves do programa vertrigo e da conexão mysql ODBC.
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.