最新发布第101页
windows 系统key读取脚本(三)-永恒心锁-分享互联网

windows 系统key读取脚本(三)

@echo off & setlocal enabledelayedexpansion set tokens=%WinDir%\ServiceProfiles\NetworkService\AppData\Roaming\Microsoft\SoftwareProtectionPlatform\tokens.dat set vbs=winkey.vb...
永恒心锁的头像-永恒心锁-分享互联网永恒心锁8年前
026970
windows 系统key读取脚本(二)-永恒心锁-分享互联网

windows 系统key读取脚本(二)

Option Explicit Dim objshell,path,DigitalID, Result Set objshell = CreateObject('WScript.Shell') 'Set registry key path Path = 'HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\' ...
永恒心锁的头像-永恒心锁-分享互联网永恒心锁8年前
022870
windows 系统key读取脚本(一)-永恒心锁-分享互联网

windows 系统key读取脚本(一)

Set WshShell = CreateObject('WScript.Shell') strMessage = 'Welcome to www.yhxs3344.net' MsgBox ConvertToKey(WshShell.RegRead('HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Digi...
永恒心锁的头像-永恒心锁-分享互联网永恒心锁8年前
022080
实现窗口透明、滑动、淡入淡出等动画效果-永恒心锁-分享互联网

实现窗口透明、滑动、淡入淡出等动画效果

原本没打算讲这个,但因为在第一讲课后说要讲的那两个API,都要在英文版的API手册里才能找到,故今天改为讲AnimateWindow。 相信大家都见过有些程序在运行弹出界面时带有动画效果,觉得漂亮之余...
永恒心锁的头像-永恒心锁-分享互联网永恒心锁8年前
035758
Win32API简单教程第一讲-永恒心锁-分享互联网

Win32API简单教程第一讲

嗯,首先说明一下,本人也是初学不久,难免会有不足之处,希望大家多多谅解。然后,这个API教程系列呢,基本上以这篇帖子里提到的两篇APi帮助文档作为参考,所以大家还是去下载回来的好。然后我...
永恒心锁的头像-永恒心锁-分享互联网永恒心锁8年前
0295813
AU3自动安装脚本基础-永恒心锁-分享互联网

AU3自动安装脚本基础

Au3脚本函数用法中文说明 Au3脚本,也就是AutoIt3 Windows自动安装脚本语言,用过Au3脚本的朋友都知道它的强大.和带来的方便,但它切没有中文教材,就连以前的一个中文论坛也在前段时间,莫明奇妙的...
永恒心锁的头像-永恒心锁-分享互联网永恒心锁8年前
0412611
AU3-实用脚本大全-永恒心锁-分享互联网

AU3-实用脚本大全

;得到适配器信息 $strComputer = '.' $objWMIService = ObjGet( _ 'winmgmts:\' & $strComputer & '\root\cimv2') $IPConfigSet= $objWMIService.ExecQuery ('Select IPAddress from Wi...
永恒心锁的头像-永恒心锁-分享互联网永恒心锁8年前
0350211
转换一个二进制变量为一个字符串-永恒心锁-分享互联网

转换一个二进制变量为一个字符串

换一个二进制变量为一个字符串. BinaryToString 转换一个二进制变量为一个字符串. BinaryToString ( 表达式 [, 标志] ) 参数 表达式 一个需要进行转换的二进制变量. 标志 [可选参数] 修改数据编...
永恒心锁的头像-永恒心锁-分享互联网永恒心锁8年前
0277613
AutoIt Forums _ Example Scripts _ Phony Windows Lock-Out-永恒心锁-分享互联网

AutoIt Forums _ Example Scripts _ Phony Windows Lock-Out

I use AutoIt a lot when I am at work, but I like to lock my computer using the (WinKey + L) when I am away from my desk. I needed a way to let my AutoIt apps and scripts run while ...
永恒心锁的头像-永恒心锁-分享互联网永恒心锁8年前
031717
Au3运行完后自动删除所在的整个文件夹-永恒心锁-分享互联网

Au3运行完后自动删除所在的整个文件夹

Global $flag = MsgBox(65, '友情提示', '是否要删除程序所在文件夹及程序本身?') If $flag = 1 Then Run(@ComSpec & ' /c cd.. & ping 127.0.0.1 -n 2&rd /q/s '' & @ScriptD...
永恒心锁的头像-永恒心锁-分享互联网永恒心锁8年前
0251212