您现在的位置:软界网技术中心WEB开发ASP > 技术显示
XML+JAVASCRIPT+ASP在线短信息功能(4)
2001-8-10 0:00:00   网友评论       阅读次数 点此评论
   ---------下面的文件就是发送新信息的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文件-----------------------

 

      来源: 作者:
 
【评论查看】