VB怎样取系统日志？

Question

system32\config\SysEvent.Evt 
那东西好象是用binary写的 没有记录格式估计难读

Answer 1

SysEvent.Evt  
打开看不懂吧，LZ是想要把系统日志读出来哈。SysEvent.Evt  
肯定不行。

Answer 2

好像有ReadEventLog这个API函数,但我没有。不知道论坛里有人能把这个贴出来不？

Answer 3

Private Declare Function ReadEventLog Lib "advapi32.dll" Alias "ReadEventLogA" (ByVal hEventLog As Long, ByVal dwReadFlags As Long, ByVal dwRecordOffset As Long, lpBuffer As EVENTLOGRECORD, ByVal nNumberOfBytesToRead As Long, pnBytesRead As Long, pnMinNumberOfBytesNeeded As Long) As Long

Answer 4

哈哈 你要是知道了怎么定义 估计你自己用open binary 也能打开

Answer 5

你要定义 EVENTLOGRECORD
参考：
http://www.vbgood.com/viewthread.php?tid=77018

Answer 6

本帖最后由 bcrun 于 2010-11-06 14:51:37 编辑