Client.html
<script language="JavaScript">
function AddDataPost(sUserId,sUserName)
{
/*
*--------------- AddDataPost(sUserId,sUserName) -----------------
* AddDataPost(sUserId,sUserName)
* 功能:通過XMLHTTP添加資料.相當於Form的Method=Post.
* 參數:sUserId,字串,發送條件.
* 參數:sUserName,字串,發送條件.
* 執行個體:AddDataPost(document.all.userid.value,document.all.username.value);
*--------------- AddDataPost(sUserId,sUserName) -----------------
*/
var oBao = new ActiveXObject("MSXML2.XMLHTTP.3.0");
//特殊字元:+,%,&,=,?等的傳輸解決辦法.
//Update:2004-6-1 12:22
//escape(sUserId),escape(sUserName);
sUserId = escape(sUserId);
sUserName = escape(sUserName);
var userInfo = "userid="+sUserId+"&username="+sUserName;
oBao.open("POST","Server.asp",false);
oBao.setRequestHeader("Content-Type","application/x-www-form-urlencoded")
oBao.send(userInfo);
//清空輸入框資料.
document.all.userid.value="";
document.all.username.value="";
//伺服器端處理返回的是經過escape編碼的字串.
alert(unescape(oBao.responseText))
}
</script>
<input type="button" onclick="AddDataPost(document.all.userid.value,document.all.username.value)" value="AddDataPost"><br>
userid:<input type="text" name="userid"><br>
username:<input type="text" name="username">
Server.asp
<% @Language="JavaScript" %>
<%
function OpenDB(sdbname)
{
/*
*--------------- OpenDB(sdbname) -----------------
* OpenDB(sdbname)
* 功能:開啟資料庫sdbname,返回conn對象.
* 參數:sdbname,字串,資料庫名稱.
* 執行個體:var conn = OpenDB("database.mdb");
*--------------- OpenDB(sdbname) -----------------
*/
var connstr = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="+Server.MapPath(sdbname);
var conn = Server.CreateObject("ADODB.Connection");
conn.Open(connstr);
return conn;
}
var sResult = "";
var oConn = OpenDB("data.mdb");
//相當於Form的Method=Post.
//相當於Form的Method=Post.
//特殊字元:+,%,&,=,?等的傳輸解決辦法.用戶端傳輸過來是經過escape編碼的.
//所以服用器端應該先unescape解碼.
//Update:2004-6-1 12:22
//unescape(Request.Form("userid")).....
var userid = unescape(Request.Form("userid"));
var username = unescape(Request.Form("username"));
sResult = "userid:"+userid+"\nusername:"+username+"\n 添加成功."
var sql = "Insert into users(userid,username)Values('"+userid+"','"+username+"')";
oConn.Execute(sql);
Response.Write(escape(sResult));
%>
//Data.mdb
//users [id, userid,username]