wincc脚本解密方法
Wincc v7破解安装
wincc 7.0中文版安装方法标签：杂谈软件安装好之后大家最好重启下电脑，然后我们做2个步骤就可以了，视频比较麻烦的。
1,。
首先把硬狗破解文件覆盖下，（破解文件在G:\simatic wincc 7.0授权）破解USB硬狗具体操作方法如下：首先在任务管理器（打开点击ctrl+alt+delete）里查看一下，是否有CCLicenseService.exe进程在运行，如果有就先结束该进程，然后在C:\Program Files\Common Files\Siemens\BIN文件夹里找到CCLicenseService.exe文件(这是默认安装文件夹，如果您安装在其它分区，请在相应分区里找)，将其重命名保存(如改为CCLicenseService0.exe或CCLicenseService-old.exe等)，然后将附件同名文件放到该文件夹里即可。
现在运行WINCC试试有什么变化？当然，您需要先安装软授权，像其它版本一样。
如果运行有任何问题，可以将内存里的CCLicenseService.exe进程结束，然后恢复原文件即可。
安装方法：wincc v7.21、安装windows组件：Message Quering(消息队列) 和IIS2、用虚拟光驱装载ISO文件，运行WinCC_V70_SP2.exe3、出现安装程序的对话框后，不要按任何按钮4、在C盘根目录下，找临时文件夹C:\{NUMBERS-NUMBERS-....} 例如：{DFDBB8FE-7426-454A-937C-F8E9230F896A}5、在该文件夹内，找到Properties_SiWA.ini文件，用记事本打开，修改其中[Conditions] 段：原来为:[Conditions]Action1=ExtractAction1Condition=Condition1 AND Condition2 AND Condition3 (本行需要修改）Condition1 .... (本行删除)Condition2 .... (本行删除)Condition3 ..... (本行删除)修改后为：[Conditions]Action1=ExtractAction1Condition=然后存盘。
wincc常用C脚本
1.用户注销：#pragma code ("useadmin.dll")#include "PWRT_api.h"#pragma code()PWRTLogout();2.用户登录：#pragma code ("useadmin.dll")#include "PWRT_api.h"#pragma code()PWRTLogin('c');3.关闭项目并退出wincc：ExitWinCC ();4.退出运行到wincc资源管理器：DeactivateRTProject ();按钮变三种颜色#include "apdefap.h"long _main(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName) {#pragma option(mbcs)if(GetTagWord("TX/ZSH001")==1)return 0x0000ff00;elseif(GetTagWord("TX/ZSL001")==1)return 0x000000ff;elsereturn 0x00c0c0c0;}一个调用按钮变色#include "apdefap.h"long _main(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName) {#pragma option(mbcs)if(GetTagWord("NewTag")==0)return 0x0000ff00;elsereturn 0x00ffffff;}5.结束监控并关闭计算机（会弹出确认对话框）HWND hWnd = NULL;//Author:Smartsysint iRet;hWnd = FindWindow(NULL,"WinCC-运行系统 - ");iRet=MessageBox(hWnd,"结束监控并关闭计算机","关闭操作站",MB_YESNO|MB_ICONWARNING|MB_APPLMODAL);if(iRet==IDYES)DMExitWinCCEx (DM_SDMODE_POWEROFF);6.点击事件弹出对话框，通过点击弹出对话框的确定和取消按钮实现对变量的置位或取消: int r;r=MessageBox(NULL, "YES为开，NO为关", "确定开命令：", MB_YESNO |MB_SYSTEMMODAL); if (r==IDYES)SetTagBit("TAGNAME",TRUE);elseSetTagBit("TAGNAME",FALSE);7.开显示关显示:（要在内部变量中建立三个二进制变量COLSE_DISPLAY、DISPLAY_NO和DISPLAY_COMMENT）// Funktion: Bit in Doppelwort setzen;if (GetTagBitWait("COLSE_DISPLAY")==1 ){SetTagBit("COLSE_DISPLAY",0);SetTagBit("DISPLAY_NO",0); //Return-Type: BOOLSetTagBit("DISPLAY_COMMENT",0);}else{SetTagBit("COLSE_DISPLAY",1);SetTagBit("DISPLAY_NO",1); //Return-Type: BOOLSetTagBit("DISPLAY_COMMENT",0);}8.开阀确认:BOOL a;a=GetTagBit("30T制水启动"); //Return-Type :short intif (a==0){if(MessageBox(NULL,"真的要启动制水吗？","操作提示",MB_YESNO|MB_ICONQUESTION|MB_SETFOREGROUND|MB_SYSTEMMODAL) == 6){ SetTagBit("30T制水启动",1);//Return-Type :BOOL}}else{if(MessageBox(NULL,"真的要停止制水吗？","操作提示",MB_YESNO|MB_ICONQUESTION|MB_SETFOREGROUND|MB_SYSTEMMODAL) == 6){ SetTagBit("30T制水停止",1);}}9.将WinCC运行画面最小化HWND WinCCHwnd;WinCCHwnd=FindWindow(NULL,"WinCC-Runtime - "); //如果运行语言为英文if (WinCCHwnd==0) WinCCHwnd=FindWindow(NULL,"WinCC-运行系统 - "); //如果运行语言为中文CloseWindow(WinCCHwnd);10.显示或不显示（其中hiddVtext为内部的二进制变量）if(GetTagBit("hiddVtext")==0) //Return-Type: BOOL{SetTagBit("hiddVtext",TRUE); //Return-Type: BOOL//Return-Type: BOOL}else{SetTagBit("hiddVtext",FALSE);}10.打开编辑画面的脚本#pragma option(mbcs)#ifdef RUN_ON_WEBNAVIGATOR#elseHWND hExplorerWindow= NULL;HWND hRuntimeWindow= NULL;hExplorerWindow= FindWindow("WinCCExplorerFrameWndClass",NULL);hRuntimeWindow= FindWindow("PDLRTisAliveAndWaitsForYou",NULL);if(hExplorerWindow){ShowWindow(hExplorerWindow, SW_MINIMIZE); // This entry is only necessary for Windows 2000ShowWindow(hExplorerWindow, SW_SHOWNORMAL);SetForegroundWindow(hExplorerWindow);}elseprintf("rn SetForeground failed");#endif11.如何在WINCC中制作一个保持型按钮方法1：if( GetTagBit("M10") )SetTagBit("M10",0);elseSetTagBit("M10",1);方法2：SetTagBit("M1.0",(SHORT)!GetTagBit("M1.0"));求反指令，如果为1点击变为0，如果为0点击变为1方法3：或者做两个按钮，按钮一：显示，直接连接m1.0，是--不显示，否--显示。
wincc7.0破解详细安装说明
零六精品软件专店制作Wincc 7.0 SP3 中文版安装说明：安装此软件前请先关闭360等。
（或者是别的电脑防护软件一定要关闭）此软件有2种安装方法，一种是光盘发送的，这种插入光盘后即可直接安装。
我们下面所说的方法主要是针对软件下载后解压安装的。
下载完，双击WinCC_V70_SP3_ASIA.rar进行解压，（解压到英文目录，即解压后的文件夹，从根目录开始看起不要有一个汉字，有的话删掉）首先应该安装消息队列如何在干净Windows 7 64位旗舰版(未安装过wincc 7.0 )下安装此软件：1、安装windows组件：Message Quering(消息队列) and IIS到开始菜单--控制面板—程序和功能—打开或关闭windows功能，出现下图，到最后的消息对列打勾即可勾选好，MSMQ服务器，点击确定。
2、然后运行解压出来里的setup.exe文件（双击文件，这就是运行了）3出现了下图，这时候千万不要点击任何按钮了4、全盘搜寻Properties_SiWA.ini文件，（到开始—搜索---复制Properties_SiWA.ini—粘贴---点击搜索）5、搜索到Properties_SiWA.ini文件后，用记事本打开（右键—打开方式----点击记事本即可）修改其中[Conditions] 段：原来为：（看下图：）改为：[Conditions] Action1=(即把下图红框内的内容删除就可)然后点击退出，保存即可。
6、回到不让您动任何按钮的画面，点击安装，即可正常安装WinCC 7.0 SP3出现下图时候需要改一下文件名：改成：c:\wincc7.0 sp3, 继续点击下一步出现一个解压的画面，等它解压完后会跳出一个需要重启电脑的对话框，重启即可。
重启后，到C盘，找到刚刚改名字的文件夹：即c:\wincc7.0 sp3,双击进入，找到steup.exe,双击点击安装，就可一直点击下一步，出现下图时。
WINCC_登录与注销修改当前用户的密码
WINCC_登录与注销修改当前用户的密码第一篇：WINCC_登录与注销修改当前用户的密码调用用户管理的C脚本：(没试)#include “apdefap.h” void OnClick(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName){SSMProgramStart(lpszPictureName, lpszObjectName, “Passcs.exe”);} 在按钮上用ProgramExecute(“Passcs.exe”)脚本可以执行用户管理程序登陆和注销，做个登陆的画面，放2个按钮，写脚本：由函数PWRTLogin()来执行登录。
#pragma code(“USEADMIN.DLL”)#include “PWRT_API.H” #pragma code()PWRTLogin('1');由函数PWRTLogout()来实现注销。
#pragma code(“USEADMIN.DLL”)#include “PWRT_API.H” #pragma code()PWRTLogout();分别用登录按钮和注销按钮实现，在按钮的事件中输入相应的代码，登录动作(如事件 Mouse-click)#pragma code(“useadmin.dll”)#include “PWRT_api.h”#pragma code()PWRTLogin(’c’)；“);if(MessageBox(hwnd,”操作成功“,”提示123", MB_YESNO|MB_ICONQUESTION|MB_SETFOREGROUND|MB_SYS TEMMODAL)==IDYES){ } #pragma option(mbcs)}运行结果：窗口能置顶（所有的windows窗口前面）第二篇：windowsXP登录密码破解破解windowsXP登录密码方法大全和USB设备无法识别只要有4个原因和解决内存不能为读的问题破解win登录密码方法大全Windows XP的使用过程中如果你是一个很容易遗忘的人，那么一定不要忘记在第一次设置密码的同时创建一张可以恢复Windows XP中的账户密码的启动盘，它可以让你免去格式化硬盘的烦恼。
wincc按钮通过脚本更改的方法
wincc按钮通过脚本更改的方法最近才发现用脚本真的可以让画面更加高大上一点，本来想做个做个文档，但真的是做不出来就再下面总结一下用法把：拿提示文本举例吧，提示文本是把鼠标放到上面有相应的提示，我们可以通过VB函数修改比如打我们这个设备达到允许条件然后这个文本提示允许，也可以控制它的颜色让按钮更加明显（修改颜色我不知道为什么必须用VBGreen的方式而RGB(200,0,0)的方式不可以，所以有知道的顺便解答一下）''按钮文本ScreenItems("按钮1").Text="启动"''按钮字体大小ScreenItems("按钮1").FontSize=20''按钮字体样式ScreenItems("按钮1").FontName="隶书"''按钮粗体样式ScreenItems("按钮1").FontBold=True''按钮加下划线样式ScreenItems("按钮1").FontUnderline=True''按钮斜体样式ScreenItems("按钮1").FontItalic=True''按钮字体颜色ScreenItems("按钮1").ForeColor=vbGreen''按钮文本的字体 是否自适应大小ScreenItems("按钮1").AdaptBorder=False''按钮是否可见ScreenItems("按钮1").Visible=True''按钮的背景颜色ScreenItems("按钮1").BackColor=vbYellow''按钮背景的闪烁ScreenItems("按钮1").backflashingenabled=False ''按钮的文本闪烁ScreenItems("按钮1").FlashForeColor=False''按钮的提示文本ScreenItems("按钮1").ToolTipText="1#电机"''按钮的填充图案（根据手册设置该值） ScreenItems("按钮1").FillStyle=131077''按钮操作权限（0不可以操作，1可以操作） ScreenItems("按钮1").enabled=False''按钮的高ScreenItems("按钮1").Height=150''按钮的宽ScreenItems("按钮1").Width=150''按钮的XScreenItems("按钮2").Left=350''按钮的YScreenItems("按钮2").Top=350''按钮的线宽ScreenItems("按钮1").BorderWidth=1''按钮的线型ScreenItems("按钮1").BorderStyle=2''按钮的3D边框厚度ScreenItems("按钮2").BackBorderWidth=5''按钮的3D边框颜色ScreenItems("按钮2").BorderColorTop=vbRed''按钮的3D阴影颜色ScreenItems("按钮2").BorderColorBottom=vbYellow。
wincc 全套脚本总结
} -------------------------------------
——————6、时间同步——————
void SetCpuTime() { #pragma code("kernel32.dll"); void GetLocalTime(SYSTEMTIME *lpst); #pragma code(); SYSTEMTIME time BOOL ret; //printf("Start function SetCpuTime\r\n"); GetLocalTime(&time); ret= SetTagMultiWait("%d%d%d%d%d%d%d",
"data_FLAG",1
) }
-------------------------------------
——————7、对话框调用——————
BOOL A; BOOL B; HWND hwnd=NULL; int RetMsg; A=GetTagBit("TJ_ANNIU"); //Return-Type: BOOL hwnd=FindWindow(NULL,"WinCC-运行系统 - "); if (A==0)
MB_OK|MB_SYSTEMMODAL|MB_SETFOREGROUND); SetTagBit("TJ_ANNIU",0);
} else B=0; } else { } ------------------------------------------
——————8、声音报警——————
#pragma code("Winmm.dll") VOID WINAPI PlaySoundA(char* pszSound,char* hmode,DWORD dwflag); #pragma code()
wincc 7.0sp2破解硬狗安装说明
WinCC_V70_SP2_ASIA_download.z05
解压后有4个文件：
WinCC_V70_SP2.exe
WinCC_V70_SP2_01
WinCC_V70_SP2_02
WinCC_V70_SP2_03
如何在干净Windows 7(未安装过wincc 7.0 )下安装：
也可能在D盘，E盘等的根目录，你可以全盘搜寻Properties_SiWA.ini文件，
5、在该文件夹内，找到Properties_SiWA.ini文件，用记事本打开，修改其中 [Conditions] 段：
原来为:
[Conditions]
Action1=Extract
Action1Condition=Condition1 AND Condition2 AND Condition3 <modify string
1、安装windows组件：Message Quering(消息队列) and IIS
2、 运行 WinCC_V70_SP2.exe
3、安装程序的对话框内不要按任何按钮
4、在C盘根目录下，找临时文件夹 C:\{NUMBERS-NUMBERS-....} 例如： {DFDBB8FE-7426-454A-937C-F8E9230F896A}
CCProjectMgrCht.lng 改成 CCProjectMgrdeu.lng
五个全部改完，下面正式授权了
ቤተ መጻሕፍቲ ባይዱ
改完名，
跟正常的授权一样就行
ren e:\Program Files\Siemens\winCC\BIN\CCExpMsgChs.lng CCExpMsgdeu.lng
破解说明
安装说明破解说明破解文件中有以下几行代码，默认指向的硬盘盘符是C盘如果的WINCC不是安装在C盘，请打开"Wincc亚洲版硬件狗破解程序.bat"将以下几行代码的盘符更改为正确的盘符即可。
ren "c:\Program Files\Siemens\WinCC\bin\CCExpMsgChs.lng" "CCExpMsgdeu.lng"ren "c:\Program Files\Siemens\WinCC\bin\CCExpMsgCht.lng" "CCExpMsgita.lng"ren "c:\Program Files\Siemens\WinCC\bin\CCExpMsgJpn.lng" "CCExpMsgesp.lng"ren "c:\Program Files\Siemens\WinCC\bin\CCExpMsgKor.lng" "CCExpMsgfra.lng"ren "c:\Program Files\Siemens\WinCC\bin\CCProjectMgrCht.lng" "CCProjectMgrdeu.lng"打开"Wincc亚洲版硬件狗破解程序.bat"文件的方法不是双击，是在文件上点右键，在弹出的菜单中选择编辑即可打开。
WIN7中运行破解时请在文件上点右键选择以管理员身份运行。
用破解后的WinCC亚洲版打开以前中文编辑项目设置方法如下1、打开WinCC计算机属性选项卡；2、运行时的语言设置改为中文；3、运行时的默认语言改为中文；4、重新启动WinCC即可；。
Wincc 7.0 SP2亚洲版破解程序
Wincc 7.0 SP2亚洲版破解程序（问题补充）从本论坛找的一个方法，将他写成了批处理文件，仅供参考。
说明：本程序是按照默认的安装路径来写的默认路径是C:\Program Files\Siemens\WinCC\bin如果你是自定义路径安装，请将批处理文件里的路径该成与你的安装路径即可。
最近几个朋友使用这个批处理命令，有时不能成功破解硬件狗，针对这一问题解释如下。
本批处理命令的作用其实是将，C:\Program Files\Siemens\WinCC\bin目录下的几个文件修改一下名字将CCExpMsgChs.lng" 改成"CCExpMsgdeu.lng"将CCExpMsgCht.lng" 改成"CCExpMsgita.lng"将CCExpMsgJpn.lng" 改成"CCExpMsgesp.lng"将CCExpMsgKor.lng" 改成"CCExpMsgfra.lng"将CCProjectMgrCht.lng" 改成"CCProjectMgrdeu.lng"如果不嫌麻烦，可以手动完成以上修改。
文件内容如下@echo onren "C:\Program Files\Siemens\WinCC\bin\CCExpMsgChs.lng" "CCExpMsgdeu.lng"ren "C:\Program Files\Siemens\WinCC\bin\CCExpMsgCht.lng" "CCExpMsgita.lng"ren "C:\Program Files\Siemens\WinCC\bin\CCExpMsgJpn.lng" "CCExpMsgesp.lng"ren "C:\Program Files\Siemens\WinCC\bin\CCExpMsgKor.lng" "CCExpMsgfra.lng"ren "C:\Program Files\Siemens\WinCC\bin\CCProjectMgrCht.lng" "CCProjectMgrdeu.lng"说明：如果是从英文版升级到亚洲版，或者全新安装，都可以直接修改；如果是从亚洲版升级到7.0sp2,"CCExpMsgdeu.lng"、"CCExpMsgita.lng"、"CCExpMsgesp.lng"、"CCExpMsgfra.lng"、"CCProjectMgrdeu.lng"这几个文件已经存在，请删除后再修改本文转自亿万论坛：/a/a.asp?B=302&ID=1070022&p=3&q=1&r=111094。
wincc c vbs脚本怎么加密
wincc c vbs脚本怎么加密
随意改了鼠标动作的c程序，然后想学习加密，在网上看到全局脚本那的信息触发可以加密，但是我这个是在图像编辑器里做的，怎么把我改的这小段程序加密了？
还有全局脚本加密好像是得一个一个点开程序“信息触发”图标才亮，才能加密。
这个有没有更快的方法加密。
最佳答案
鼠标c动作是不能加密的。
只能自己写的脚本或者是项目函数才用于加密。
你可以将你的c程序创建一个函数，加密后然后在鼠标事件里面调用该函数。
wincc 7.0 C 脚本动态改变输入输出域绑定变量 更新周期为变量有变化
wincc 7.0 C 脚本动态改变输入输出域绑定变量更新周期为变量有变化
wincc7.0C脚本动态改变输入输出域绑定变量更新周期为变量有变化
我的变量是布尔型非0及1我希望输出输出域不是显示0或1而是显示中文0时显示(正常)1时显示(异常) 问题补充：
#include”Trigger.h”
#defineC_250ms1
LINKINFOlink;
link.LinkType=1;//设置连接方式:直接连接
link.dwCycle=C_250ms;//设置变化周期
sprintf(link.szLinkName,”MyTag”);//设置变量名称
SetLink(lpszPictureName,”IO1”,”OutputValue”,&link);
以前阿鸣教我的代码,
最佳答案
若是你使用静态文本显示内容，右键属性，在弹出的对象属性窗口中找到属性标签->字体，在右侧窗口中的文本的动态右键找到组态对话框。
看着这个窗口的内容相信你应该明白了。
Wincc的VBS脚本使用
1 Dim objTag Set objTag=("变量名")2 ("变量名").Read写：1 Dim objTag Set objTag=("变量名")1 '向变量写入数值12 ("变量名").Write 1中间变量的值写入：Dim objTag,valSet objTag=("变量名")val= '中间变量val存放了变量的值VBS语言使用方法概述：VBScript的全称是:Microsoft Visual Basic Script Editon.(微软公司可视化BASIC脚本版).正如其字面所透露的信息, VBS(VBScript的进一步简写)是基于Visual Basic的脚本语言.我进一步解释一下, Microsoft Visual Basic是微软公司出品的一套可视化编程工具, 语基于Basic. 脚本语言, 就是不编译成二进制文件, 直接由宿主(host)解释源代码并执行, 简单点说就是你写的程序不需要编译成.exe, 而是直接给用户发送.vbs的源程序, 用户就能执行了.一、入门: 1) 注释(以REM或'开头)行在程序中不起作用, 但能让别人更容易读懂你的程序. 2) 变量好像一个盒子, 或一个代号, 可以代表你想代表的东西. 变量赋值使用3)以""包裹起来的字符称之为"字符串"4)函数像一个"黑箱", 有参数和返回值, 用"="左边的变量可以接住返回值5) Inputbox函数弹出一个输入对话框,Msgbox则用于输出例：REM 输入并回显你的名字'使用InputBox和Msgbox函数Dim name,msgmsg="请输入你的名字:"name=Inputbox(msg,"名称")Msgbox(name)上例中，Dim用来声明一个变量, 在VBS中, 变量类型并不是那么重要, 就是说VBS中你不用考虑name储存的是一个整数还是一个小数(学名叫"浮点数"), 也不用考虑是不是字符串(一串字符, 比如:"Hello World"), VBS会自动帮你搞定. 所以第三行语句可以删除, 效果不会变.常量：格式是:const 常量名=常量值.例如: const PI= const NAME="记忆碎片"二、进阶数据类型转换：1）Dim a,b,ca=inputbox("a是:","输入半径")b=Inputbox("b是:","输入半径")c=a*2+b*2Msgbox(c)这个输入1、2时是62)Dim a,b,ca=inputbox("a是:","输入半径")b=Inputbox("b是:","输入半径")c=(a+b)*2Msgbox(c)这个输入1、2时是24为什么会不一样呢? 在数学上c=(a+b)*2 和 c=a*2+b*2是等价的, 在VBS中也是如此. 问题出在"+"上, 在VBS中, +不仅仅是加号的意思还表示把两个字符串连接起来, 例如"Hello"+"World"="HelloWorld" have you understood? 你还记得InoutBox函数的返回值吗? 是字符串! 这就看出问题了吧, 在编程中"1"不等于(<>)1, "1"是一个字符, 而1是一个数, 所以a,b都是字符串变量, "1"+"2"="12", 这就好像我们小时跟伙伴开玩笑问他们1+1=?一样, 我们总是笑着说"错啦,应该是11".但为什么, a可以*2却不发生错误呢? 这时VBS比较智能的一个表现, 如果这个字符串的内容是一个数且对他进行数学运算, 则把字符串强制转换成数参与运算如果字符串代表一个数, 但不参加数学运算, 而是参加字符串运算(合并)则当作字符串处理, 所以你看到a+b=12, 这时候a+b的结果是一个字符串, 当它要乘以2的时候就被强制转换成了数字12, 这样我就得到了结果24怎么修改这个程序呢? 我们需要用到另一个内建的函数:int, int函数的功能是将输入值转成整数值, 我们这样修改: c=(int(a)+int(b))*2四、循环结构for....nextdim i,jfor i=1 to 9for i=1 to 9str=str & i * j & " " '&是和并字符串的符号next '每个next对应一个fornext1）do..loop和exit do的用法2) while当表达式true的时候执行循环体,until反之3) for...next是计数循环, 每次执行计数器递加4) 嵌套循环的作用和写法 &用于连接字符串5) vbCrLf相当于键盘上的回车键五、数组定义：dim 数组名(元素数量), 这里大家要注意一点, 这里定义的元素数量总是比你要的要少一个, 因为一个数组的起点是0号数据而不是1, 所以大家一定要小心: 你需要10个数据, 就定义"9"。
Wincc常用C脚本及常用功能
Wincc常用C脚本及常用功能打开用户管理器ProgramExecute("Passcs.exe"); 取消激活#include "apdefap.h"void OnLButtonDown(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName,UINT nFlags, int x, int y){#pragma option(mbcs)HWND hwnd=NULL;int iRet;hwnd=FindWindow(NULL,"WinCC-运行系统 - "); //获得句柄iRet=MessageBox(hwnd,"是否取消激活?","Deactivate",MB_OKCANCEL|MB_ICONWARNING|MB_APPLMODAL);if(iRet==1)DeactivateRTProject (); //Return-Type: BOOL}关闭计算机#include "apdefap.h"void OnLButtonDown(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName,UINT nFlags, int x, int y){#pragma option(mbcs)HWND hwnd=NULL;int iRet;hwnd=FindWindow(NULL,"WinCC-运行系统 - ");iRet=MessageBox(hwnd,"是否关闭计算机?","ShutDown",MB_OKCANCEL|MB_ICONWARNING|MB_APPLMODAL);if(iRet==1)DMExitWinCCEx(DM_SDMODE_SYSTEM); }==================================================================== ==登陆代码:#pragma code(“useadmin.dll”)#include <pwrt_api.h>#pragma code()PWRTLogin (…e?);==================================== 取消激活(Deactivate)DeactivateRTProject();====================================== Wincc变量操作GetTagDWord(“变量名称”); 获取Wincc变量值SetTagDWord(“变量“，设定值); 设置Wincc变量对文本读写操作写操作#include "apdefap.h"void OnLButtonUp(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName,UINT nFlags, int x, int y) {#pragma option(mbcs)FILE* lpFile;char *shuzhu[6]={"tag_1","tag_2","tag_3","tag_4","tag_5","tag_6"};char* lpszStr;int i,j;lpszStr=SysMalloc(60); //Return-Type: void*lpFile = fopen("D:\\test.txt", "w+");for(i=0;i<6;i++){lpszStr=GetTagChar(shuzhu[i]); strcat(lpszStr,"\r\n");if(lpFile == NULL){ printf("can not open file\r\n"); return;}fprintf(lpFile, lpszStr); }SysFree(lpszStr);fclose(lpFile);}读操作#include "apdefap.h"void OnLButtonUp(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName,UINT nFlags, int x, int y) {#pragma option(mbcs)char* shuzhu[6]={"tag_1","tag_2","tag_3","tag_4","tag_5","tag_6"}; char tmp[255];int i=0;int ChrNumLine=38;FILE *fp;fp=fopen("D:\\test.txt","r"); if (fp==NULL){return;}else{rewind(fp);while(!feof(fp)){fgets(tmp,ChrNumLine,fp);SetTagChar(shuzhu[i],tmp);i++;}}fclose(fp);}画面窗口显示界面切换SetPictureName(lpszPictureName,"PicWindow_button","produce_manage_bu tton.pdl");SetVisible(lpszPictureName,"PicWindow_button",1);注:PicWindow_button是画面窗口名称;produce_manage_button.pdl是要显示的子画面。
Wincc的VBS脚本使用
W i n c c的V B S脚本使用------------------------------------------作者xxxx------------------------------------------日期xxxx变量读写： Write和Read方法的语法：读：1 Dim objTag Set objTag=HMIRunTime.Tags("变量名")2 HMIRunTime.Tags("变量名").Read写：1 Dim objTag Set objTag=HMIRunTime.Tags("变量名")objTag.Write 1 '向变量写入数值12 HMIRunTime.Tags("变量名").Write 1中间变量的值写入：Dim objTag,valSet objTag=HMIRunTime.Tags("变量名")objTag.Readval=objTag.Value '中间变量val存放了变量的值VBS语言使用方法概述：VBScript的全称是:Microsoft Visual Basic Script Editon.(微软公司可视化BASIC 脚本版).正如其字面所透露的信息, VBS(VBScript的进一步简写)是基于Visual Basic的脚本语言.我进一步解释一下, Microsoft Visual Basic是微软公司出品的一套可视化编程工具, 语基于Basic. 脚本语言, 就是不编译成二进制文件, 直接由宿主(host)解释源代码并执行, 简单点说就是你写的程序不需要编译成.exe, 而是直接给用户发送.vbs的源程序, 用户就能执行了.一、入门: 1) 注释(以REM或'开头)行在程序中不起作用, 但能让别人更容易读懂你的程序. 2) 变量好像一个盒子, 或一个代号, 可以代表你想代表的东西. 变量赋值使用"="3)以""包裹起来的字符称之为"字符串"4)函数像一个"黑箱", 有参数和返回值, 用"="左边的变量可以接住返回值5) Inputbox函数弹出一个输入对话框,Msgbox则用于输出例：REM 输入并回显你的名字'使用InputBox和Msgbox函数Dim name,msgmsg="请输入你的名字:"name=Inputbox(msg,"名称")Msgbox(name)上例中，Dim用来声明一个变量, 在VBS中, 变量类型并不是那么重要, 就是说VBS中你不用考虑name储存的是一个整数还是一个小数(学名叫"浮点数"), 也不用考虑是不是字符串(一串字符, 比如:"Hello World"), VBS会自动帮你搞定. 所以第三行语句可以删除, 效果不会变.常量：格式是:const 常量名=常量值.例如: const PI=3.1415926 const NAME="记忆碎片"二、进阶数据类型转换：1）Dim a,b,ca=inputbox("a是:","输入半径")b=Inputbox("b是:","输入半径")c=a*2+b*2Msgbox(c)这个输入1、2时是62)Dim a,b,ca=inputbox("a是:","输入半径")b=Inputbox("b是:","输入半径")c=(a+b)*2Msgbox(c)这个输入1、2时是24为什么会不一样呢? 在数学上c=(a+b)*2 和 c=a*2+b*2是等价的, 在VBS中也是如此. 问题出在"+"上, 在VBS中, +不仅仅是加号的意思还表示把两个字符串连接起来, 例如"Hello"+"World"="HelloWorld" have you understood? 你还记得InoutBox函数的返回值吗? 是字符串! 这就看出问题了吧, 在编程中"1"不等于(<>)1, "1"是一个字符, 而1是一个数, 所以a,b都是字符串变量, "1"+"2"="12", 这就好像我们小时跟伙伴开玩笑问他们1+1=?一样, 我们总是笑着说"错啦,应该是11".但为什么, a可以*2却不发生错误呢? 这时VBS比较智能的一个表现, 如果这个字符串的内容是一个数且对他进行数学运算, 则把字符串强制转换成数参与运算如果字符串代表一个数, 但不参加数学运算, 而是参加字符串运算(合并)则当作字符串处理, 所以你看到a+b=12, 这时候a+b的结果是一个字符串, 当它要乘以2的时候就被强制转换成了数字12, 这样我就得到了结果24怎么修改这个程序呢? 我们需要用到另一个内建的函数:int, int函数的功能是将输入值转成整数值, 我们这样修改: c=(int(a)+int(b))*2四、循环结构for....nextdim i,jfor i=1 to 9for i=1 to 9str=str & i * j & " " '&是和并字符串的符号next '每个next对应一个fornext1）do..loop和exit do的用法2) while当表达式true的时候执行循环体,until反之3) for...next是计数循环, 每次执行计数器递加4) 嵌套循环的作用和写法 4.5) &用于连接字符串5) vbCrLf相当于键盘上的回车键五、数组定义：dim 数组名(元素数量), 这里大家要注意一点, 这里定义的元素数量总是比你要的要少一个, 因为一个数组的起点是0号数据而不是1, 所以大家一定要小心: 你需要10个数据, 就定义"9"。
wincc脚本解密方法版
1C 脚本解密：UlttaEdll (F ：WissUlbriify\1 .fct]j .玄可社 K ） tt#oj 士*.出叩且匕IQ 匪肚钻式⑴刊L 血 莎高輙4） WO^i 崔4口c * 亠i.''』上』匕二.曲， 』q•掲粗*?乩』号卫4•空1 |町一最新资料推荐Jtw as■耳x mn 打讥扃肮'* L.lEflife MT M JC E AiiHd- l.kt M |' F^THfet flm — liiKJu^*11^-^ **_____________ — _____________________________________________________________________________ aD^rocQQtj ；3 啊 £5 峙E 13 3X DD OQ 3d F *F « 針二口 1E ・・FW 匚•，一 ■卜啊 1$ K OaaumQLJ «5 77 5f *£ T5 «E «3 74 吞F &E £□ 19 FP ,阳・7 & ■■ Funcx^口・如』gjuhj.......... mi ；OOOMK ：4DI L ： w 口 w»a 旳 lu GaiJMe^OLz ClCNgAPhd aoi:<ig?pii? OaODOOADfaJ上加>4tJ4的凶*/山"翎列ui-卜5心119 二-O. l_d… .N.«.H ._j i.F.u n.?.c.齢。
』H03H •禹由的8^jf 嗾半为H 0G"的 義的鼻时角虔为M 牛理義的"otr.i.Miuiii rittn Ji t fl-jirci E 时忙慚数中怕应MH 竹申豪才04・,％即间肋贞均为-血・」1恳九Fl* 2杷RLii 的 书圧款丰？TOO ■餌内客展为博0 1F0L推此斥济战雀賂宁■去为吓宁节筋甘函疵常宁节苹加（H*4.«匕覚有0牛睦犠干制OF 尉亨节,薦誓f 帛牛宁卅DT*f 的前氏百为1W”・P3呜益而昨氏帕!：■不为y 的一审中节左闵 由客/为1 1^-00- t> ?然JC 再圭H 解本蜡辑睛申址可觇正常打开史炜T-代釈 0 2 * f f f ] f * ¥ 斗 fOdCQD^Qfti a» 4fi iE 4Z 钧 Qi OQ » OD If 4-F ie A4 30 4K JI #rUMC«.・■・» (KtnWMh: £3 T7 5 r TS st R 馬 er ST 2D 7 - 3B 令T - 亡・ Furicc 1 口n (| r 7(ME 00盟咖 CH CO OQ Qi OD CQ( 00 w M &D 00 的 ◎0 OPoawcc30hi OD "O CO 严口 A 5~ 1T <3 T E -7 21 4fi> □□ £1 fH OD QD 卩D …片 n ：-：Ji 'X - , . ■ rOOMOOIOti ； M & co OD Cfl( A on M M BD 2T, ・■・・《■ ■“・<・・wfl J B ■ * UU^UDL&U^i 匚口 _u QO QD p ：w Q )g g DD QQ J Hu fOO&OOCMIII » 4 W g 0D 沖 0D W 0D GO 如 $ e ■ 1 4 + w "■ a » a 4 f- ■■ -I-CCZ 0027021： CD QD CQ CD OD TF co OD OD DD cm■4E o 口 & ............................ H. iXiuuu.vum »> R g >f 3 41 M ” GO 41T* OD £ «r.u.h.c B ei OaCQClj»Qdi <r OQ 4£ LJ W W QO 冲 714f W £ 1・©・■・,・q ・■_¥■慎©DDZh:64 CO 20 OD AT M 呂5, CO DD 5 ■- ■E6 OD ■ 1 . da di .F iOaCDDItlDK! 71 4E aa «1 如 00 *4 轴 AF ■ ■to 00 L.i>d n. + LM K PAHi.lct dW 躲VBS 脚本解密:0 UltraEdit - [Fi\«s\ScriptLibWfiduie3.bno] 止玄件日編髀（E 抄霊国插入同砸目Q 观宙笙楷式CD 列心壬仙輝瓠髙彖闿閒口画帮助凹 JtO 01I ：：!JuuQ密码位数PrnpFrti?'：OD DO 00 0C001 00 」f 」丄血丄生丽 9 1□Cl岂 Mc4Je<.,tor-i F%Mi\5cnFUbWoc 心亍孑[£.刘 W 评 丿童并视即 a x 打肝TT «帝或駐T D 匚 d _仇 t □口 口迎己 fl i XTa^oo ；,..test _ I M t 亠 ■"們・mm 色•国orioociornh ： Cl jODCiDLQh: OOODC'DZDh: dOOKD^Dh; QiKgQ 灿恥 OaOOCDEDhz Ll£lOXlLj£Oh ： OOOXiO^Qh ：IS OQ亠优抄者名称典字符不戰 卜改占毛称的孑特帚數 耐耳_口一月・£・犯* , i>-» bde . F 4 ! * EA3-K ・・・・・・.UQ 皿⑺ 5E 52 F vR 1用 UltraEdit将 tin 廳的bmo 克fl dtbaci 件打开从代邱的沖常菇厉找，找H-oo 00 00 01 00 00 00冷将其中的 ■01 ■淮为Fcr .廉A 一再从令尺制 卒编辅器中打开3■果还足要求 怖入密*4（修債陆可陳用販本 号）.|*JAQ 后看、有其 改刃P0・田IHL。