如何加快网页中调用本地程序的速度？

Question

var srun=new ActiveXObject("WScript.Shell");
srun.Run("E:\\ctais\\ctais.exe");
srun=null;var dd = new ActiveXObject("WScript.Shell");
while(dd.AppActivate("登录到CTAIS")==false)
{
setTimeout("2000");
}   
//setTimeout(10);
//setTimeout("fun()",5000);//
dd.AppActivate("登录到CTAIS");
dd.SendKeys ("CTAIS{TAB}oracle{Enter}");
while(dd.AppActivate("中国税收征管信息系统")==false)
{
setTimeout("3000");
}
dd.AppActivate("中国税收征管信息系统");
dd.SendKeys ("{DOWN}");
dd.SendKeys ("{DOWN}");
dd.SendKeys ("{RIGHT}");
dd.SendKeys ("{DOWN}");