重拾VB之四，日志加强篇
重拾VB之四，日志加强篇
关劲松 PMP
一、关于日志记录功能
主要功能点有
1 在程序目录下生成log目录，用于保存日志文件。
2 自动在log目录中，生成日志文件，文件命名用年月日定义，如20100119_log.log。
3 在日志文件中，每行记录一个时间点的运行内容。时间点的精度应该达到毫秒。
4 在日志文件中，每一行的记录内容为文本信息。
5 在需要记录日志的地方，调用记录日志过程。
二、相关过程、函数。
'* 备注:由于FSO对象包含在Scripting 类型库 (Scrrun.Dll)中，所以在使用前首先需要在在工程中引用这个文件，
'* 单击“工程”，“引用”，然后在“引用”对话框中选中“Microsoft Scripting Runtime”前的复选框，然后单击“确定”。
'*-----------------------------------------------------------------------------*
'* 注释内容,用于获取系统时间的毫秒。
Private Type SYSTEMTIME
wYear As Integer
wMonth As Integer
wDayOfWeek As Integer
wDay As Integer
wHour As Integer
wMinute As Integer
wSecond As Integer
wMilliseconds As Integer
End Type
Private Declare Sub GetLocalTime Lib "kernel32" (lpSystemTime As SYSTEMTIME)
'*-----------------------------------------------------------------------------*
'*-----------------------------------------------------------------------------*
'* 注释内容,用于保存详细log文件的方法。使用中。
Public Sub Dtllog(ByVal logText As String)
Dim fso As FileSystemObject
Dim fileName As String
Dim a As Object
Set fso = New FileSystemObject
If fso.FolderExists(App.Path & "\log\") Then
Set a = fso.OpenTextFile(App.Path & "\lo
相关文档：
有时，为了实现动态更新，我们需要对正处于运行状态的应用程序进行自删除，就像360安全卫士在线升级那样。但是，Windows是不允许删除正处于运行状态的应用程序的，怎么办？一般来说，我们可以使用两个程序来实现，一个专门负责版本检测和删除，一个才是业务需要的主应用程序。能不能将二者合二为一呢？� ......
'* ************************************************************** *
'* 程序名称：modNtSrv
'* 程序功能：实现NT服务
'* 作者：lyserver
'* 联系方式：http://blog.csdn.net/lyserver
'* ************************************************************** *
Option Explicit
' ......
郁闷，我使用的这个空间的IDC商竟然每隔一段时间就要检测绑定的域名是否再未提交备案列表中，如果是就删除，但是却不检测我是否提交了备案，按照他们说法删除域名一天后才能再次绑定，否则这一天内绑定了到下次检测就会再删除。这样我就不停的在后台看，看是否被删除，如果被删除，就再把域名绑定上去，;(很受伤！
于是用V ......
由底至上是：
• 托管资源
• WMI 基础结构
• 使用者
托管资源
托管资源是任意逻辑或物理组件，通过使用 WMI 进行公开和管理。可以使用 WMI 管理� ......
VC实现类似VB中的LinkLabel功能
//VB里面有个LinkLabel，VB中的Label在VC中式CStatic，但是VC中CStatic没有类似LinkLabel的功能。可以自己
//添加一点代码来实现：
//不知道为什么IDC_HANDD一定要自己定义一下
#define IDC_HAND MAKEINTRESOURCE(32649)
//处理鼠标移动
void CAppNonameDlg::OnMouseMov ......
