PDA

View Full Version : سوال: اتصال به دیتابیس و آپدیت رکوردها



royaeel
شنبه 17 اسفند 1387, 12:07 عصر
سلام من کد زیر را در VS2005 نوشتم ولی در هنگام اجرای برنامه پس از تغییر رکوردها و زدن دکمه ثبت، هیچ تغییری ایجاد نمی شود یعنی به صورت واقعی تغییری روی رکوردهای دیتابیس انجا نشده است.



PrivateSub Assets_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) HandlesMyBase.Load


Dim strCon AsString = " Provider=Microsoft.jet.oledb.4.0;data source=E:\Roya\Projects\RA-soft\VB\RAS\RAS\bin\RAdb.mdb;"
Dim Con AsNew OleDb.OleDbConnection(strCon)
Con.Open()
Dim strSQL AsString = "SELECT * FROM T_Asset"
Dim Adapter AsNew OleDb.OleDbDataAdapter(strSQL, Con)
Dim Comm AsNew OleDb.OleDbCommand("INSERT INTO T_Asset (AssetName) VALUES ('PC')", Con)
T_AssetTableAdapter.Fill(RAdbDataSet, "T_Asset")


EndSub



Private


Sub Add_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Add.Click

T_AssetTableAdapter.Update(RAdbDataSet, "T_Asset")
EndSub

arsalansalar
شنبه 17 اسفند 1387, 12:27 عصر
دوست عزیزیم بعد از جمله زیر باید بنویسی در کجا تغییرات ایجاد شود.
مثلا:

select * from table where id=1