高校问答兰州交通大学杨志龙:这个代码怎么不能用呀，帮我看一下呀，谁能帮我改一下呀
来源：百度文库 编辑：高校问答 时间：2024/05/08 03:29:01
<body>
<SCRIPT>
<!--
function crml(nid)
{
try
{
nid=new ActiveXObject("Agent.Control.2");
nid.Connected = true;
nid.Characters.Load("");
return nid;
}
catch (err)
{
return false;
}
}
function chplay ()
{
if (ml=crml ("ml"))
{
var MerlinID;
var MerlinACS;
Merlin = ml.Characters.Character(MerlinID);
Merlin.MoveTo(200,200);
Merlin.Show();
Merlin.Play("Explain");
Merlin.Play("Announce");
Merlin.Speak("欢迎光临,从现在开始,我是这里的导游");
Merlin.Play("Gestureright");
Merlin.Play("Pleased");
Merlin.Speak("首先代表我的主人谢谢您的大架光临");
Merlin.Play("Greet");
Merlin.Play("Idle1_1");
Merlin.Hide();
Merlin.MoveTo(600,300);
Merlin.Show();
Merlin.Play("Surprised");
Merlin.Speak("请到留言版留下你来过的痕迹");
Merlin.Play("Read");
Merlin.Speak("这里的花需要你来浇水,希望您能经常过来坐坐");
Merlin.Play("Read")
Merlin.Play("GestureUp");
Merlin.Speak("记住在日志看帖子要回哦");
Merlin.Play("DontRecognize");
Merlin.Speak("当然这里有很多精彩的内容,请一定要关注");
Merlin.Play("DontRecognize");
Merlin.Play("Greet");
Merlin.Speak("如果有什么问题请到日志回答问题转贴跟贴");
Merlin.Play("Greet");
Merlin.Speak("我的主人会在第一时间给您答复");
Merlin.Play("Greet");
Merlin.Hide();
}
}
//-->
</SCRIPT>
<SCRIPT>
<!--
chplay()
-->
</SCRIPT>
</body>
<SCRIPT>
<!--
function crml(nid)
{
try
{
nid=new ActiveXObject("Agent.Control.2");
nid.Connected = true;
nid.Characters.Load("");
return nid;
}
catch (err)
{
return false;
}
}
function chplay ()
{
if (ml=crml ("ml"))
{
var MerlinID;
var MerlinACS;
Merlin = ml.Characters.Character(MerlinID);
Merlin.MoveTo(200,200);
Merlin.Show();
Merlin.Play("Explain");
Merlin.Play("Announce");
Merlin.Speak("欢迎光临,从现在开始,我是这里的导游");
Merlin.Play("Gestureright");
Merlin.Play("Pleased");
Merlin.Speak("首先代表我的主人谢谢您的大架光临");
Merlin.Play("Greet");
Merlin.Play("Idle1_1");
Merlin.Hide();
Merlin.MoveTo(600,300);
Merlin.Show();
Merlin.Play("Surprised");
Merlin.Speak("请到留言版留下你来过的痕迹");
Merlin.Play("Read");
Merlin.Speak("这里的花需要你来浇水,希望您能经常过来坐坐");
Merlin.Play("Read")
Merlin.Play("GestureUp");
Merlin.Speak("记住在日志看帖子要回哦");
Merlin.Play("DontRecognize");
Merlin.Speak("当然这里有很多精彩的内容,请一定要关注");
Merlin.Play("DontRecognize");
Merlin.Play("Greet");
Merlin.Speak("如果有什么问题请到日志回答问题转贴跟贴");
Merlin.Play("Greet");
Merlin.Speak("我的主人会在第一时间给您答复");
Merlin.Play("Greet");
Merlin.Hide();
}
}
//-->
</SCRIPT>
<SCRIPT>
<!--
chplay()
-->
</SCRIPT>
</body>
在我的IE里是可以正常使用的。
这段代码只能在IE中运行，好像还得安装一定版本以上的 Office 程序才行。