PDA

View Full Version : سوال: ذخیره اطلاعات در دیتا گرید



mehdiasadi50
پنج شنبه 09 خرداد 1392, 23:34 عصر
بسم الله الرحمن الرحیم
با سلام خدمت دوستان عزیز
من چون مبتدی هستم این سوال را میکنم . خیلی جستجو کردم اما به نتیجه ای نرسیدم
من به دیتا بیس متصل میشوم و اطلاعات نشان داده میشوند و اطلاعات جدید را وارد میکنم اما بعد از بستن برنامه هیج اطلاعاتی در دیتا بیس ذخیره نمی شود
لطفا دوستان برای کد نویسی راهنمایی کنند
یا علی مدد

Fery666
پنج شنبه 09 خرداد 1392, 23:46 عصر
بسم الله الرحمن الرحیم
با سلام خدمت دوستان عزیز
من چون مبتدی هستم این سوال را میکنم . خیلی جستجو کردم اما به نتیجه ای نرسیدم
من به دیتا بیس متصل میشوم و اطلاعات نشان داده میشوند و اطلاعات جدید را وارد میکنم اما بعد از بستن برنامه هیج اطلاعاتی در دیتا بیس ذخیره نمی شود
لطفا دوستان برای کد نویسی راهنمایی کنند
یا علی مدد

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

mehdiasadi50
جمعه 10 خرداد 1392, 00:21 صبح
دوست عزیز کد به درد بخوری نتونستم پیدا کنم اگر امکان داره کد را بنویسید تا امتحان کنم

pooya1072
جمعه 10 خرداد 1392, 03:18 صبح
سلام
آیا دستور update رو اجرا میکنید؟
اگه نه .... با همون دیتا آداپتری که Dataset یا DataTable رو پر کردید دستور update رو اجرا کنید تا اطلاعات رو به بانک اطلاعاتی منتقل کنه .

sirjan1
جمعه 10 خرداد 1392, 05:22 صبح
با update که نمیشه اطلاعات دیتاگرید رو ذخیره کرد میشه؟؟
من فکر میکردم فقط مقدارهای تکس باکس رو میتونیم .خب برای دیتاگرید چه جوری؟

mehdiasadi50
جمعه 10 خرداد 1392, 11:26 صبح
دوستان ممنون که جواب دادید . اگر به عنوان مثال
نام جدول: student
نام فیلدها : name - lastnane
کدی که نوشتم این است
(OleDbDataAdapter1.Update(Data1DataSet1
چطور باید کد را بنویسم. من مجموعه آموزشی تهیه کردم اما این را توضیح نداده . لطفا کد را کامل بنویسید
یا علی مدد

Fery666
جمعه 10 خرداد 1392, 23:57 عصر
اینم کد برای ثبت اطلاعات در دیتابیس :


Imports System.Data.OleDb
Imports System.Data
این دو خط رو قسمت General مینویسی .


Dim StrCon As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & My.Computer.FileSystem.CurrentDirectory & "\DB.mdb;Persist Security Info=False"
Dim con As New OleDb.OleDbConnection(StrCon)
ِDim DRow As DataRow

این 3 خط رو هم قسمت متغیر ها مینویسی .

این برای ثبت هستش :



con.Open()
strsql = "Select * From student"
DS = New DataSet
DA = New OleDbDataAdapter(strsql, con)
DT = New DataTable
DA.Fill(DS, "student")
DT = DS.Tables("student")
DRow = DT.NewRow
DRow("name ") = t_user.Text
DRow("lastnane") = t_name.Text
DT.Rows.Add(DRow)
Dim CB As New OleDbCommandBuilder(DA)
DA.Update(DS, "student")
con.Close()


برای ثبت اطلاعات در دیتابیس هستش .

mehdiasadi50
شنبه 11 خرداد 1392, 00:46 صبح
ممنون از همه دوستان عزیز انشاءالله موفق باشید
یا علی مدد