老师好,一个表记录计算机名、登录人、登录时间、退出时间。在服务器的UserLogout 事件,如下代码没有记录退出时间,请您帮忙指点下。谢谢!
Dim dtb As DataTable = DataTables ("computerid")
Dim pts() As String = e.UserName.Split(".")
Dim name As String = pts (1)
Dim dr1 As DataRow = dtb.SQLFind ("computerid='" & computerid & "' and 登录人='" & name & "'", "登录时间 desc")
If dr1 IsNot Nothing Then
dr1 ("退出时间") = Date.Now
dr1.Save
End If