Location:
Search - RegQueryValueEx
Search list
Description: 一、可以自动运行选中的程序和自动关机，设定时间按秒为单位。运用到WIN2K关机需要权限获取，和一些简单的文件查找代码！
升级版增加了自动运行个数 可以最多运行10个任务，可以删除任务，开机自动运行，全局快捷键。
运用到SETTIMER HOOK REG等相关知识。比如 SetWindowsHookEx RegOpenKey RegQueryValueEx GetWindowLong 等函数。
二、关键代码请参考源代码
本人抱着学习的态度，想和大家多交流！
-one, it is automatically selected operating procedures and automatic shutdown, set for the second time as a unit. Use of WIN2K shutdown authority needs access, and some simple document search code! Upgrades to increase the number of automatic operation can run up to 10 tasks, the tasks can be deleted or off automatically, overall shortcuts. Use of SETTIMER HOOK REG other relevant knowledge. For example SetWindowsHookEx RegOpenKey RegQueryValu eEx GetWindowLong functions. Two key code please refer to the source code, I take the attitude of learning, and we want to exchange more!
Platform: |
Size: 18688 |
Author: toke |
Hits:
Description: 本程序可以自动获取公网IP然后上传到指定网络地址空间上，而且支持和本机IP变动同步更新IP数据上传到地址空间，开机自动运行，全局快捷键。
本程序是适应中国动态IP而制作，假如有人想在自己机器上架设服务器，但IP是动态的 也就是IP会经常变动，但本程序可以实现IP动态绑定，从而给用户感觉是静态IP的感觉。
本程序在运行中会自己生成一个网页（包含本机IP），上传到指定的网络地址空间，当用户在网络上浏览该网页 该网页会自动转向到本机IP，这一切的一切都是程序自动完成。用户只需要进行简单的网络地址空间设定。
还有一点就是 必须有自己的网络地址空间。:)
本程序运用到 SETTIMER HOOK REG 等相关知识。比如 SetWindowsHookEx RegOpenKey RegQueryValueEx Process32First SHGetFileInfo CreateProcess 等函数。
Platform: |
Size: 18374 |
Author: david |
Hits:
Description: 本程序可以自动获取公网IP然后上传到指定网络地址空间上，而且支持和本机IP变动同步更新IP数据上传到地址空间，开机自动运行，全局快捷键。
本程序是适应中国动态IP而制作，假如有人想在自己机器上架设服务器，但IP是动态的 也就是IP会经常变动，但本程序可以实现IP动态绑定，从而给用户感觉是静态IP的感觉。
本程序在运行中会自己生成一个网页（包含本机IP），上传到指定的网络地址空间，当用户在网络上浏览该网页 该网页会自动转向到本机IP，这一切的一切都是程序自动完成。用户只需要进行简单的网络地址空间设定。
还有一点就是 必须有自己的网络地址空间。:)
本程序运用到 SETTIMER HOOK REG 等相关知识。比如 SetWindowsHookEx RegOpenKey RegQueryValueEx Process32First SHGetFileInfo CreateProcess 等函数。
Platform: |
Size: 17033 |
Author: 金川 |
Hits:
Description: RegQueryValueEx范例程序，可以学到他的使用方法
Platform: |
Size: 3283 |
Author: whsug |
Hits:
Description: 软件限时使用与注册功能的实现
众所周知，一些共享软件往往提供给使用者的是一个功能不受限制的限时使用版，在试用期内使用者可以无限制的使用软件的全部功能（只是可能会出现提示使用者注册的窗口），试用期一过部分（或全部）功能失效，要想继续使用只能向作者索取注册码（或注册文件）完成对软件的合法注册，注册后的软件将解除一切使用限制。如果您也开发出一个有价值的作品，是否也希望为自己的软件增加一个这样的功能呢？这里笔者就提供一个实现软件限时的完整代码。
软件启动后会首先运行本代码并从注册表HKEY_LOCAL_MACHINE\Software\MyProgram子键下的三个键值MyProgram1-3中读取键值数据。其中MyProgram2的值是软件首次运行日期，MyProgram3的值是软件当前运行时的日期，MyProgram1的值是软件的使用标志：如果软件在试用期内则其值为字符串sign1；如果软件试用期满则其值为字符串sign2，如果软件已经注册则其值为字符串sign3。全局变量ZHUCE依据读取的MyProgram1键值而赋值：ZHUCE=-1说明试用期满，ZHUCE=-2说明软件已注册，ZHUCE=其它值为剩余天数，您的主程序代码要依据此全局变量ZHUCE的值设计相应的交互响应。
为方便您将代码嵌入现存的程序代码中，本示例将全部代码写入一个模块.bas中（模块名随意，也可添加到已有模块中）。注意，代码中的Private Sub Main()过程为整个程序的启动入口，您需要在“工程属性”对话框中将“启动对象”设置为“Sub Main()”。
'通用模块
Global ZHUCE As Integer
'说明：全局变量ZHUCE=-1试用期满，ZHUCE=-2已注册，ZHUCE=其它值为剩余天数
Declare Function RegOpenKeyEx Lib "advapi32" Alias "RegOpenKeyExA" (ByVal hKey As Long, ByVal lpSubKey As String, ByVal ulOptions As Long, ByVal samDesired As Long, ByRef phkResult As Long) As Long
Declare Function RegQueryValueEx Lib "advapi32" Alias "RegQueryValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal lpReserved As Long, ByRef lpType As Long, ByVal lpData As String, ByRef lpcbData As Long) As Long
Declare Function RegCloseKey Lib "advapi32" (ByVal hKey As Long) As Long
Private Sub Main()'程序总入口
Dim a As Long, rc(3) As Long, hKey As Long, KeyValType As Long, KeyValSize(3) As Long
Dim c As String, h As String, tmpVal(3) As String
Dim datetime As Integer
datetime = 30'试用期天数
ZHUCE = -1
On Error GoTo cuowu
'以下从注册表HKEY_LOCAL_MACHINE\Software\MyProgram的三个值中取出相关数据字串tmpVal(3)
a = RegOpenKeyEx(&H80000002, "Software\MyProgram", 0, 131135, hKey) ' 打开注册表关键字
For a = 1 To 3: tmpVal(a) = String$(1024, 0): KeyValSize(a) = 1024: Next
rc(1) = RegQueryValueEx(hKey, "MyProgram3", 0, KeyValType, tmpVal(1), KeyValSize(1))
rc(2) = RegQueryValueEx(hKey, "MyProgram2", 0, KeyValType, tmpVal(2), KeyValSize(2))
rc(3) = RegQueryValueEx(hKey, "MyProgram1", 0, KeyValType, tmpVal(3), KeyValSize(3))
For a = 1 To 3
If (Asc(Mid(tmpVal(a), KeyValSize(a), 1)) = 0) Then
tmpVal(a) = Left(tmpVal(a), KeyValSize(a) - 1)
Else
tmpVal(a) = Left(tmpVal(a), KeyValSize(a))
End If
Next
a = RegCloseKey(hKey) '关闭注册表
'使用期限判断
If tmpVal(3) = "sign3" Then ZHUCE = -2: Exit Sub '查找到已注册标志sign3
If Len(tmpVal(1)) = 1023 And Len(tmpVal(2)) = 1023 And Len(tmpVal(3)) = 1023 Then
'首次使用,将当前日期分别写入tmpVal(1)和tmpVal(2)中，在tmpVal(3)中写入准许运行标志sign1
CreateObject("WScript.Shell").regWrite "HKEY_LOCAL_MACHINE\Software\MyProgram\MyProgram3", Date$, "REG_SZ"
CreateObject("WScript.Shell").regWrite "HKEY_LOCAL_MACHINE\Software\MyProgram\MyProgram2", Date$, "REG_SZ"
CreateObject("WScript.Shell").regWrite "HKEY_LOCAL_MACHINE\Software\MyProgram\MyProgram1", "sign1", "REG_SZ"
ZHUCE = datetime
MsgBox "试用期剩余" & Trim(datetime) & "天"
Else
If tmpVal(3) = "sign2" Then '查找到永久中止标志sign2中止使用
ZHUCE = -1
Exit Sub
MsgBox "试用期已满，请您注册！"
End If
If Date datetime Then '使用期超过datetime天中止使用
'写入tmpVal(3)中止使用字串sign2
CreateObject("WScript.Shell").regWrite "HKEY_LOCAL_MACHINE\Software\MyProgram\MyProgram1", "sign2", "REG_SZ"
ZHUCE = -1
MsgBox "试用期已满，请您注册！"
Else
'写入当前日期于tmpVal(2)中
CreateObject("WScript.Shell").regWrite "HKEY_LOCAL_MACHINE\Software\MyProgram\MyProgram2", Date$, "REG_SZ"
ZHUCE = datetime - (DateValue(Date) - DateValue(tmpVal(1)))
MsgBox "试用期剩余" & Trim(datetime) & "天"
End If
End If
End If
cuowu:
End Sub
从安全保密角度出发，当您应用上述代码时紫色部分应该根据您个人的保密设想进行必要的修改（当然您也可以不修改而直接应用）：①示例中的代码把软件的注册与运行信息保存在HKEY_LOCAL_MACHINE\Software\MyProgram子键下的MyProgram1-3三个键值内，请根据您个人的保密原则修改为您所需要的子键名，以隐蔽为原则！②MyProgram1键值中的数据（字符串sign1或sign2或sign3分别对应着试用/期满/注册）应根据您个人的保密设想修改成需要的字符串，也以隐蔽为原则！
主程序中当用户输入正确的注册码（注册码当然是您随意愿而设）后，请执行语句：
CreateObject("WScript.Shell").regWrite "HKEY_LOCAL_MACHINE\Software\MyProgram\MyProgram1", "sign2", "REG_SZ"
完成软件注册。（该行代码中的Software\MyProgram\MyProgram1和sign2请与上述代码保持一致！）
Platform: |
Size: 18051 |
Author: dianfeng |
Hits:
Description: 一、可以自动运行选中的程序和自动关机，设定时间按秒为单位。运用到WIN2K关机需要权限获取，和一些简单的文件查找代码！
升级版增加了自动运行个数 可以最多运行10个任务，可以删除任务，开机自动运行，全局快捷键。
运用到SETTIMER HOOK REG等相关知识。比如 SetWindowsHookEx RegOpenKey RegQueryValueEx GetWindowLong 等函数。
二、关键代码请参考源代码
本人抱着学习的态度，想和大家多交流！
-one, it is automatically selected operating procedures and automatic shutdown, set for the second time as a unit. Use of WIN2K shutdown authority needs access, and some simple document search code! Upgrades to increase the number of automatic operation can run up to 10 tasks, the tasks can be deleted or off automatically, overall shortcuts. Use of SETTIMER HOOK REG other relevant knowledge. For example SetWindowsHookEx RegOpenKey RegQueryValu eEx GetWindowLong functions. Two key code please refer to the source code, I take the attitude of learning, and we want to exchange more!
Platform: |
Size: 18432 |
Author: toke |
Hits:
Description: 本程序可以自动获取公网IP然后上传到指定网络地址空间上，而且支持和本机IP变动同步更新IP数据上传到地址空间，开机自动运行，全局快捷键。
本程序是适应中国动态IP而制作，假如有人想在自己机器上架设服务器，但IP是动态的 也就是IP会经常变动，但本程序可以实现IP动态绑定，从而给用户感觉是静态IP的感觉。
本程序在运行中会自己生成一个网页（包含本机IP），上传到指定的网络地址空间，当用户在网络上浏览该网页 该网页会自动转向到本机IP，这一切的一切都是程序自动完成。用户只需要进行简单的网络地址空间设定。
还有一点就是 必须有自己的网络地址空间。:)
本程序运用到 SETTIMER HOOK REG 等相关知识。比如 SetWindowsHookEx RegOpenKey RegQueryValueEx Process32First SHGetFileInfo CreateProcess 等函数。
-err
Platform: |
Size: 18432 |
Author: david |
Hits:
Description: 本程序可以自动获取公网IP然后上传到指定网络地址空间上，而且支持和本机IP变动同步更新IP数据上传到地址空间，开机自动运行，全局快捷键。
本程序是适应中国动态IP而制作，假如有人想在自己机器上架设服务器，但IP是动态的 也就是IP会经常变动，但本程序可以实现IP动态绑定，从而给用户感觉是静态IP的感觉。
本程序在运行中会自己生成一个网页（包含本机IP），上传到指定的网络地址空间，当用户在网络上浏览该网页 该网页会自动转向到本机IP，这一切的一切都是程序自动完成。用户只需要进行简单的网络地址空间设定。
还有一点就是 必须有自己的网络地址空间。:)
本程序运用到 SETTIMER HOOK REG 等相关知识。比如 SetWindowsHookEx RegOpenKey RegQueryValueEx Process32First SHGetFileInfo CreateProcess 等函数。
Platform: |
Size: 16384 |
Author: 金川 |
Hits:
Description: RegQueryValueEx范例程序，可以学到他的使用方法-RegQueryValueEx example programs can learn to use him
Platform: |
Size: 3072 |
Author: whsug |
Hits:
Description: 本程序可以自动获取公网IP然后上传到指定网络地址空间上，而且支持和本机IP变动同步更新IP数据上传到地址空间，开机自动运行，全局快捷键。 本程序是适应中国动态IP而制作，假如有人想在自己机器上架设服务器，但IP是动态的 也就是IP会经常变动，但本程序可以实现IP动态绑定，从而给用户感觉是静态IP的感觉。 本程序在运行中会自己生成一个网页（包含本机IP），上传到指定的网络地址空间，当用户在网络上浏览该网页 该网页会自动转向到本机IP，这一切的一切都是程序自动完成。用户只需要进行简单的网络地址空间设定。 还有一点就是 必须有自己的网络地址空间。:) 本程序运用到 SETTIMER HOOK REG 等相关知识。比如 SetWindowsHookEx RegOpenKey RegQueryValueEx Process32First SHGetFileInfo CreateProcess 等函数。-This procedure can automatically obtain the public network and then upload it to a specific IP address space on the network, and support and the local IP changes in synchronization to update the data uploaded to the IP address space, boot automatically run, global shortcuts. This procedure is to adapt to dynamic IP and Chinese production, if someone wants to set up servers on their own machines, but the IP is dynamic IP is also often changes, but the program can achieve IP dynamic binding, which give users the impression that static IP s感觉. This procedure will be run at their own to generate a page (containing the local IP), upload it to a specific network address space, when a user in the network to visit the new homepage on the web page will be automatically shifted to the local IP, all of this all procedures for auto-complete. Users need only a simple set of network address space. Another point is that it must have its own network address space. :) This procedure applied to SETTIMER
Platform: |
Size: 33792 |
Author: 高军 |
Hits:
Description: 本程序可以自动获取公网IP然后上传到指定网络地址空间上，而且支持和本机IP变动同步更新IP数据上传到地址空间，开机自动运行，全局快捷键。
本程序是适应中国动态IP而制作，假如有人想在自己机器上架设服务器，但IP是动态的 也就是IP会经常变动，但本程序可以实现IP动态绑定，从而给用户感觉是静态IP的感觉。
本程序在运行中会自己生成一个网页（包含本机IP），上传到指定的网络地址空间，当用户在网络上浏览该网页 该网页会自动转向到本机IP，这一切的一切都是程序自动完成。用户只需要进行简单的网络地址空间设定。
还有一点就是 必须有自己的网络地址空间。:)
本程序运用到 SETTIMER HOOK REG 等相关知识。比如 SetWindowsHookEx RegOpenKey RegQueryValueEx Process32First SHGetFileInfo CreateProcess 等函数。 -The program can automatically obtain the public network and then uploaded to the specified network IP address space, but also support and synchronized changes in the local IP data uploaded to the IP address space, to start automatically, the global shortcut keys.
This procedure is to adapt to the dynamic IP that is made in China, if someone wants to set up servers on their machine, but the IP is dynamic, that is, IP will change frequently, but the program can be IP dynamic binding, giving the impression that the static IP of the user feeling.
The program is running on their own to generate a page (containing the local IP), uploaded to the specified network address space on the network when users visit the page that page will automatically turn to the local IP, that everything is automatically completed. Users need only a simple set of network address space.
Another point that must have its own network address space. :)
This procedure applied to the SETTIMER HOOK REG and
Platform: |
Size: 16384 |
Author: 峰回路转 |
Hits:
Description: mfc 通过读写注册表设置主机名，ip,mask,gateway,dns,加入域,自动关机，重启-set ip,mask,gateway,dns,add domain,RegOpenKey(),RegSetValueEx(),RegQueryValueEx(),wmic,netsh,system()
Platform: |
Size: 89088 |
Author: zxl |
Hits:
Description: Wfi GetModuleFileName GetModuleHandle SetCurrentDirectory GetStdHandle-WfiGetModuleFileName GetModuleHandle SetCurrentDirectory GetStdHandle SetConsoleTextAttribute SetConsoleCursorPosition GetConsoleScreenBufferInfo FillConsoleOutputAttribute FillConsoleOutputCharacter SetConsoleScreenBufferSize SetConsoleWindowInfo SetConsoleTitle FindWindow LoadIcon SendMessage ReleaseSemaphore WaitForSingleObject CreateSemaphore SetConsoleCtrlHandler GetTickCount LoadLibrary GetProcAddress RegOpenKey RegEnumKey RegQueryValueEx RegCloseKey CreateEvent ShellExecute Sleep ExitProcess RegisterServiceCtrlHandler SetServiceStatus GetUserName StartServiceCtrlDispatcher OpenSCManager OpenService DeleteService MessageBox GetLastError CreateService GetCommandLine StartService CloseServiceHandle
Platform: |
Size: 2120704 |
Author: 梁森 |
Hits: