www.gusucode.com > 一款经典的Js仿Windows窗口特效集源码程序 > 一款经典的Js仿Windows窗口特效集/仿微软视窗/仿微软视窗/samples/xmlhttp/get.asp

    <%
	Response.ContentType = "text/xml" 

	field = Request("field")
	value = Request("value")
	if not isNumeric(value) then value=0
	
	if field = "zip" Then
		if value < 10 Then
			city = "Leipzig"
			state = "SX"
		else
			city = "Bonn"
			state = "RP"
		end if
	end if
	
	Response.Write "<?xml version=""1.0""?><zip><city>"+city+"</city><state>"+state+"</state></zip>"
%>