vbs腳本入門-九游会j9娱乐平台

a. vbs腳本教程

vbs病毒的原理與防護(轉帖

b. 如何編寫wincc 按鈕的vbs腳本

i/o域的屬性中輸入輸出屬性連接變數a,
按鈕腳本：事件中 點擊左鍵
dim a

set a=hmiruntime.tags("a")
a.read
hmiruntime.tags("b").write a.value
你試試

c. 璋佽兘甯鎴戠紪涓猇bs鐨勮剼鏈,瑕佹眰瑕佷竴鐩存寜涓婼hift閿

vbs浣跨敤sendkeys妯℃嫙鎸夐敭錛屼竴嬈″彧鑳芥寜涓嬈★紙鎸囧畾嬈℃暟錛夛紝涓嶈兘鈥滄寜浣忎笉鏀鋸濄傚彧鑳介氳繃寰鐜妯℃嫙涓嶅仠鍦版寜shift閿錛屼絾榪欎釜璺熶綘鐨勮佹眰灝變笉涓鑷翠簡銆
浣犲彲浠ュ皾璇曠敤autoit鑴氭湰鎴栨寜閿綺劇伒鑴氭湰銆侫utoit瑕佹寜浣(淇濇寔鎸変笅鐘舵)shift閿
send("{shiftdown}") ;鎸変綇shift閿
鐒跺悗鐢℉otkeyset璁劇疆涓涓鐑閿鐢ㄤ簬鍋滄錛屽仠姝㈢殑浠ｇ爜錛
send("{shiftup}") ;鏉懼紑shift閿

autoit鍙浠ョ紪璇戜負exe鏂囦歡鐩存帴榪愯岀殑錛堝嵆浣跨數鑴戞病瑁匒utoit涔熷彲浠ヨ繍琛岋級銆
涓嬮潰鏄鍙傝冪▼搴忥紙浣跨敤gui涓婄殑鎸夐挳鏉ユ帶鍒訛級錛
#include
#include
#include
#region ### start koda gui section ### form=
$form1 = guicreate("鎸夐敭鎺у埗", 156, 65, 192, 114, -1, $ws_ex_topmost)
$button1 = guictrlcreatebutton("鎸変笅shift", 40, 16, 81, 33)
guisetstate(@sw_show)
#endregion ### end koda gui section ###
while 1
$nmsg = guigetmsg()
switch $nmsg
case $gui_event_close
exit
case $button1
if guictrlread($button1) == "鎸変笅shift" then
send("{shiftdown}")
guictrlsetdata($button1, "寮硅搗shift")
elseif guictrlread($button1) == "寮硅搗shift" then
send("{shiftup}")
guictrlsetdata($button1, "鎸変笅shift")
endif
endswitch
wend