json ajax asp中的應用

 

<%Response.CharSet="gb2312" %>
<%
gjz=request.querystring("gjz")
gjz=replace(gjz,",","")

str1="狐狸,藍狐,銀狐,芬蘭狐狸,白狐,狐皮,狐狸毛,狐狸肉,狐狸籠,產箱,食盒"
str1=str1 & "," & "貉子,白貉,烏蘇裏貉,貉皮,貉子毛,貉子肉,貉子籠"
str1=str1 & "," & "水貂,短毛黑貂,美國短毛黑貂,丹麥貂,白貂,彩貂,大連貂,金洲貂,貂肉,貂籠"
str1=str1 & "," & "獺兔,肉兔,長毛兔,觀賞兔,兔皮,兔毛,兔肉,兔籠"
str1=str1 & "," & "豬,苗豬,三元苗豬,二元母豬,杜洛克,梅山豬,長白豬,大約克,美國種豬,野豬,香豬"
str1=str1 & "," & "牛,羊,奶山羊,荷斯坦牛,利木贊牛,海福特牛,杜泊綿羊,波爾山羊,小尾寒羊,魯西黃牛,西門塔爾牛"
str1=str1 & "," & "鹿,梅花鹿,馬鹿,鹿茸,鹿鞭,鹿胎膏,鹿肉,鹿皮,麝,麝香,麝香鼠,蛇,赤鏈蛇,黒眉錦蛇,烏梢蛇,王錦蛇,蛇毒"
str1=str1 & "," & "蠍子,大黑蠍,雨林蠍,蠍毒,蟾蜍,蟾衣,蟾衣膠囊,蟾蜍皮,蟾酥,蚯蚓,太平二號,蚯蚓,太平三號蚯蚓"
str1=str1 & "," & "蠅,蠅蛆,蒼蠅,蠅蛆幹,孔雀,藍孔雀,白孔雀,七彩山雞,鵪鶉,鵪鶉苗,鵪鶉蛋,白條鵪鶉,鴿,肉鴿,信鴿,觀賞鴿,乳鴿,凍乳鴿,鴿子籠"
str1=str1 & "," & "鴕鳥,鴕鳥肉,鴕鳥蛋,鴕鳥皮,非洲鴕鳥,澳洲鴕鳥,鴯鶓,蛙,林蛙,牛蛙,美國青蛙,林蛙油,泥鰍,泥鰍苗,黃鱔,龍蝦,小螃蟹,田螺,黃鱔"
str1=str1 & "," & "龍蝦,淡水龍蝦,澳洲龍蝦,黃鱔,小螃蟹,泥鰍,田螺,黃粉蟲,豐年蝦,海狸鼠,豪豬,箭豬,竹鼠"
str1=str1 & "," & "狗,寵物狗,犬,獵犬,臧獒,牧羊犬,金毛,博美,吉娃娃,巴哥,貴賓,哈士奇,雪橇犬,牛頭梗,臘腸,斑點,藏獒,幼獒,鐵包金,白獒,純種藏獒"
str1=str1 & "," & "水產,魚,蝦,蟹,蛙,黃鱔,泥鰍,龍蝦,蚯蚓,龜,鱉,田螺,蝸牛,海馬,海蔘,家禽,肉雞,蛋雞,鴨,鵝,綠殼蛋雞"
str1=str1 & "," & "特禽,鴿,山雞,鵪鶉,孔雀,鴕鳥,鴯鶓,火雞,鷓鴣,珍珠雞,貴妃雞,朗德鵝"

sl1="2128,543,1197,3,112,551,6,192,46,16,39,3323,1829,1198,934,18,369,6,847,192,177,0,43,10,0,1,17,19,995,127,37,1,278,16,42,139,42917,29542,6496,390,1278,193,521,630,0,261,12,48984,37577,2030,22,8521,824,2060,18466,11643,11591,14886,96,42,14,11,3,1,0,0,51,11,7,956,23,1,92,111,14,128322,55,2,3,2,77,21,1,7,8,121,2,121,0,75,56,23,3,443,170,9,255,867,494,540,201,660,158,14,4,174,36,8,60,4,5,1,2,0,30,123,54,21,20,5,175,37,131,112,1,7,131,112,8,2,131,1,175,7,812,1,59,35,5,60,151,5,259,17,3,50,58,61,52,39,73,38,23,11,3,7,203,28,7,0,17,83,1252,172,34,123,131,175,112,121,38,32,7,22,1,24,37,123,145,443,371,104,26,660,668,867,443,60,30,112,112,90,126,39"

sl2=split(sl1,",")
sl3=""

str2=split(str1,",")
str3=""
for i=0 to ubound(str2)-1

	if(instr(str2(i),gjz)>0) then
		if(str3="") then
		str3="""" & str2(i) & """"
		sl3=sl2(i)
		else
		str3=str3 & "," & """" & str2(i) & """"
		sl3=sl3 & "," & sl2(i)
		end if
	end if

next


str4=""


if trim(str3)<>"" then
str4="{""name"":[" & str3 & "],""sl"":["&sl3&"]}"
end if

response.write str4

'{"name":[""]}
%>

            if (xmlhttp_request.readyState == 4) {
            if (xmlhttp_request.status == 200) {
            
			   
               var jg=xmlhttp_request.responseText;
               
              // alert(jg)
			  
               if(jg!="")
               {
               //var temp=jg.split(",")
               var temp=eval('('+jg+')')
             //  alert(temp.name.length)
               var temp1="<ul>"
               for(var i=0;i<temp.name.length;i++)
               {
               temp1=temp1+ "<li><a href='javascript:void(0);' οnclick='auto_send(/""+temp.name[i]+"/")'>&nbsp;"+ temp.name[i] +"&nbsp&nbsp&nbsp<font color=/"green/">"+temp.sl[i]+"Ìõ</font></a></li>"
               }
               temp1=temp1+"</ul>"

               document.getElementById("menu_auto").innerHTML =temp1;
               
               document.getElementById("menu_auto").style.display="block";
			   }
			   else
			   {
			   document.getElementById("menu_auto").style.display="none";
			   }