我想在WINCC项目中做一个软件试用期弹出窗口提示，用户输入正确的密码后才可以正常继续使用，但我又不会用VBS脚本，哪位高手可以帮帮我吗？谢谢了。
问题补充：
谢谢CHEN111201,我看了下连接，却还不是我问题的全部啊，哪位有现成的VBS脚本吗？
最佳答案
If zccg.Read = 0 Then
If sydq.Read =0 Then
If djs.Read >0 Then
If djs.Read <7 Then
m=MsgBox( "试用期限即将到期，请在 "&dJs.read&" 天内注册！"+Chr(13) & Chr(10)+"现在注册吗？" ,68,"温馨提示" )
End If
Else
m=MsgBox( "系统将在午夜12点停机，请在此之前注册，否则后果自负！"+Chr(13) & Chr(10)+"现在注册吗？" ,68,"温馨提示" )
End If
If m=6 Then
zcm.Write InputBox("请输入系统开发商提供的序列号注册","注册向导")
If zcm.Read ="ABCD-1234-5678" Then
MsgBox"序列号已通过验证，注册成功",,"注册成功"
zccg.Write 1
sydq.Write 0
Else
MsgBox"序列号输入错误，请重启系统注册?",,"注册失败"
End If
End If
Else
m=MsgBox("使用期已过，请注册！",64,"温馨提示")
If m=1 Then
zcm.Write InputBox("请输入系统开发商提供的序列号注册","注册向导")
If zcm.Read ="ABCD-1234-5678" Then
MsgBox"序列号已通过验证，注册成功",,"注册成功"
zccg.Write 1
sydq.Write 0
Else
MsgBox"序列号输入错误，请重启电脑注册?",,"注册失败"
hmiruntime.stop
End If
End If
End If
End If
时间在PLC里做，WINCC里建立如下变量
zccg: 注册成功标志 BOOL
sydq: 使用期限已到标志 BOOL
djs: 倒计时天数 INT
zcm: 注册码 STRING
提问者对于答案的评价：
非常感谢
原创文章，作者：more0621，如若转载，请注明出处：https://www.zhaoplc.com/plc271702.html
微信扫一扫 
支付宝扫一扫 