mahdi.fa
پنج شنبه 14 اردیبهشت 1391, 23:15 عصر
با سلام خدمت دوستان محترم من یک دیتابیس با اکسس دارم که با adodc اون را باز می کنم ولی مشکل اینجا است که اطلاعاتی را که من از طریق فرم دیگر به اون اضافه می کنم در زمان باز بودن برنامه نمایش داده نمی شود و باید یک بار از برنامه کاملا خارج شوم و دوباره بازش کنم تا اطلاعات جدید را نمایش بدهد.
برای باز کردن دیتا از این کد استفاده می کنم:
On Error Resume Next
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\data\tahsili\90-91.MDB;Persist Security Info=False"
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = "select * from tahsili"
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1
Adodc1.Refresh
Adodc1.Recordset.Sort = ("modirat")
DataGrid1.Refresh
برای باز کردن دیتا از این کد استفاده می کنم:
On Error Resume Next
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\data\tahsili\90-91.MDB;Persist Security Info=False"
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = "select * from tahsili"
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1
Adodc1.Refresh
Adodc1.Recordset.Sort = ("modirat")
DataGrid1.Refresh