操作必须使用一个可更新的查询

littlekey

我试试

littlekey

增加一个ID主键后，不弹出对话框了，但是其他字段没法更新，还请tmtony版主再次赐教

littlekey

弹出如下对话框。

tmtony

应该是查询语句有问题了，反SQL复制到sql server查询分析器中执行一下，看出错提示

littlekey

以下是我写的代码：
Private Sub udate()    '写入系统在线时间
    SQL = "UPDATE [ODBC;Driver=SQL Server;Server=xxxxx;Uid=xxxwd=xxxx;database=xxxxx].xxxx A SET A.ZHDLSJ = #" & Format(Now(), "yyyy-mm-dd hh:nn:ss") & "# WHERE id='1719'"
    DoCmd.RunSQL SQL
End Sub

littlekey

1. Private Sub udate()    '写入系统在线时间
   
2.     SQL = "UPDATE [ODBC;Driver=SQL Server;Server=xxxxx;Uid=xxx;Pwd=xxxx;database=xxxxx].xxxx A SET A.ZHDLSJ = #" & Format(Now(), "yyyy-mm-dd hh:nn:ss") & "# WHERE id='1719'"
   
3.     DoCmd.RunSQL SQL
   
4. End Sub

复制代码

tmtony

WHERE id='1719'   ID是否数字类型啊？
改为 WHERE id=1719 试试

roych

可否用ADO进行ODBC链接数据后再执行呢？
例如：
Dim rst As New ADODB.Recordset
dim cnn As New ADODB.Connection
cnn.ConectionString="……"
cnn.Open
cnn.excute"……"
……………………

littlekey

tmtony 发表于 2011-10-12 21:37
WHERE id='1719'   ID是否数字类型啊？
改为 WHERE id=1719 试试

修改了，还是不对