如何在ACC的客户端取SQL服务器的时间

在ACCESS开发平台中的调用方法

Dim con As New ADODB.Connection
Dim connstr As String
Dim rst As New ADODB.Recordset
connstr = Forms!usysfrmLogin!labConn.caption'连接字符串
con.Open connstr
rst.Open "select getdate() as sj", con, adOpenKeyset, adLockOptimistic
MsgBox rst("sj")

说明：

平台连接后台数据库的字段串保存在usysfrmLogin窗体的labConn标签的说明中,调用方法:

Forms!usysfrmLogin!labConn.caption