以前在做Domino B/S 開發(fā)的客戶端與服務(wù)器異步交互時(shí)都是通過Ajax返回XML格式的數(shù)據(jù)，不過如果用上JSON的話，在傳送小數(shù)據(jù)量的時(shí)候個(gè)人感覺還是比較方便的。下面附上JSON的前后端數(shù)據(jù)操作代碼
客戶端:
JsHeader:

var oXHR;
function mycallback() {      //回調(diào)函數(shù)
  if (oXHR.readyState == 4) {
     if (oXHR.status == 200) {
       var data = eval('('+oXHR.responseText+')');
       data.name; //Json返回的name數(shù)據(jù)
     } else {
       alert('error');
     }
  }
} 

button調(diào)用:

 oXHR = new ActiveXObject("Microsoft.XMLHTTP");
 oXHR.open('POST',  '/'+document.all.db_Path.value(數(shù)據(jù)庫路徑)+'/Agent?openAgent&p='+document.all.rnds.value(隨機(jī)數(shù)，去除頁面緩存),  false);
 oXHR.onreadystatechange = mycallback;
 oXHR.send(encodeURIComponent(參數(shù)));

agent:

Sub Initialize
  Dim session As New NotesSession
  Dim contextDoc As NotesDocument
  Set contextDoc = session.DocumentContext
  '獲取POST傳遞的參數(shù),對(duì)中文進(jìn)行解析,避免出現(xiàn)中文亂碼
  sParam = Evaluate( | @URLDecode("Domino";Request_Content) |,contextDoc )
  Print |content-type:text/xml|      '打印XML表頭 
  Print |{'name':'|+sParam(0)+|'}|
End Sub