- [C#] Ẩn ứng dụng winform từ Apps vào Background Process trên Task Manager
- [SQLSERVER] Xử lý ngoại lệ sử dụng TRY...CATCH và RAISEERROR
- [C#] Bắt sự kiện bàn phím chuột bên ngoài ứng dụng winform sử dụng thư viện MouseKeyHook
- [DEVEXPRESS] Đặt mật khẩu và bỏ mật khẩu tập tin file PDF
- [C#] Thêm ứng dụng vào Taskbar sử dụng SharpShell DeskBand
- [C#] Hướng dẫn thêm text vào hình ảnh icon winform
- [C#] Chia sẽ tổng hợp source code đồ án về Csharp
- [C#] Hướng dẫn viết ứng dụng quay màn hình video winform, Screen Recorder
- [C#] Hướng dẫn sử dụng thư viện Input Simulator để làm việc với Keyboard, Mouse Virtual
- [DEVEXPRESS] Hướng dẫn tích Filter Contain khi click chuột phải vào cell selection trên Gridview
- [C#] Tra cứu mã số thuế cá nhân bằng CMND hoặc CCCD
- [C#] Convert hình ảnh image thành Blurhash sử dụng trong loading image winform
- [POWERSHELL] Script sao lưu backup và nén database sqlserver
- [C#] Giới thiệu thư viện Autofac Dependency Injection
- [C#] Hướng dẫn tạo Windows Services đơn giản Winform
- [C#] Một click chuột điều khiển máy tính từ xa sử dụng Ultraviewer
- Hướng dẫn đóng gói phần mềm sử dụng Powershell biên dịch script thành file exe
- [C#] Hướng dẫn sử dụng Task Dialog trên NET 5
- [C#] Hướng dẫn xem lịch sử các trang web đã truy cập trên Chrome Browser
- [C#] Hướng dẫn lấy thông tin Your ID và Password của Ultraviewer Winform
Kết nối với cơ sở dữ liệu Microsoft Access
Hướng dẫn kêt nối cơ sở dữ liệu Microsoft Access với vb.net. Như ta, đã biết Ms. Access là hệ quản trị cơ sở dữ liệu, ta thể đi kèm chung với phần mềm một cách dễ dàng, mà không cần phải cài đặt một hệ quản trị cơ sở dữ liệu khác, ví dụ: nếu phần mềm viết trên hệ thống nhỏ thì microsoft access là sự lựa chọn hợp lý nhất.
Hôm nay mình sẽ hướng dẫn các bạn cách kết nối đến cơ sơ dữ liệu MS.Access.
1. Thư viện cần thiết:
Imports System.Data.OleDb
2. Câu lệnh kết nối đến Access:
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Application.StartupPath & "SX.mdb
Lưu ý: Câu lệnh trên chỉ kết nối đến MS.Access có đuôi mở rộng là “*.mdb”. Ví dụ trong bài này mình sử dụng database tên là “sx.mdb”.
3. Mở kết nối
Public Sub Open_DataAccess()
Dim s As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Application.StartupPath & "SX.mdb"
strcon.ConnectionString = s
strcon.Open()
End Sub
4. Đóng kết nối
Public Sub Close_Connect()
strcon.Close()
End Sub
5. Load dữ liệu
Public Function Load_Data() As DataSet
Dim dsHienThi As New DataSet
Dim s As String = "select mahomh,maloaimh,mamh,tenmh from DL_MatHang"
Open_DataAccess()
Dim daShowData As New OleDbDataAdapter(s, strcon)
daShowData.Fill(dsHienThi, "DL_MatHang")
Close_Connect()
Return dsHienThi
End Function
6. Update, Save, Delete:
Public Sub Delete_Update_Save(ByVal strLenh As String)
Open_DataAccess()
Dim cmd As New OleDbCommand(strLenh, strcon)
cmd.ExecuteNonQuery()
Close_Connect()
End Sub
Chúc các bạn thành công!