xml| Online +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+
+ Super + Invincible--------xml+javascript+asp online Short Message Function---Introduction
+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
To see the landing page Login.asp, the code is longer, you can modify the page to make it more beautiful:
<%option Explicit
Response.CacheControl = "No-cache"
Response.AddHeader "Pragma", "No-cache"
Response.Expires = 0
%>
<! DOCTYPE HTML Public "-//ietf//dtd html//en" >
<title></title>
<!--#include virtual= "/turbo/inc/checkusers_inc.asp"-->
<!--it is loaded with a file that verifies the user's login password and username, which is not listed here. The important thing is that
This file, if the user log on successfully, will generate 2 cookies, one called myID, save the user ID,
One is called MyName, and the user's username is saved. These 2 cookies are important and will be used later.
-->
<!--The following JavaScript code should be stored as a JS file so that users can visit it again later. Speed will accelerate-->
<script language=javascript>
<!--
function sendinformation ()//////If new information is clicked, click on the div with ID information to pop up the window to view the information
{
if (Count < (xmldom_length-1))
{
Playmusic (' Music1 ', ' Play () ')
Count = Count + 1
}
Else
{
Count = Count + 1
Echang (False)
}
Openwin (".. /onlineinformation/getinformation.htm "," GetInformation ")
}
function Openwin (url,winname)//functions to open a new window
{
window.open (Url,winname, "width=324,height=214,resizable=no,scrollbars=no,left=" + ((SCREEN.AVAILWIDTH/2)-200) + ", Top= "+ ((SCREEN.AVAILHEIGHT/2)-150))
}
Functions remove ()//This function is to delete the information that the user has already seen. Refresh the XML data after the deletion.
{
Xmldomhttp.open ("POST", ".. /onlineinformation/echangxml.asp ", false)
Xmldomhttp.send (XMLDOM)
Dom.loadxml (Xmldomhttp.responsetext)
if (Dom.parseError.errorCode!= 0)
{
Alert ("sorry.\b) An error has occurred. The online information function has been stopped. You can press \b\" refresh \ "\b Try again!!.")
}