使用说明： HKEY hKey; LPCTSTR lpSubkey=TEXT("SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Run"); long ret0=::RegOpenKeyEx(HKEY_LOCAL_MACHINE,lpSubkey,0,KEY_WRITE,&hKey); if(ret0!=ERROR_SUCCESS) { AfxMessageBox(TEXT("Unable to Open Reg file"));return; //
Option Explicit Private Declare Function RegCloseKey Lib "advapi32.dll" (ByVal hKey As Long) As Long Private Declare Function RegCreateKey Lib "advapi32.dll" Alias "RegCreateKeyA" (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As
Option Explicit Const KeyName = "Software\Microsoft\Windows NT\CurrentVersion\Windows" Private Sub Command1_Click() Dim Ver As OSVERSIONINFO, S As String, hKey As Long Dim Device As String, length As Long Ver.dwOSVersionInfoSize = Len(Ver) GetVersio
获取、修改计算机的IP地址及子网掩码. Option Explicit Const REG_SZ As Long = 1 Const HKEY_LOCAL_MACHINE = &H80000002 Private Declare Function RegCloseKey Lib "advapi32.dll" (ByVal hKey As Long) As Long Private Declare Function RegOpenKey Lib "advapi32.dll" Alias "Reg
初学者可以看看；大师们；可以飘过 拦截窗口： bp CreateWindow 创建窗口 bp CreateWindowEx(A) 创建窗口 bp ShowWindow 显示窗口 bp UpdateWindow 更新窗口 bp GetWindowText(A) 获取窗口文本 拦截消息框： bp MessageBox(A) 创建消息框 bp MessageBoxExA 创建消息框 bp MessageBoxIndirect(A) 创建定制消息框 拦截警告声： bp MessageBeep 发出系统
