作者 | 主题 |
---|---|
迷失的梨 奇侠 经验值:6606 发帖数:217 精华帖:3 |
楼主 2019-02-26 10:59:47
主题:一些常用的脚本 1、一键启停(C脚本) BOOL AA; AA = ! GetTagBit("变量"); SetTagBit("变量",(short)AA); 2、屏蔽热键(C脚本) #include "apdefap.h" void OnClick(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName) { #pragma option(mbcs) #pragma code ("ALMXGINA.Dll") //BOOL GetXGinaValue (unsigned int fFlag, LPVOID pBfr, DWORD dwBfrSize); BOOL SetXGinaValue (unsigned int fFlag, LPVOID pValue, DWORD dwBfrSize); #pragma code () // XGINA_ALLOW_SHUTDOWN 1 // XGINA_ALLOW_LOGOUT 2 // XGINA_ALLOW_CTL_ALT_DEL 3 // XGINA_ALLOW_CTL_ESC 4 // XGINA_ALLOW_ALT_ESC 5 // XGINA_ALLOW_ALT_TAB 6 BOOL bEnable = FALSE; SetXGinaValue (3, &bEnable, sizeof(bEnable)); SetXGinaValue (4, &bEnable, sizeof(bEnable)); SetXGinaValue (5, &bEnable, sizeof(bEnable)); SetXGinaValue (6, &bEnable, sizeof(bEnable)); } 3、解锁热键(C脚本) #include "apdefap.h" void OnClick(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName) { #pragma code ("ALMXGINA.Dll") //BOOL GetXGinaValue (unsigned int fFlag, LPVOID pBfr, DWORD dwBfrSize); BOOL SetXGinaValue (unsigned int fFlag, LPVOID pValue, DWORD dwBfrSize); #pragma code () // XGINA_ALLOW_SHUTDOWN 1 // XGINA_ALLOW_LOGOUT 2 // XGINA_ALLOW_CTL_ALT_DEL 3 // XGINA_ALLOW_CTL_ESC 4 // XGINA_ALLOW_ALT_ESC 5 // XGINA_ALLOW_ALT_TAB 6 BOOL bEnable = TRUE; SetXGinaValue (3, &bEnable, sizeof(bEnable)); SetXGinaValue (4, &bEnable, sizeof(bEnable)); SetXGinaValue (5, &bEnable, sizeof(bEnable)); SetXGinaValue (6, &bEnable, sizeof(bEnable)); } 4、按钮登陆用户名密码(C脚本) #pragma option(mbcs) #pragma code ("useadmin.dll") #include "PWRT_api.h" #pragma code() SetTagChar("@CurrentUser","用户名"); //Return-Type: BOOL SetTagChar("logintest","用户名"); //Return-Type: BOOL PWRTLogout(); PWRTSilentLogin ( GetTagChar("logintest"),"密码"); 5、修改系统时间(VBS脚本) Dim wishshell Set wishshell=Createobject("ws cript.shell") wishshell.Run "control.exe timedate.cpl,,0"
有志者事竟成~~~
|