一些常用的脚本

已锁定

迷失的梨

  • 帖子

    232
  • 精华

    3
  • 被关注

    21

论坛等级:奇侠

注册时间:2010-03-26

黄金 黄金 如何晋级?

一些常用的脚本

2034

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("wscript.shell")

wishshell.Run "control.exe timedate.cpl,,0"


一些常用的脚本 已锁定
编辑推荐: 关闭

请填写推广理由:

本版热门话题

SIMATIC WinCC / Panel

共有32634条技术帖

相关推荐

热门标签

相关帖子推荐

guzhang

恭喜,你发布的帖子

评为精华帖!

快扫描右侧二维码晒一晒吧!

再发帖或跟帖交流2条,就能晋升VIP啦!开启更多专属权限!

  • 分享

  • 只看
    楼主

top
X 图片
您收到0封站内信:
×
×
信息提示
很抱歉!您所访问的页面不存在,或网址发生了变化,请稍后再试。