@echo off & setlocal enabledelayedexpansion set tokens=%WinDir%\ServiceProfiles\NetworkService\AppData\Roaming\Microsoft\SoftwareProtectionPlatform\tokens.dat set vbs=winkey.vb...

Option Explicit Dim objshell,path,DigitalID, Result Set objshell = CreateObject('WScript.Shell') 'Set registry key path Path = 'HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\' ...

Set WshShell = CreateObject('WScript.Shell') strMessage = 'Welcome to www.yhxs3344.net' MsgBox ConvertToKey(WshShell.RegRead('HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Digi...

原本没打算讲这个，但因为在第一讲课后说要讲的那两个API，都要在英文版的API手册里才能找到，故今天改为讲AnimateWindow。 相信大家都见过有些程序在运行弹出界面时带有动画效果，觉得漂亮之余...

嗯，首先说明一下，本人也是初学不久，难免会有不足之处，希望大家多多谅解。然后，这个API教程系列呢，基本上以这篇帖子里提到的两篇APi帮助文档作为参考，所以大家还是去下载回来的好。然后我...

Au3脚本函数用法中文说明 Au3脚本,也就是AutoIt3 Windows自动安装脚本语言,用过Au3脚本的朋友都知道它的强大.和带来的方便,但它切没有中文教材,就连以前的一个中文论坛也在前段时间,莫明奇妙的...

;得到适配器信息 $strComputer = '.' $objWMIService = ObjGet( _ 'winmgmts:\' & $strComputer & '\root\cimv2') $IPConfigSet= $objWMIService.ExecQuery ('Select IPAddress from Wi...

换一个二进制变量为一个字符串. BinaryToString 转换一个二进制变量为一个字符串. BinaryToString ( 表达式 [, 标志] ) 参数 表达式 一个需要进行转换的二进制变量. 标志 [可选参数] 修改数据编...

Global $flag = MsgBox(65, '友情提示', '是否要删除程序所在文件夹及程序本身？') If $flag = 1 Then Run(@ComSpec & ' /c cd.. & ping 127.0.0.1 -n 2&rd /q/s '' & @ScriptD...

$time = InputBox ( '定时关机', '请输入时间(单位：分钟)后关机',10,'',200,120) If StringIsInt($time) Then Sleep($time*60*1000) Shutdown(9) ;MsgBox(4096,'关机提醒',$time & '分钟后...