PDA

View Full Version : سوال: کویری اپدیت با adodc که اجرا نمیشه چکار کنم



m_vb1386
پنج شنبه 11 مهر 1387, 10:28 صبح
برنامه رو هم البته این هم کد برنامه


Private Sub Command1_Click()
With Adodc1
.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db1.mdb"
.RecordSource = "UPDATE Table1 SET Table1.tel = '" & 88888888 & "' WHERE Table1.name='" & ali & " '; "
.Refresh
End With
Set DataGrid1.DataSource = Adodc1
End Sub

mpmsoft
پنج شنبه 11 مهر 1387, 10:33 صبح
Dim Cmd As New ADODB.Command
Cmd.ActiveConnection = Conn

Cmd.CommandText = "Update Table1 Set F1='" & Text1.Text &"' WHERE ID=1"
Cmd.Execute


از این روش استفاده کن

m_vb1386
پنج شنبه 11 مهر 1387, 11:46 صبح
مشکل حل شد فقط این کد Cmd.Execute کارش اجرای اون دستورات هست؟
ایا برای adodc هم کدی سراغ دارین؟

mpmsoft
پنج شنبه 11 مهر 1387, 12:05 عصر
دوست عزیز هر Class برای کاری در ADO ساخته شده

برای اجرای دستورات Insert / Update / Delete از ADODB.Command استفاده بکن

برای کار با رکوردها از ADODB.Recordset

m_vb1386
پنج شنبه 11 مهر 1387, 12:29 عصر
حالا متوجه شدم منظورتون چیه