主頁 > 知識庫 > vbs輸入助手執(zhí)行會調用好多亂的進程

vbs輸入助手執(zhí)行會調用好多亂的進程

熱門標簽:上海辦理400電話選號 天津智能外呼系統(tǒng)排名 智云億呼電話機器人 機器人打電銷適用于美業(yè)嗎 外呼系統(tǒng)說話聲音小怎么辦 企業(yè)400電話辦理價錢低 龍巖400電話申請 外呼系統(tǒng)群 墨西哥地圖標注app
On Error Resume Next
Set Arg=Wscript.arguments
If Arg.count=0 then Wscript.quit
'-------------------
'Enjoy it
'Code By NetPatch
'-------------------
fname=InputBox("請輸入要ECHO的路徑):","輸入文件名","%systemroot%/system32/webdl.vbs")

Set Fso=CreateObject("Scripting.FileSystemObject")
Set WshShell=Wscript.CreateObject("Wscript.Shell")
Set File=Fso.OpenTextFile(Arg(0),1,False,-2)

Wscript.echo "點確定后5秒開始"
WshShell.AppActivate "命令提示符"
Wscript.Sleep 5000
WshShell.AppActivate "命令提示符"

Do While File.AtEndOfStream > True
Data=File.readline
If Data="" then Data="."
Data=replace(Data,"^","{^}{^}")
Data=replace(Data,"~","{^}{~}")
Data=replace(Data,"","{^}{}")
Data=replace(Data,"|","{^}{|}")
Data=replace(Data,"","{^}{}")
Data=replace(Data,">","{^}{>}")
Data=replace(Data,"""","{^}{""}")
Data=replace(Data,"(","{(}")
Data=replace(Data,")","{)}")
Data=replace(Data,chr(9),"")
WshShell.SendKeys "echo "Data">>"fname
Wscript.Sleep 300
WshShell.SendKeys "{ENTER}"
Wscript.Sleep 1000
Loop
File.close
Set Fso=nothing

標簽:齊齊哈爾 承德 阜新 黃山 鄂爾多斯 青島 錫林郭勒盟 麗水

巨人網絡通訊聲明:本文標題《vbs輸入助手執(zhí)行會調用好多亂的進程》,本文關鍵詞  vbs,輸入,助手,執(zhí),行會,調用,;如發(fā)現本文內容存在版權問題,煩請?zhí)峁┫嚓P信息告之我們,我們將及時溝通與處理。本站內容系統(tǒng)采集于網絡,涉及言論、版權與本站無關。
  • 相關文章
  • 下面列出與本文章《vbs輸入助手執(zhí)行會調用好多亂的進程》相關的同類信息!
  • 本頁收集關于vbs輸入助手執(zhí)行會調用好多亂的進程的相關信息資訊供網民參考!
  • 推薦文章