آپدیت ، حذف ، ویرایش بانک اکسس به صورت کد و مستقیم

[omid-vbAuto]

با سلام خدمت دوستان


خوب اکثر شما دوستان با کد زیر آشنا هستین :


Dim cnnStr1 As String
Dim ad As OleDbDataAdapter
Dim dt As New DataTable
OpenFileDialog1.ShowDialog()
TextBox2.Text = OpenFileDialog1.FileName
cnnStr1 = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source='" & TextBox2.Text & "'"

Form2.TextBox1.Text = cnnStr1


ad = New OleDb.OleDbDataAdapter("select * from [story 200]", cnnStr1)

dt = New DataTable
ad.Fill(dt)
DataGridView1.DataSource = dt


کد بالا میره یه فایل دیتا بیس اکسس رو باز میکنه.

حالا می خوام به همین شیوه بیام تغییرات انجام شده رو در بانکم آپدیت کنم ، و یا بیام ردیف خاصی رو حذف کنم.

البته به صورت فقط کد نویسی.

این رو هم بگم که از دوستان و اساتید خواهش دارم کلیه روشهای قابل انجام رو ذکر کنید و یه روش خاص اکتفا نکنید.مثلا روش پارامتری ، بایند و ...


با تشکر منتظر نشستم.

[reza_edu]

سلام دوست گرامي من دو روش ميدونم كه ميشه اين كار رو انجام داد روش اول بسيار ساده هست ولي يه مشكل داره كه كل اطلاعات ديتا گريدت رو با جدول ديتا بيس آپديت ميكنه اما اگه اطلاعات جدول رو بدونه دستكاري(فيلتر) يكجا ميريزي تو ديتا گريد ميتوني ازش استفاده كني لينك برنامه رو ميزارم تا استفاده كني از كد پرو جكت گرفتم : http://www.codeproject.com/KB/database/VB_DGV_UpdatingBoundDB.aspx
روش دوم اينكه سطر به سطر هر بار كه يه سطر به ديتا گريد اضافه ميكني تو يه ديتا تيبل يه سطر جديد درست كني و بعد اون سطر رو به ديتا بيست اظافه كني الان كه دارم مينويسم نمونه يا كد ندارم بزارم اما اگه پيدا نكردي بگو تا كامل توضيح بدم.