- [VB.NET] Chia sẻ source code lịch âm dương và hẹn lịch nhắc việc
- [C#] Hướng dẫn đọc thông số thiết bị Thiết bị kiểm tra Pin (HIOKI BATTERY HiTESTER BT3562)
- [VB.NET] Hướng dẫn giải captcha sử dụng dịch vụ AZCaptcha API trên winform
- [C#] Hướng dẫn chứng thực đăng nhập ứng dụng bằng vân tay (Finger Print) trên máy tính
- [C#] Color Thief cách xuất màu sắc thiết kế từ hình ảnh
- [C#] Cách tạo bản quyền và cho phép dùng thử ứng dụng Winform
- [C#] Hướng dẫn sử dụng trình duyệt web Chrome convert HTML sang tập tin file PDF
- [C#] Kết nôi điện thoại Android, IOS với App Winform via Bluetooth
- [DATABASE] Cách query cộng trừ dồn dần trong Sqlserver
- [C#] Thiết kế ứng dụng Console đẹp với thư viện Spectre.Console
- [C#] Thiết kế ứng dụng Single Instance và đưa ứng dụng lên trước nếu kiểm tra ứng dụng đang chạy
- [C#] Giới thiệu JSON Web Token và cách đọc chuỗi token
- [C#] Cách tăng giảm font chữ tất cả các control trên winform
- [DEVEXPRESS] Tích hợp chức năng Tìm kiếm Search vào CheckedComboboxEdit
- [C#] Gởi email Metting Calendar Reminder kèm nhắc thời gian lịch họp
- [C#] Tìm kiếm xem danh sách từ khóa có tồn tại trong đoạn văn bản hay không
- [C#] Thiết kế giao diện ứng dụng trên Console sử dụng thư viện Terminal.Gui
- [C#] Hướng dẫn tạo mã VietQR Payment API Winform
- [C#] Sử dụng thư viện BenchmarkDotNet đo hiệu năng của hảm Method
- [DEVEXPRESS] Tìm kiếm không dấu tô màu highlight có dấu trên C# Winform
Hướng dẫn kết nối VB.NET với cơ sở dữ liệu Microsoft Excel.
Hôm nay mình sẽ hướng dẫn cho các bạn cách kết nối tới file Excel. Trong bài hướng dẫn dưới dây mình chỉ hướng dẫn kết nối đến file Excel 2003, còn các file Excel có phiên bản cao hơn các bạn tự nghiên cứu hen…
Tương tự như bài viết kết nối dữ liệu đến file Access ta cũng sử dụng đến thư viện sau:
Imports System.Data.OleDb
- Chuổi kết nối đến file dữ liệu Excel 2003 như sau:
Dim strcon As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Fileexcel & ";Extended Properties=Excel 8.0"
Trong đó “FileExcel” chính là file Excel mà bạn cần duyệt đến.
Viết hoàn chỉnh như sau:
Dim excelcon As New OleDbConnection
Public str_excel As String
Public Sub connect_to_excel()
Dim strcon As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & str_excel & ";Extended Properties=Excel 8.0"
excelcon.ConnectionString = strcon
excelcon.Open()
End Sub
- Load dữ liệu vào dataset như sau:
Public Function getdata_excel(ByVal Sheetname As String) As DataSet
Dim ds As New DataSet
connect_to_excel()
Dim strsql As String = "select * from [" + Sheetname + "$]"
Dim da As New OleDbDataAdapter(strsql, excelcon)
da.Fill(ds)
close_excel()
Return ds
End Function
- Load dữ liệu lên form
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
OpenFileDialog1.Filter = "Excel files |*.xls"
If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
str_excel = OpenFileDialog1.FileName
Dim ds As New DataSet
ds = getdata_excel(catten_file(OpenFileDialog1.FileName))
DataGridView1.DataSource = ds.Tables(0)
End If
End Sub
Đến đây xem như hoàn tất. Lưu ý trong giới hạn bài viết cơ bản, tên file Excel với tên Sheet bạn đặt giống nhau.
Chúc các bạn thành công!
Demo: Kết nối VB.NET với cơ sở dữ liệu Microsoft Excel