全局腳本如何啟用,啟用后如何調(diào)用
劉玉蓉
發(fā)布于2014-08-25 17:45
7
0
標(biāo)簽:
全局腳本項(xiàng)目模式如下
Sub CreateSleepFile(lngMS)
Dim MyFSO, MyFile
Set MyFSO = CreateObject ("s cripting.FileSystemObject")
Set MyFile = MyFSO.CreateTextFile( "D:MySleep.vbs", True )
MyFile.WriteLine "Ws cript.Sleep " & CLng(lngMS)
MyFile.Close
End Sub
第二步:在畫面中添加一個(gè)按鈕:Button1,設(shè)置其Text屬性為“Sleep”,在其鼠標(biāo)單擊事件中,選VBS動(dòng)作,代碼如下:
Sub OnClick(Byval Item)
Dim WshShell
Item.Text="Sleep Start..."
Call createsleepfile(5000)
Set WshShell = CreateObject("Ws cript.Shell")
WshShell.Run "D:MySleep.vbs", ,True
Item.Text="Sleep End"
End Sub
Wincc運(yùn)行后,在D盤下沒(méi)生成MySleep.vbs文件,已經(jīng)在計(jì)算機(jī)屬性里選擇了啟動(dòng)全局腳本,并重啟過(guò)。網(wǎng)上有人說(shuō)要在SIMATIC S7 Protocol Suite 下面的驅(qū)動(dòng)連接,單擊右鍵,系統(tǒng)參數(shù),單位,邏輯設(shè)備名稱-進(jìn)行選擇 打開(kāi)WINCC 通訊連接。SIMATIC S7 Protocol Suite 下有SOLT PLC / NAMED CONNECTION / MPI/PROFBUS/INDUSTRIAL ETHERNET 請(qǐng)問(wèn)是什么原因?
第二,如果一分鐘觸發(fā)一次,畫面VBS如何調(diào)用?全局腳本類型應(yīng)該是標(biāo)準(zhǔn)?項(xiàng)目?還是動(dòng)作?剛接觸不太了解,能否詳細(xì)說(shuō)說(shuō)。
問(wèn)題補(bǔ)充:
項(xiàng)目模式Wscript中沒(méi)有空格,按程序思路應(yīng)生成MySleep.vbs文件,可是沒(méi)有找到。畫面按鈕點(diǎn)擊后也沒(méi)有。
如果寫一個(gè)全局腳本代碼如下
if 變量1=1
....
end if
是否變量1取按鈕狀態(tài)觸發(fā),或中其它值?這樣調(diào)用?全局腳本類型是動(dòng)作?項(xiàng)目?還是標(biāo)準(zhǔn)?好能舉例說(shuō)明.
佳答案
測(cè)試了下,你的代碼沒(méi)問(wèn)題可以正確執(zhí)行,由于網(wǎng)站安全的原因Wscript中間被強(qiáng)制插入了空格,不知道原來(lái)復(fù)制的有沒(méi)有
項(xiàng)目里寫的是供動(dòng)作或其它畫面腳本里調(diào)用的過(guò)程或函數(shù),所以一般全局腳本寫在動(dòng)作里,動(dòng)作需設(shè)置一個(gè)觸發(fā)器以確定何時(shí)執(zhí)行動(dòng)作,點(diǎn)擊工具欄里的觸發(fā)器按鈕即可進(jìn)行設(shè)置,可設(shè)置周期性的定時(shí)觸發(fā)或變量觸發(fā),如果一分鐘觸發(fā)一次,那么設(shè)置一個(gè)1分鐘的定時(shí)器做為觸發(fā)器就可以了。