|
Write to the log |
Dim client_ip As String
client_ip = Request.UserHostAddress()
Dim FILE_NAME As String = "\\myserver\Logs\userLogIn.log"
Dim sb As StringBuilder = New StringBuilder()
sb.Append("Information | none | " & Today.ToString() & " | " & Session("userid") & " | " & Session("userName") & " logged in from IP Address: " & client_ip)
Dim aryText As String = sb.ToString()
Dim objWriter As New System.IO.StreamWriter(FILE_NAME, True)
objWriter.WriteLine(aryText)
objWriter.Close()
|