Cara Koneksi VB Ke Excel - Update kali ini farray akan berbagi artikel tentang bahasa pemrograman vb.net. Buat sobat pembaca yang suka buat program atau memang menggeluti dunia programming, mungkin artikel dari nubie ini udah pada tau.
Cara Koneksi VB Ke Excel |
Sekedar deskripsi singkat aja, disini farray mencoba berbagi cara koneksi vb ke excel. Bahasa pemrograman yang farray pakai vb.net 2010 express (pake yang free aja lah... :D) dan office 2007. Oke langsung aja liat videonya berikut ini y...
Kalo pengin ngintip cource codenya, silahkan baca selengkapnya dibawah ini, Enjoyed... :)
Imports System.Data.OleDb
Public Class Form1
Dim cn As OleDbConnection
Dim cm As OleDbCommand
Dim da As OleDbDataAdapter
Dim dt As DataTable
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'BUKAN KONEKSI KE DATABASE 'testfile.xls' (LOKASI 'testfile.xls' DI LOCALDISK 'C:')
cn = New OleDbConnection("provider=Microsoft.Jet.OLEDB.4.0; Data Source=c:\testfile.xls;Extended Properties=Excel 8.0;")
cn.Open()
da = New OleDbDataAdapter("select * from [Sheet1$]", cn)
dt = New DataTable
da.Fill(dt)
'SETTING DATAGRIDVIEW1
With DataGridView1
.AllowUserToAddRows = False
.BorderStyle = BorderStyle.None
.DataSource = dt
.Columns(0).HeaderText = "Id"
.Columns(1).HeaderText = "Nama Agen"
End With
cn.Close()
End Sub
End Class
Ini ScreenShoot data yang ada di textfile.xls
Dibawah ini ScreenShoot form setelah dijalankan.
Demikianlah artikel Cara Koneksi VB Ke Excel dari nubie, semoga dapat bermanfaat buat kita semua. Tolong jangan lupa like, comment dan share ke yang lainnya he... Sekian dari farray, semoga hari sobat menyenangkan... :)
Imports System.Data.OleDb
Public Class Form1
Dim cn As OleDbConnection
Dim cm As OleDbCommand
Dim da As OleDbDataAdapter
Dim dt As DataTable
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'BUKAN KONEKSI KE DATABASE 'testfile.xls' (LOKASI 'testfile.xls' DI LOCALDISK 'C:')
cn = New OleDbConnection("provider=Microsoft.Jet.OLEDB.4.0; Data Source=c:\testfile.xls;Extended Properties=Excel 8.0;")
cn.Open()
da = New OleDbDataAdapter("select * from [Sheet1$]", cn)
dt = New DataTable
da.Fill(dt)
'SETTING DATAGRIDVIEW1
With DataGridView1
.AllowUserToAddRows = False
.BorderStyle = BorderStyle.None
.DataSource = dt
.Columns(0).HeaderText = "Id"
.Columns(1).HeaderText = "Nama Agen"
End With
cn.Close()
End Sub
End Class
Ini ScreenShoot data yang ada di textfile.xls
Connect to excel with visual basic 2010 |
Cara koneksi vb ke excel |
Demikianlah artikel Cara Koneksi VB Ke Excel dari nubie, semoga dapat bermanfaat buat kita semua. Tolong jangan lupa like, comment dan share ke yang lainnya he... Sekian dari farray, semoga hari sobat menyenangkan... :)
0 comments:
Post a Comment