If LastInputTickCount > 30000 Then '如果在30秒没有操作
Dim cmd As New SQLCommandcmd.CommandText = "insert into {log} (用户名,时间) VALUES (" & user.name & "," & Date.now & ")"cmd.ExecuteNonQuery() end if
提示错误,谁帮看一下