将文本写入日志文件列
Write text to log file Columns
如何写入 .log 文件中的列?
即有 "Log Text"、"Component"、"Date/Time"
的列
写入文件时如何指定这些?
我已经完成了一半的工作:
dim str As String ="<![LOG[" & message & "]LOG]!><time=""" & Now.ToLongTimeString & """" & " date=""" & Now.ToShortDateString & """ component=""" & component.ToString & """" & " type=""1""" & " Thread=""" & t & """" & ">"
File.AppendAllText(logfile, str & vbCrLf)
但是组件、日期/时间和线程值显示不正确。
我错过了什么?
*已编辑
文件路径为"C:\Programdata\server.log"
所以有些文字在正确的地方出现了,但不是全部。
因此,日志文本列将填充 "message" 并且线程带有数字,但 date/time 和组件为空。
我会附上一张照片,但我没有足够的代表:/
总而言之,我试图复制这个:
http://www.jetico.com/web_help/bcwipe6_enterprise/img/log_viewer.jpg
但并非我所有的专栏都显示数据。
按照@Blackwood 的建议尝试使用逗号将您的数据分成几列,但使用 string.format 因为您似乎在其中有很多额外的“”
Dim str As String = String.Format("![LOG[{0}]LOG]!,time={1}, <date= {2}, component= {3}, type=1, Thread={4}", Message, Now.ToLongTimeString, Now.ToLongDateString, component.ToString, t)
File.AppendAllText(日志文件,Str() & vbCrLf)
我不确定你用 <> 标签做什么。
已解决。
这与我尝试写入的数据格式有关。
时间必须符合以下格式
Now.ToLongTimeString & "." & Now.Millisecond & "-60"
并且日期必须用 - 而不是 /
分隔
不知道为什么 - 查看时时间没有达到那个长度,日期显示为“/”
我用于日志的查看器是 cmtrace。
这是让它工作的线路是..
<![LOG[" & message & "]LOG]!><time=""" & Now.ToLongTimeString & "." & Now.Millisecond & "-60" & """" & " date=""" & d & """ component=""" & component.ToString & """" & " type=""1" & """ Thread=""" & t &""">
如何写入 .log 文件中的列? 即有 "Log Text"、"Component"、"Date/Time"
的列写入文件时如何指定这些?
我已经完成了一半的工作:
dim str As String ="<![LOG[" & message & "]LOG]!><time=""" & Now.ToLongTimeString & """" & " date=""" & Now.ToShortDateString & """ component=""" & component.ToString & """" & " type=""1""" & " Thread=""" & t & """" & ">"
File.AppendAllText(logfile, str & vbCrLf)
但是组件、日期/时间和线程值显示不正确。 我错过了什么?
*已编辑
文件路径为"C:\Programdata\server.log"
所以有些文字在正确的地方出现了,但不是全部。 因此,日志文本列将填充 "message" 并且线程带有数字,但 date/time 和组件为空。 我会附上一张照片,但我没有足够的代表:/
总而言之,我试图复制这个: http://www.jetico.com/web_help/bcwipe6_enterprise/img/log_viewer.jpg 但并非我所有的专栏都显示数据。
按照@Blackwood 的建议尝试使用逗号将您的数据分成几列,但使用 string.format 因为您似乎在其中有很多额外的“”
Dim str As String = String.Format("![LOG[{0}]LOG]!,time={1}, <date= {2}, component= {3}, type=1, Thread={4}", Message, Now.ToLongTimeString, Now.ToLongDateString, component.ToString, t)
File.AppendAllText(日志文件,Str() & vbCrLf)
我不确定你用 <> 标签做什么。
已解决。
这与我尝试写入的数据格式有关。
时间必须符合以下格式 Now.ToLongTimeString & "." & Now.Millisecond & "-60"
并且日期必须用 - 而不是 /
分隔不知道为什么 - 查看时时间没有达到那个长度,日期显示为“/”
我用于日志的查看器是 cmtrace。
这是让它工作的线路是..
<![LOG[" & message & "]LOG]!><time=""" & Now.ToLongTimeString & "." & Now.Millisecond & "-60" & """" & " date=""" & d & """ component=""" & component.ToString & """" & " type=""1" & """ Thread=""" & t &""">