草稿自动保存挂件(AJAX & XML) #STAR Plug System -- 易建联合工作室(星际1站工作室)


标题：
关键字：
正文：	STAR企业建站 Version 2.0 STAR建站系统是易建联合工作室(星际1站工作室)独立开发的一套功能完善的企业网站建设系统，该系统包含前、后台，实现程序与模版分离技术，方便维护，升级容易。自2005年STAR建站系统version 1.0正式应用开始，由于其优越的性能、低廉的费用备受中小型企业青睐。互联网日新月异，WEB技术不断发展，目前STAR建站系统已经升级到version 2.0版本，2.0版本比之前的版本更易用，更易被各大搜索引擎收录。

使用帮助

1、在调用页插入<SCRIPT LANGUAGE="JavaScript" src="AutoSaver.js"></SCRIPT>
<script language="JavaScript" defer type="text/javascript">
var SetParament = "ParaMent1,ParaMent2,ParaMent3"//设置需要自动保存的变量
init();//添加defer防止文档未完全加载发生意外
</script>
2、在调用页插入信息显示代码<span id="MakeBtn"></span><span id="msg"></span>
3、默认自动保存时间是60秒，如果需要设置，可以修改AutoSaver.js文件的var AutoSaveTime = 60;//单位：秒
草稿自动保存挂件(AJAX & XML) STAR Plug System
易建联合工作室(星际1站工作室) 2006-12-21
网站建设企业建站系统
http://www.46vip.cn
使用说明

AutoSaver.asp

<% @CODEPAGE = 65001 %>
<% Response.charset = "utf-8" %>
<%
REM ## ================================================================
REM ## 草稿自动保存挂件(AJAX & XML) STAR Plug System
REM ## 易建联合工作室(星际1站工作室) 2006-12-21 
REM ## 网站建设 企业建站系统
REM ## http://www.46vip.cn
REM ## ================================================================
REM ## 设置暂存文件名
Const FileName = "CommentAutoSave.xml"

On Error Resume Next
If Request.Form.Count <>"" Then 
	Set objXmlFile = Server.CreateObject("Microsoft.XMLDOM")
	objXmlFile.async = False
	Set objPI = objXmlFile.createProcessingInstruction("xml","version='1.0' encoding='utf-8'")
	objXmlFile.insertBefore objPI, objXmlFile.childNodes(0)
	Set root = objXmlFile.createElement("AllDate") 
	Set objXmlFile.documentElement = root
	For Each Query In Request.Form
		If Request.form(Query)<>"" then
			Set filenode = objXmlFile.createNode("element", Query, "") 
			filenode.Text = Request.Form(Query)
			root.appendChild filenode
		End if
	Next
	objXmlFile.save Server.MapPath(FileName)
End If

If Err.Number = 0 then
	Response.Write Formatdatetime(Now,4)&":"&Right("0"&Second(Now),2)&"自动保存成功"
Else
	Response.Write Formatdatetime(Now,4)&"保存不成功,错误： "&Err.Number&"nbsp;"&Err.description
End If
%>

AutoSaver.js

//# REM ================================================================
//# REM 草稿自动保存挂件(AJAX & XML) STAR Plug System
//# REM 易建联合工作室(星际1站工作室) 2006-12-21 
//# REM 网站建设 企业建站系统
//# REM http://www.46vip.cn
//# REM ================================================================
var FileName = "CommentAutoSave.xml";				//设置暂存文件名
var AutoSaveTime = 5;								//修改保存时间间隔(秒)
var TimeConfig = AutoSaveTime;
var msg = null;
var MakeBtn = null;

function init(){
	msg = document.getElementById("msg");
	MakeBtn = document.getElementById("MakeBtn");
	MakeBtn.innerHTML ="<button onclick='FileView();'>查看</button><button onclick='FileRestore();'>恢复</button><button onclick='FileSaving();'>暂存</button>"
}

function FileView(){
	window.open(FileName,'','');
}