今天用VB6的时候,发现了App里的StartLogging和LogEvent方法,通过查阅MSDN,说前者是初始化日志记录的路径和模式,后者负责记录日志。
但是我在Main函数中使用的时候,不管在日志文件,还是系统文件中,没有发现任何日志记录。
Main函数中的代码如下:
Sub Main()
    App.StartLogging "d:\log.txt", 2
    MsgBox App.LogMode & "-" & App.LogPath
'    MDIFrm.Show
    App.LogEvent Date & " show MDIForm", vbLogEventTypeInformation
End Sub
我的操作系统是Windows2000 Professional+sp4,VB6是英文版的,没有打过补丁。
请各位帮我试试,是否这个功能可用?该如何用?
谢谢!

解决方案 »

  1.   

    VB自带得不好用,你可以使用API来实现:http://www.freevbcode.com/ShowCode.asp?ID=3490
      

  2.   

    为何我希望调用App.LogEvent方法将调试信息写入Windows NT的事件日志(Event Log)中,但我在调试时始终看不到有任何内容被写入。这个功能仅对编译过的VB程序起作用,如果你在VB环境下执行,该语句会被忽略。为了在VB环境调试时也能使用该功能,你可以用VB编写一个ActiveX DLL组件,此组件公开一个方法用于写事件日志,将其编译后供你的VB程序调用。
      

  3.   

    非常感谢!
    试过了,编译了一个可执行文件就搞定了。
    根据msdn上的说明“如果在 Windows NT 上运行,则将日志消息连同应用程序记入到 NT 应用程序 Event Log 中。"VBRunTime"用作应用程序源and App.Title appearing in the description。”,是否可以推出,这个写日志功能是是通过VBRunTime实现的,在VB开发环境中没有?呵呵