如何看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