用javascript判断客户端是否安装了我所想安装的软件

Question

不同的软件，判断方法不一致。如果是activeX控件
IsObject(CreateObject("Adobe.SVGCtl"))
Adobe.SVGCtl是progid一般软件安装后，在注册表中有一定的表示，可以从注册表中判断

Answer 1

<script language="JScript">
var strComputer = ".";
var intcount = 0 ;
var objWMIService = WScript.GetObject("winmgmts:" + "\\" + strComputer + "\\" + "root" + "\\" + "cimv2");
var colSoftware = objWMIService.ExecQuery ("Select * from Win32_Product Where Name = 'COM Explorer'");
for (objSoftware in colSoftware){
   document.write ( objSoftware.name );
document.write ( objSoftware.Description );
intcount = intcount + 1;
}
document.write ( intcount );
</script>你自己稍微改下。
这个需要把ie安全级别改为最低，允许执行匿名activeX, name替换为你的Installer 的名称。
要看有那些属性msdn查看win32_Product .
如果有计数则说明有此程序安装上。当然你也可以不用这个，用注册表操作，查看是否有安装。

Answer 2

能不能具体点啊。。最好能有个例子看下，我组件的名字是jfdownx.ocx

Answer 3

<script language="VBScript">
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colProcessList = objWMIService.ExecQuery _
    ("Select * from Win32_Process Where Name = 'Notepad.exe'")
For Each objProcess in colProcessList
    objProcess.Terminate()
Next
</script>你看看你用这个vbscript代码会不会报错。

Answer 4

<script language="VBScript">
strComputer = "."
intcount = 0 
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colSoftware = objWMIService.ExecQuery ("Select * from Win32_Product where name='Vbsedit' ")
For Each objSoftware In colSoftware
document.write ( "Name: " )
document.write ( objSoftware.name )
document.write ( "      " )
document.write ( "Description: " )
document.write ( objSoftware.Description )
document.write ( "<br>" )
intcount = intcount + 1
Next
document.write ( intcount )
</script>

Answer 5

不行有没有js的例子啊？现在的需求是判断客户端的active文件。没有就让客户去下载页面，有就执行下载

Answer 6

activex 你用 cxz7531(大花猫) 的方法。

Answer 7

你可以试着调用ActiveX 里的一个方法Method, 如调用不成功,则说明control还没有下载成功.例如:
<script language="javascript">
var bControlLoaded=false;
function window.onload()
{
try
{
if (objectID.someMethod)
bControlLoaded = true;
}
catch (ex)
{}
alert(bControlLoaded);
}
</script>
<object id="objectID"></object>

Answer 8

我就想判断active组件在不在。不存在就跑到下载软件的页面能给段代码不

Answer 9

activeX控件应该都有一个progid
用VBS函数CreateObject("progid"))能创建一个对象。
然后用IsObject函数判断是不是一个对象。
下面这个例子，是判断svg插件是否安装的
Function isSVGControlInstalled()
on error resume next
isSVGControlInstalled = IsObject(CreateObject("Adobe.SVGCtl"))
end Function