Dim cmd As OleDbCommand = New OleDbCommand("select * from mainDB where Surname = @surname", myConnection)
cmd.Parameters.Add("@surname", OleDbType.VarChar).Value = TextBox1.Text
Dim adapter As New OleDbDataAdapter(cmd)
Dim table As New DataTable()
adapter.Fill(table)
TextBox4.Text = table.Rows(0)(1).ToString()
TextBox5.Text = table.Rows(0)(2).ToString()
TextBox6.Text = table.Rows(0)(3).ToString()
TextBox7.Text = table.Rows(0)(9).ToString()
TextBox8.Text = table.Rows(0)(4).ToString()
TextBox9.Text = table.Rows(0)(5).ToString()
RichTextBox1.Text = table.Rows(0)(6).ToString()
RichTextBox2.Text = table.Rows(0)(10).ToString()
RichTextBox3.Text = table.Rows(0)(7).ToString()
TextBox10.Text = table.Rows(0)(0).ToString()
PictureBox1.Image = Image.FromStream(str)
myConnection.Close()
私はこの作品を作ろうと何時間もグーグルで行いました。イメージはDBに文字列として格納されます(パスを使用)DBから画像をロードしようとすると画像が表示されません
私の構文は正しいですか?
これはDBに画像をアップロードする私の方法です:
Private Sub newImgbtn_Click(sender As Object, e As EventArgs) Handles newImgbtn.Click
Try
OpenFileDialog1.ShowDialog()
OpenFileDialog1.Filter = "Jpeg|*.jpg"
strFileName = OpenFileDialog1.FileName
PictureBox1.Image = Image.FromFile(strFileName)
Catch ex As Exception
MsgBox("Upload Cancelled")
End Try
次に文字列を経由してDBに送信:
cmd.Parameters.Add("@picture", OleDb.OleDbType.VarChar).Value = strFileName
コードは完成しましたか?その_str_変数が突然あなたのコードに現れ、Streamインスタンスとして使用されていますか? – Steve
DBに正確に何を保存しましたか?バイト?ファイル名?おそらくストリームではない - SQL Serverはこれを行うことはできるが、アクセスはできない。あなたはそれのためのアダプタとDataTableを必要としません--DbReaderは十分でしょう – Plutonix
@Plutonixこれは私がDBへのパスをアップロードするために使用したものです:cmd.Parameters.Add( "@ picture"、OleDb.OleDbType.VarChar)。値= strFileName –