以前在做Domino B/S 开发的客户端与服务器异步交互时都是通过Ajax返回XML格式的数据，不过如果用上JSON的话，在传送小数据量的时候个人感觉还是比较方便的。下面附上JSON的前后端数据操作代码
客户端:
JsHeader:
var oXHR;
function mycallback() { //回调函数
if (oXHR.readyState == 4) {
if (oXHR.status == 200) {
var data = eval('('+oXHR.responseText+')');
data.name; //Json返回的name数据
} else {
alert('error');
}
}
}
button调用:
oXHR = new ActiveXObject("Microsoft.XMLHTTP");
oXHR.open('POST', '/'+document.all.db_Path.value(数据库路径)+'/Agent?openAgent&p='+document.all.rnds.value(随机数，去除页面缓存), false);
oXHR.onreadystatechange = mycallback;
oXHR.send(encodeURIComponent(参数));
agent:
Sub Initialize
Dim session As New NotesSession
Dim contextDoc As NotesDocument
Set contextDoc = session.DocumentContext
'获取POST传递的参数,对中文进行解析,避免出现中文乱码
sParam = Evaluate( | @URLDecode("Domino";Request_Content) |,contextDoc )
Print |content-type:text/xml| '打印XML表头
Print |{'name':'|+sParam(0)+|'}|
End Sub
