首页 > 后端开发 > php教程 > 这段代码为什么没执行?解决方法

这段代码为什么没执行?解决方法

WBOY
发布: 2016-06-13 10:17:50
原创
986 人浏览过

这段代码为什么没执行?
通过PHP调用vbs脚本 启动迅雷下载软件. 单独运行vbs迅雷可以下载 PHP调用 没反应?
php代码如下:
define('ROOT', dirname(__FILE__).'/');
define('vbs', ROOT.'cmccapp_down.vbs');
$rs = array();
$file = 'http://www.baidu.com/img/baidu_sylogo1.gif';
if(!is_file($file)){
$name = basename($file);
$rs = array($file, $name, 'http://www.cmccapp.com/');
$content = file_get_contents(vbs);
preg_match_all('#\"([^"]+)\",#', $content, $m);
foreach($m[1] as $key=>$val){
$content = str_replace($val, $rs[$key], $content);
}
file_put_contents(vbs, $content);
$WshShell = new COM("WScript.Shell");

$cmdline = "cmd /C ".vbs;
$oExec = $WshShell -> Run($cmdline, 0, false);?
}
?>


vbs代码如下:

Set ThunderAgent = CreateObject("ThunderAgent.Agent.1")?
Call ThunderAgent.AddTask("http://www.baidu.com/img/baidu_sylogo1.gif","baidu_sylogo1.gif","","","http://www.cmccapp.com/",1,0,5)?
Call ThunderAgent.CommitTasks2(1)?
Set ThunderAgent = Nothing

------解决方案--------------------
PHP调用COM组件超级不稳定,放弃吧

相关标签:
来源:php.cn
本站声明
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系admin@php.cn
热门教程
更多>
最新下载
更多>
网站特效
网站源码
网站素材
前端模板