主题：[求助]在查询表中直接修改后台数据，代码错，不知道怎么修改

有一个查询表“电雕在制查询”，里面有“”电雕完成时间“列，想双击单元格后输入当前时间，编写代码时出错，如下：
此主题相关图片如下：qq截图20120912174636.jpg

另：这个查询表是来自：”产品信息“表，目的就是想在查询表中直接修改”电雕完成时间“的数据

电雕在制查询本身就是查询表，不可以使用sql等语句

那还有其它的好办法吗

你想一下,update直接更新后台数据库，查询表并不存在后台数据库，只是在运行时生成，你更新什么？

你到底需要的是什么？

 

这个查询表是来自产品信息表，我就是想在查询表上修改，能直接把产品信息表的数据更新

 两步走：获取查询表那一行数据的主键(_Identify)，然后更新【产品信息表】的数据，根据主键。

那我现在在“电雕完成时间”输入数据后自动获取主键，然后更新，这代码怎么编？

呃，参考。

dim id as Integer = Tables("表").current("_Identify")   '获得主键

"update {产品信息} set 电雕完成时间 = now() where _Identify = " & id

我按照你的方法在查询表(电雕在制品查询)的DataColChanged事件中写入代码，但是报错了:

 

Dim id As Integer = Tables("电雕在制品查询").current("_Identify")   '获得主键
"update {产品信息} set 电雕完成时间 = now() where _Identify = " & id

 

此主题相关图片如下：000.jpg

 呃，好吧。

Dim id As Integer = Tables("电雕在制品查询").current("_Identify")   '获得主键

Dim dr As DataRow = Datatables("产品信息").Find("_Identify = " & id)

dr("电雕完成时间") = Date.Now