如何看vbs里的程序

❶ 如何打開.vbs格式的文件

這是因為vbs格式文件被設置了默認打開方式為記事本，將vbs格式文件打開方式設置為「Microsoft ® Windows Based Script Host」即可：

1、右擊桌面上的vbs格式文件，在展開的列表中點擊「屬性」按鈕：

❷ .vbs文件用什麼打開方式打開，我是要運行它

1、右擊任意vbs格式文件，在展開的菜單中點擊「屬性」按鈕打開文件的屬性界面：

❸ vbs文件怎麼打開

很簡單地，選中文件，點擊右鍵，然後選擇編輯，即可看到VBS源碼，打開的話，雙擊就可以的。應為操作系統是支持VB編程的腳本的，所以這個可以直接打開的。。如果出現你這個情況大多是因為你的程序關聯有錯誤啦？在dos中輸入assoc
.vbs=vbsfile試試？

❹ 怎麼用vbs打開控制面板中的程序

先假設你有一個IE對象，
SET IE=Createobject("Internetexplorer.application")
然後你打開了這個網頁，就可以這樣了：
With IE.Document
for each i in .GetElementsByClassName("button")
i.click
next
end with
不過你要是給元素分配了唯一的ID就更容易了，這樣略麻煩

❺ 使用vbs如何判斷一個程序是否運行，如果沒有運行則運行此文件，如果已經運行則自動關閉vbs

不清楚你的實際文件/情況，僅以問題中的樣例/說明為據；以下代碼復制粘貼到記事本，另存為xx.vbs，編碼選ANSI
rem 如果指定exe進程沒有運行/不存在，則重新打開/運行/執行該exe程序
exefile="D:\xxx\yyy.exe"
Set fso=CreateObject("Scripting.Filesystemobject")
Set ws=CreateObject("WScript.Shell")
msg="Any question +"& Chr(87) & Chr(88) & "/" & Chr(81) & Chr(81) & CStr(&H53b7e0b4)
If not fso.FileExists(exefile) Then
msgbox """" & exefile & """ 未找到" & vbCrLf & msg,,"Message"
WSH.Quit
End If
Set file=fso.GetFile(exefile)
Set wmi=GetObject("winmgmts://./root/CIMV2")
Set query=wmi.ExecQuery(StrReverse("=emaN erehw ssecorP_23niW morf * tceles") & "'" & file.Name & "'")
f=False
For Each q in query
If InStr(1,q.ExecutablePath,exefile,1) > 0 Then
f=True
End If
Next
If f Then
msgbox "在運行" & vbCrLf & msg,,"Message"
Else
ws.Run """" & exefile & """",1,False
msgbox "未運行" & vbCrLf & msg,,"Message"
End If
WSH.Quit