主题:这些代码 是什么意思啊
Public Sub ErrorLog(ByVal e As Exception)
Dim strMsg As New StringWriter()
strMsg.WriteLine("<Date Time>" & DateTime.Now())
strMsg.WriteLine("Source:" & e.Source)
strMsg.WriteLine("Message:" & e.Message)
System.Diagnostics.EventL
Dim strMsg As New StringWriter()
strMsg.WriteLine("<Date Time>" & DateTime.Now())
strMsg.WriteLine("Source:" & e.Source)
strMsg.WriteLine("Message:" & e.Message)
System.Diagnostics.EventL