asp涓璿bscript璁块棶xml鏂囦欢

瑕佹眰浼犲叆宸ュ彿 杩斿洖鍛樺伐濮撳悕
"鍏ㄥ眬鏁版嵁 鑰冭檻杩欐牱鍙�瑕乴oad涓�娆�
set Doc = CreateObject("Microsoft.XMLDOM")
Doc.async = false
Doc.load(Server.MapPath("user_cnname.xml"))

function cnname_var (varusername)
dim node,i,nodecount,root
set nodeLis= Doc.getElementsByTagName("user")
nodeCount = nodeLis.length
For i=0 to nodeCount - 1
  if  nodeLis.item(i).childnodes.item(0).text = varusername then
"杩欓噷鏈変竴鐐圭枒鎯� 涓轰粈涔堟槸item(2)
    cnname_var = nodeLis.item(i).childnodes.item(2).text
    exit function
  end if
next
cnname_var = varusername
end function

xml鏂囦欢濡備笅锛�

<?xml version="1.0" encoding="gb2312"?>

<user_cnname>    
    <user>
      <username>A140</username>
  銆�銆�<cnname>璧靛缓宸�</cnname>
    </user>
    <user>
      <username>A141</username>
  銆�銆�<cnname>璧靛缓宸�</cnname>
    </user>
</user_cnname>

浣嗙敤杩欑�嶆柟寮忚繕娌℃湁鐩存帴浠庢暟鎹�搴撴椂鏌ヨ�㈡潵寰楀揩,鎵�浠ヤ篃灏辨病鏈夐噰鐢ㄨ繖绉嶆柟寮忥紝
鐢╦avascript + 鏁版嵁宀涗篃鍙�浠ュ疄鐜版煡璇�锛屼絾鏄�娌℃湁灏忔秹鍙婂埌浜嬫儏 鍦╝sp浠ｇ爜涓�涓嶅ソ璋冪敤