'ini cara cari image dan simpen di db
dt adalah datatable
Private Sub BtnBrowse_Click(ByVal sender As
System.Object, ByVal e As System.EventArgs) Handles
BtnBrowse.Click
With OpenFileDialog1
'.InitialDirectory = "C:\"
.Filter = "All
Files|*.*|Bitmaps|*.bmp|GIFs|*.gif|JPEGs|*.jpg"
.FilterIndex = 2
End With
' When the user clicks the Open button
(DialogResult.OK is the only option;
' there is not DialogResult.Open), display the
image centered in the
' PictureBox and display the full path of the
image.
If OpenFileDialog1.ShowDialog() =
DialogResult.OK Then
PictureBox1.Image =
Image.FromFile(OpenFileDialog1.FileName)
'.SizeMode =
PictureBoxSizeMode.CenterImage
'.BorderStyle = BorderStyle.Fixed3D
'lblFilePath.Text =
OpenFileDialog1.FileName
Dim ms As New MemoryStream
PictureBox1.Image.Save(ms,
PictureBox1.Image.RawFormat)
Dim arrImage() As Byte = ms.GetBuffer
' Close the stream object to release the
resource.
ms.Close()
Dt.Rows(Currencymanager.Position)("picture") =
arrImage
End If
End Sub
'kalo ini load image dari db
Dim arrPicture() As Byte =
CType(DT.Rows(0)("Picture"), Byte())
Dim ms As New MemoryStream(arrPicture)
PictureBox1.Image = Image.FromStream(ms)
semoga membantu
Erwansyah
--- Dennie Rafiudin Achmad Fauzi
<[EMAIL PROTECTED]> wrote:
> Salam,
> Hola Semuanya,
>
> Maaf ni temen-temen, ane mo tanya gimana caranya
> masukin gambar ke database sql server melalui vb.net
> 2003 misalnya :
>
> untuk SIMPEG : kita mau masukin data karyawan baru,
> nah disana penginnya selain bisa masukin data-data
> karyawan tapi pengin masukin juga foto karyawan
> tersebut n masuk ke data base sprti data yang
> lainnya, begitu juga klo kita mau lihat data or edit
> tuh foto bisa dilihat or diganti ....
>
> Tooolooooooooongggggg!
>
> salam,
> nu nuju lier..
>
>
>
>
>
>
________________________________________________________
>
> Kunjungi halaman depan Yahoo! Indonesia yang baru!
> http://id.yahoo.com/
___________________________________________________________________________________
You snooze, you lose. Get messages ASAP with AutoCheck
in the all-new Yahoo! Mail Beta.
http://advision.webevents.yahoo.com/mailbeta/newmail_html.html
-----------------------------------------------
IndoPB - Indonesia PB User Group
An Indonesian PowerBuilder User Group's Event
2nd PowerBuilder Update
Rumah Sakit Jantung Harapan Kita
26/27 August 2006
To Register :
http://groups.yahoo.com/group/indopb/database?method=addRecord&tbl=4
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/indopb/
<*> Your email settings:
Individual Email | Traditional
<*> To change settings online go to:
http://groups.yahoo.com/group/indopb/join
(Yahoo! ID required)
<*> To change settings via email:
mailto:[EMAIL PROTECTED]
mailto:[EMAIL PROTECTED]
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
