📄 index.asp

📁 oracle9i程序事例集
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="common/status.html"-->
<html>
<head>
<title>欢迎来到本电子商务网站</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">
<!--
body,td,th {
	font-family: 宋体, 华文宋体, 楷体_GB2312;
	font-size: large;
	color: #4157F1;
}
body {
	background-color: #E4E2FE;
}
-->
</style>
<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,120);
Merlin.Show(); 
Merlin.Play("GestureRight"); 
Merlin.Speak("欢迎光临DZSW.COM电子商务网站！"); 
Merlin.Play("GestureLeft");
Merlin.Speak("您的光临是对我们最大的支持！");
Merlin.MoveTo(700,120);
Merlin.Play("GestureLeft");
Merlin.Speak("如果您是管理员");
Merlin.Play("GestureLeft");
Merlin.Speak("您可以对后台数据库进行方便的管理！");
Merlin.Play("GestureRight");
Merlin.Speak("希望能提高您的工作效率！");
Merlin.MoveTo(200,450);
Merlin.Play("GestureLeft"); 
Merlin.Speak("如果您想购买商品"); 
Merlin.Play("GestureLeft"); 
Merlin.Speak("我们这里提供低价的商品，高质的服务！"); 
Merlin.Play("GestureRight");
Merlin.Speak("希望您能够找到适合的商品！"); 
Merlin.Play("GestureDown");
Merlin.Hide();
Merlin.MoveTo(300,300);
Merlin.Show();
Merlin.Play("Surprised"); 
Merlin.Play("GestureUp");
Merlin.Speak("忘了还有一点要提醒您！");
Merlin.Play("GestureUp");
Merlin.Speak("提醒您后我也就消失了：）！"); 
Merlin.Play("GestureUp");
Merlin.Speak("想再见到我可以去右下角的系统任务栏找我哦！"); 
Merlin.Play("GestureUp");
Merlin.Speak("祝您好运！！！");
Merlin.Play("GestureDown");
Merlin.Hide(); 
} 
} 
//--> 
</SCRIPT>
<SCRIPT> 
<!-- 
chplay() 
--> 
</SCRIPT>
</head>

<body>
<div align="center">
<form name="index" method="post" action="login.asp">
<table width="750"  border="0">
  <caption class="style1">&nbsp;
  </caption>
  <tr>
    <td colspan="3" align="center"><h1><span class="style1">欢迎来到本电子商务网站</span></h1></td>
    </tr>
  <tr>
    <td colspan="2" align="center">请选择您的登陆身份：    </td>
    <td>&nbsp;</td>  
  </tr>
  <tr>
    <td>&nbsp;</td>
    <td align="left" valign="bottom">&nbsp;</td>
    <td>&nbsp;</td>
  </tr>
  <tr>
    <td width="33%">&nbsp;</td>
    <td align="left" valign="bottom" width="34%">
<input name="identity" type="radio" value="Admin" checked>      
库存管理员</td>
    <td>&nbsp;</td>
  </tr>
  <tr>
    <td>&nbsp;</td>
    <td width="34%">&nbsp;    </td>
    <td>&nbsp;</td>
  </tr>
  <tr>
    <td>&nbsp;</td>
    <td align="left" valign="bottom"><input  name="identity" type="radio" value="Customer">
    普通客户或公司 </td>
    <td>&nbsp;</td>
  </tr>
  <tr>
    <td>&nbsp;</td>
    <td>&nbsp;      </td>
    <td><input type="submit" name="Submit" value="确定"></td>
  </tr>
</table>
</form>
</div>
</body>
</html>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -