سورس کد نحوه کار با دیتابیس اکسس (MS Access) در ویژوال بیسیک دات نت (VB.Net)

سورس کد نحوه کار با دیتابیس اکسس (MS Access) در ویژوال بیسیک دات نت (VB.Net): راهنمای کامل و جامع

در دنیای برنامه‌نویسی، یکی از نیازهای اساسی، اتصال و مدیریت داده‌ها در بانک‌های اطلاعاتی است. یکی از محبوب‌ترین و در عین حال ساده‌ترین بانک‌های اطلاعاتی، MS Access است که به خاطر سادگی، کاربری آسان و کم‌حجم بودن، در پروژه‌های کوچک و متوسط کاربرد فراوان دارد. حال، فرض کنید می‌خواهید در محیط ویژوال بیسیک دات نت (VB.Net)، به صورت مؤثر و کارآمد با بانک اطلاعاتی اکسس کار کنید. در این مقاله، قصد دارم به طور کامل و جامع روند اتصال، خواندن، نوشتن، و مدیریت داده‌ها در بانک اکسس را شرح دهم، و در قالب نمونه کدهای کاربردی، نکات مهم و بهترین روش‌ها را بیاورم.
پیش‌نیازهای اولیه و آماده‌سازی
قبل از شروع، نیاز است که چند مرحله را انجام دهید. ابتدا، باید یک بانک اطلاعاتی اکسس ایجاد کنید. این کار به راحتی با برنامه Microsoft Access انجام می‌شود. برای نمونه، یک فایل جدید با نام `Database.accdb` بسازید و چند جدول ساده مثلا با نام‌های `Customers` و `Orders` ایجاد کنید. هر جدول باید شامل چند فیلد باشد، مثلا در جدول `Customers`، فیلدهای `CustomerID`، `Name`، و `Email`.
سپس، در پروژه ویژوال بیسیک دات نت خود، باید مرجع به `System.Data` و `System.Data.OleDb` را اضافه کنید، چون این فضاهای نام برای کار با بانک‌های اکسس حیاتی هستند. این کار از طریق منوی References در پروژه انجام می‌شود.
ایجاد اتصال به بانک اطلاعاتی
در زبان VB.Net، اتصال به بانک اکسس معمولاً با شیء `OleDbConnection` انجام می‌شود. رشته اتصال (Connection String) باید به شکل زیر باشد:

vb  


Dim connectionString As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\Database.accdb;"

در اینجا، `Provider` مشخص می‌کند که از چه موتور OLE DB استفاده می‌شود، و `Data Source` مسیر فایل بانک اطلاعاتی است. اگر بانک اطلاعاتی در مسیر دیگر قرار دارد، باید مسیر کامل آن را وارد کنید. مثلا:

vb  
Dim connectionString As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Databases\Database.accdb;"

سپس، یک شیء `OleDbConnection` ایجاد می‌کنید:

vb  
Dim conn As New OleDbConnection(connectionString)

در برنامه، قبل از هر عملیات، نیاز است که این اتصال را باز کنید:

vb  
conn.Open()

و بعد از عملیات، با `conn.Close()`، اتصال را ببندید تا منابع آزاد شوند. همچنین، بهتر است عملیات بانک اطلاعاتی را در قالب بلوک‌های `Try...Catch...Finally` قرار دهید تا از بروز خطاهای ناخواسته جلوگیری شود.
خواندن داده‌ها از بانک اکسس
برای خواندن داده‌ها، از شیء `OleDbDataAdapter` و `DataTable` استفاده می‌شود. فرض کنید می‌خواهید تمام ردیف‌های جدول `Customers` را نمایش دهید:

vb  
Dim dt As New DataTable()
Dim query As String = "SELECT * FROM Customers"
Dim da As New OleDbDataAdapter(query, conn)
Try  
conn.Open()
da.Fill(dt)
' حالا می‌توانید داده‌ها را در کنترل‌هایی مانند DataGridView نمایش دهید  
Catch ex As Exception  
MessageBox.Show("خطا در خواندن داده‌ها: " & ex.Message)
Finally  
conn.Close()
End Try  

در این نمونه، پس از پر کردن DataTable، می‌توانید داده‌ها را در کنترل‌های مختلف مانند DataGridView، ListBox، یا سایر کنترل‌ها نمایش دهید.
نوشتن داده‌ها در بانک اکسس
برای درج، به‌روزرسانی یا حذف داده‌ها، باید از دست... ← ادامه مطلب در magicfile.ir