سورس کد CRUD در VB.NET با کد منبع با دیتابیس اکسس mdb

سورس کد CRUD در VB.NET با کد منبع با دیتابیس اکسس mdb

برای CRUD در VB.NET با دیتابیس اکسس (MDB) به چه صورت عمل کنیم؟ در ادامه توضیحی جامع همراه با کد منبع ساده‌ای ارائه می‌کنم تا هم مفاهیم پایه هم پیاده‌سازی عملی روشن شود. این راهنما برای پروژه‌های ویندوز فرم (Windows Forms) یا کنسول قابل استفاده است، اما مثال‌ها به طور ساده قابل تعمیم به هر روش دیگری هستند.

1) مفاهیم پایه

  • CRUD مخفف Create (ایجاد)، Read (خواندن)، Update (به‌روز رسانی)، Delete (حذف) است.

  • دیتابیس اکسس با VB.NET معمولاً از فریمورک ADO.NET استفاده می‌کند و کلاس OleDb برای ارتباط با MDB کاربرد دارد.

  • برای امنیت و پایداری برنامه، از دستورات با پارامترها (Parameter) استفاده کنید تا از SQL Injection جلوگیری شود.

  • اتصال به MDB معمولاً با یک رشته ارتباطی (Connection String) ساده ساخته می‌شود که به فرم زیر است:

  • “Provider=Microsoft.ACE.OLEDB.12.0;Data Source=مسیر_فایل.mdb;Persist Security Info=False;”

    2) ساختار پروژه و طراحی ساده

  • یک فرم یا کلاس با عملیات پایه: Add (ایجاد)، Load/Read، Update، Delete.

  • یک کنترل نمایش داده مانند DataGridView برای دیدن داده‌ها و فرم‌های ورودی برای دریافت ستون‌ها.

  • جدولی فرضی با ساختار ساده: Students با ستون‌های Id (کلید اصلی)، Name، Age، Email.
  • 3) نمونه کد پایه برای اتصال و عملیات CRUD
    اینجا یک مثال ساده از یک کلاس کمکی DataAccess است که وظیفهٔ کار با MDB را بر عهده دارد. توجه کنید که مسیر MDB شما باید صحیح باشد.

  • کد VB.NET: کلاس DataAccess.vb
  • """ Imports System.Data Imports System.Data.OleDb

    Public Class DataAccess
    Private connectionString As String

    Public Sub New(dbPath As String)
    connectionString = $"Provider=Microsoft.ACE.OLEDB.12.0;Data Source=dbPath;Persist Security Info=False;"
    End Sub

    Public Function ExecuteNonQuery(sql As String, Optional parameters As List(Of OleDbParameter) = Nothing) As Integer
    Using conn As New OleDbConnection(connectionString)
    Using cmd As New OleDbCommand(sql, conn)
    If parameters IsNot Nothing Then
    cmd.Parameters.AddRange(parameters.ToArray())
    End If

    ...

    🔒

    متن کامل این فایل در سایت اصلی قرار دارد

    برای مشاهده اطلاعات کامل، جزئیات دقیق و دانلود این فایل، لطفاً روی دکمه زیر کلیک کنید. تمامی محتوا به صورت کامل در لینک اصلی در دسترس شماست.

    📥 مشاهده جزئیات کامل و دانلود