纪飞的博客

零、VB Dll：prjCOMWriteNTLog.clsMain 代码，此程序只有一个Class  Option Explicit Public Function WriteNTLog(ByVal strMsg As String)               With App               .StartLogging "c:/log.log", LogModeConstant

一、在：CWinApp::InitInstance 函数中用AfxOleInit初始化 COM  if (!AfxOleInit()) {  AfxMessageBox("AfxOleInit Failed!");  return FALSE; }二、用 #Import 引入 ADO 对象 Dll：msado15.dll  #import "c:/program files/common fi