将Form内容转换成XML格式

写的仓促,请各位提出修改意见。谢谢!

/*
函数名: strfrmtoxml
作用:  将Form数据转换成XML形式,用于XMLHTTP传输
调用方式: var strxml=strfrmtoxml(FromName)
*/
function strfrmtoxml(objform)
{
var strxml='';
var oroot=objform.name;
strxml+="<"+oroot+">";

var j=objform.elements.length;
 for(i=0;i {
 if (objform.elements(i).type=="checkbox")
 {
  if (objform.elements(i).checked)
  {
  strxml+="<"+objform.elements(i).name+">";
  strxml+=objform.elements(i).value;
  strxml+="";
  }
 }
 else if (objform.elements(i).type=="radio") 
 {
  if(objform.elements(i).checked)
  {
  strxml+="<"+objform.elements(i).name+">";
  strxml+=objform.elements(i).value;
  strxml+="";
  }
 }
 else
 {
  strxml+="<"+objform.elements(i).name+">";
  strxml+=objform.elements(i).value;
  strxml+="";
 }
}
strxml+="";
return strxml;
}

用于XMLHTTP传输。

因为XMLHTTP 不能直接Send表单,所以做一个转换,然后:
function getxmll(objform)
{
    var strxml=strfrmtoxml(objform);
    var xmlhttp = new ActiveXObject("Microsoft.XMLHTTP");
    xmlhttp.Open("POST", "myasp.asp", false);
    xmlhttp.Send(strxml);
    divDisplay.innerHTML=xmlhttp.responseText;
}