sqlLogUpdate = "INSERT INTO dbo.UserLog (ReportName, LogTime, UserID, UserName, CompanyID) VALUES('" & Request.ServerVariables("URL") & "','" & now() & "'," & session("UserID") & ", '" & session("usernameIM") & "', " & Session("CompanyID") & ")"
response.Write sqlLogUpdate
on error resume next
oConn.execute(sqlLogUpdate)
if(err.number<>0)then
Response.Write "2" & err.Description
Response.End
end if
|