سلام دوستان
دوستان من یک برنامه نوشتم و بانکش access بود حالا این برنامه رو بانکش رو دارم عوض می کنم و بانکش را دارم sql می کنم
حالا به یک مشکلی بر خوردم
من برای ارتباط با جدول از این دستور استفاده می کردم
1
Adodc1.RecordSource = "select * from ChekModatDar "
توی sql معادل این چی میشه؟
ایم میشه؟
Dim db As New Connection
Dim Adodc1 As New Recordset
Adodc1.Open "select * from ChekModatDar", db, adOpenDynamic, adLockOptimistic
Private Sub Form_Load()
db.Open "provider=msdasql;driver={sql server};server=;id=;pwd=;database=shams"
Adodc1.CursorLocation = adUseClient
Adodc1.Open "select * from ChekModatDar", db, adOpenDynamic, adLockOptimistic
Set DataGrid1.DataSource = Adodc1
end sub
از طریق این کد هم به بانکم وصل شدم
از طریق این کد می خوام وصل شم به جدولم این پیغام رو میده:
Adodc1.Open "select * from ChekModatDar"
123.JPG