XML+JAVASCRIPT+ASP在线短信息功能(5)

作者:不详 来源: 日期:2002-8-30
---------下面的文件就是发送新信息的NEWINFORMATION.HTM页,代码比较长,慢慢看看-----------

<html>
<head>
<title>新信息</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../style/style.css" type="text/css">
<link rel="stylesheet" href="../style/onlineInformation.css" type="text/css">
<script LANGUAGE="Javascript" SRC="../script/XmlCode.js"></script>
<script LANGUAGE="Javascript" SRC="../script/XmlHttp.js"></script>
<script LANGUAGE="Javascript" SRC="../script/Pace.js"></script>
<SCRIPT LANGUAGE=Javascript>
<!--
window.focus()
var Cursor = window.opener //上一层窗口对象
Cursor.parent.document.body.onunload = Close //首页关闭,本窗口就关闭
var text
var name

function Close()
{
window.close()
}

function Init()
{
document.all["name"].focus() 
}

function FormSubmit()
{
text = document.all["text"].value
name = document.all["name"].value
if(Pace(name))
{
alert("Sorry.\b收信息人的名字不能为空")
document.all["name"].focus()
document.all["name"].select()
}
else
{
if(Pace(text))
{
alert("Sorry.\b您所要发送的信息内容不能为空")
document.all["text"].focus()
document.all["text"].select()
}
else
{
hidden.style.zIndex = 5
Check(Send("<农村娃娃出品-必属精品><NAME>" + code(name) + "</NAME><BODY>" + 
code(text) + "</BODY></农村娃娃出品-必属精品>","CreateInformation.asp"))
}
}
}


function Check(MissYou)
{
if(MissYou == false)
{
alert("Sorry.\b找不到该名在线会员.消息未能发出.请检查你所填的名字")
Y(false)
}
else
{
switch(parseInt(MissYou))
{
case 1:
alert("Sorry.\b找不到该名在线会员.消息未能发出.请检查你所填的名字")
Y(false)
break;
case 2:
alert("Sorry.\b信息发送失败.请再试一遍")
Y(false)
break
case 3:
Y(true)
break;
default:
alert("Sorry . 信息发送失败.请再试一遍")
Y(false)
}
}
}

function Y(Bool)
{
hidden.style.zIndex = 0
if(Bool)
{
document.all["text"].value = ""
document.all["text"].focus()
}
else
{
document.all["text"].value = text
}
}
-->
</SCRIPT>
</head>

<body bgcolor="#DFDED9" text="#000000" onload="Init()">
<div id="Layer1" style="position:absolute; left:0px; top:0px; 
width:324px; height:214px; z-index:1"> 
<table width="324" border="0" cellspacing="0" cellpadding="0" 
class="BB" bgcolor="#DFDED9">
<tr> 
<td width="24"> 
<div align="left" id="F"><b><font face="Verdana, Arial, Helvetica, 
sans-serif">TO:</font></b> </div>
</td>
<td width="300"> </td>
</tr>
<tr> 
<td colspan="2" height="176"> </td>
</tr>
<tr> 
<td colspan="2"> 
<table width="324" border="0" cellpadding="0" cellspacing="0">
<tr bgcolor="#DFDED9"> 
<td width="81"> 
<div align="center" id="Send"><a href="javascript:FormSubmit()">发送</a></div>
</td>
<td width="243"> 
<div align="center" id="k"> </div>
</td>
</tr>
</table>
</td>
</tr>
</table>
</div>
<div id="hidden" style="position:absolute; left:0px; top:0px; width:324px; 
height:214px; z-index:0; background-color: #DFDED9; layer-background-color: 
#DFDED9; border: 1px none #000000"> 
<table width="324" border="0" cellspacing="0" cellpadding="0" height="30">
<tr> 
<td height="100"> 
<div align="center"><img src="image/nowLoading.gif" width="180" height="29"></div>
</td>
</tr>
</table>
</div>
<div id="Layer3" style="position:absolute; left:39px; top:0px; 
width:254px; height:16px; z-index:3"> 
<input type="text" id="name" maxlength="20" style="border: 1 solid #aaa697">
</div>
<div id="Layer2" style="position:absolute; left:4px; top:20px; width:262px; 
height:169px; z-index:2"> 
<textarea id="text" wrap="VIRTUAL" cols="45" rows="11" style="overflow: hidden;
border: 1 solid #aaa697"></textarea>
</div>
</body>
</html>

-----------------等等是用户看完所有新信息就删除这些以看过信息的ECHANGXML.ASP文件-----------------------
相关文章