PDA

View Full Version : مبتدی: دخیره یک رکورد جدید در بانک اطلاعاتی اکسس



mohsen-bn
پنج شنبه 27 مرداد 1390, 12:46 عصر
سلام من میخوام تو datagrid که یه سطر ایجاد کردم و فیلداشو پر کردم با کلیک بر روی یک دکمه اطلاعات تو دیتابیس ذخیره بشه چجوری این کارو بکنم بانکو چجوری باز کنم؟ dataset,oledb?

milad.biroonvand
پنج شنبه 27 مرداد 1390, 23:06 عصر
سلام

باید از بایندینگ استفاده کنی ، تو وبی 6 یه امکان وجود داشت به اسمه allow update ولی تو وبی دات نت ، چون مستقیما از رکوردست استفاده نمی کنیم ، باید از بایندینگ استفاه کنی .
در اینجا هم میشه ، از ado استفاده کرد .

ahmadreza517
جمعه 28 مرداد 1390, 15:16 عصر
سلام دوست عزیز
به آدرس زیر سر بزن (پروژه کامل)

http://howprg.blogfa.com/post-15.aspx


تصویر برنامه :

http://howprg.persiangig.com/BindingN.jpg


مشکلت حل شد که هیچ. نشد ایمیل بزن Ahmadreza517@gmail.com (Ahmadreza517@gmail.com) یا اگه خاستی زود تر به جواب برسی به آدرس howprg.blogfa.com در قسمت نظرات اقدام کن .

یا حق ...

M.KH-SH
یک شنبه 30 مرداد 1390, 02:51 صبح
اگه از ویزارد می خوای استفاده کنی روش بالا خیلی خوبه اگه نه از oledbcomment استفاده کن
مثل:

منظور از load() فراخوانی بانک و اون جدول مورد نظرم هستش.


load1()

'b = ds.Tables("tb_1").Rows(0).Item(0)
str = "update tb_1 set name=@name , show1=@show1 , close1=@close1 , check_show=@check_show , check_close=@check_close where name='" & a & "'"

con.Open()
cmd = New OleDbCommand(str, con)
cmd.Parameters.Add("@name", OleDbType.VarChar, 50).Value = a
cmd.Parameters.Add("@show1", OleDbType.VarChar, 50).Value = d
cmd.Parameters.Add("@close1", OleDbType.VarChar, 50).Value = c
cmd.Parameters.Add("@close1", OleDbType.VarChar, 50).Value = e
cmd.Parameters.Add("@close1", OleDbType.VarChar, 50).Value = f
cmd.ExecuteNonQuery()
con.Close()
load1()

برای Update بودش

برای اضافه کردن ایتم هم بعد از نوشتن کوئری



load1()

'b = ds.Tables("tb_1").Rows(0).Item(0)
str = "insert into name jadaval(name filed ha) values (@name filed1,@name filed2)
Me.BindingContext(ds, "name jadval").addnew()

con.Open()
cmd = New OleDbCommand(str, con)
cmd.Parameters.Add("@name", OleDbType.VarChar, 50).Value = a
cmd.Parameters.Add("@show1", OleDbType.VarChar, 50).Value = d
cmd.Parameters.Add("@close1", OleDbType.VarChar, 50).Value = c
cmd.Parameters.Add("@close1", OleDbType.VarChar, 50).Value = e
cmd.Parameters.Add("@close1", OleDbType.VarChar, 50).Value = f
cmd.ExecuteNonQuery()
con.Close()
load1()