Question

请问用vb的text datagrid 通过adodc改在access中的某条记录的某个数据

我做了一个界面。。。添加了修改 text1 datagrid1 adodc1 还有个显示全部的按钮
具体代码如下：Private Sub Command2_Click()
Unload Me
End Sub

Private Sub Command3_Click()
Adodc1.RecordSource = "select * from 产品数据"
Adodc1.Refresh
End Sub

Private Sub DG_Click()
On Error GoTo fix2:
Set Rs = Adodc1.Recordset.Fields

txtmingcheng = Rs("产品名称")
txtpay = Rs("起拍价")
txtshangjia = Rs("商家名称")
txtyunfei = Rs("运费")
txtzhifu = Rs("支付手段")
txtsonghuo = Rs("送货")
txtdianhua = Rs("联系电话")
txtjiepai = Rs("结拍时间")
fix2:
End Sub

Private Sub Form_Load()
On Error GoTo fix1:
With Adodc1
.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db\产品数据.mdb;Jet OleDb:DataBase Password=1234"
Adodc1.CommandType = adCmdText
.RecordSource = "select * from 产品数据"
Set DG.DataSource = Adodc1
.Refresh
End With
DG_Click
fix1:
Adodc1.Visible = False
End Sub

Answer 1

晕 我WINDOWS7打不开源代码了 现在玩JAVA忘记 VB了，ADODC以前常用，你这肯定是有问题的啊。

Answer 2

你这个代码有问题