¿Por que no carga formularios IE?

[oabareload]

La funcion llenar solo recibe datos de un onchange="llenar('a=ciudad&cp=','cp','cp1');llenar ('a=municipio&cp=','cp','cp2');llenar('a=estado&cp =','cp','cp3');"

Esto solo pasa en Internet Explorer cuando trato de llamar estos datos, pero todo lo demás del ajax... como cargar otra pagina si lo ahce... pero no hace esto.....

De aqui no pasa

Código:

if(peticion.readyState == 3)
					{
						loading.innerHTML = "Espere Por Favor 75%...";
					}

java.asp

Código:

function llenar(id,divid,divid2)
	{
		var peticion = nuevoAjax();
		var url = "cargar.asp";
		var valor = document.getElementById(divid).value;
		var loading = document.getElementById("loading");
		var obj = document.getElementById(divid2);
		var url2= id+valor+"&ms="+new Date().getTime();
		peticion.open("POST", url, true);
		peticion.onreadystatechange = function()
			{
				if(peticion.readyState == 0)
					{
						loading.innerHTML = "Enviando Petición...";
					}
				if(peticion.readyState == 1)
					{
						loading.innerHTML = "Espere Por Favor 25%...";
					}
				if(peticion.readyState == 2)
					{
						loading.innerHTML = "Espere Por Favor 50%...";
					}
				if(peticion.readyState == 3)
					{
						loading.innerHTML = "Espere Por Favor 75%...";
					}
				if (peticion.readyState == 4)
					{
						if(peticion.status == 200)
							{
								loading.innerHTML = "Listo...";
								var result = peticion.responseText;
								obj.value = result;
							}
						else if(peticion.status == 404)
							{
								loading.innerHTML = "La página que buscas no se encuentra";
							}
						else
							{
								loading.innerHTML = "Error: "peticion.status;
							}
					}
			}
		peticion.setRequestHeader('Content-Type', 'application/x-www-form-urlencoded; charset=ISO-8859-1');
		peticion.send(url2);
		return false;
	}

cargar.asp

Código:

<%@ LANGUAGE="VBSCRIPT" %>
<%
Option Explicit

Dim conn, qry, rsCP, codigopostal, ciudad, municipio, estado, a

codigopostal=request("cp")
a=request("a")

Set conn = Server.CreateObject("ADODB.Connection")
conn.Open Session("ConnectionString")

if codigopostal <> "" then

	qry="SELECT * FROM CP WHERE codigopostal="& codigopostal &""
	set rsCP=conn.Execute(qry)
	
	If not rsCP.EOF Then
		ciudad=rsCP("ciudad")
		municipio=rsCP("municipio")
		estado=rsCP("estado")
	End If
	
	set rsCP = Nothing
	
	if a = "ciudad" then
		response.write ciudad
	elseif a = "municipio" then
		response.write municipio
	else
		response.write estado
	end if
	
end if

conn.close
%>

Pagina donde van los resultados

Código:

<label>#EXT / #INT / CP</label>
	<input type="text"  size="10" maxlength="20" class="textfield" /><input type="text"  size="10" maxlength="20" class="textfield" /><input type="text" id="cp" size="12" maxlength="20" class="textfield" onchange="llenar('a=ciudad&cp=','cp','cp1');llenar('a=municipio&cp=','cp','cp2');llenar('a=estado&cp=','cp','cp3');" /><br /><br />
	<label>Ciudad</label>
	<input type="text"  size="40" maxlength="20" id="cp1" class="textfield" /><br /><br />
	<label>Delegacion o Municipio</label>
	<input type="text" size="40" maxlength="20" id="cp2" class="textfield" /><br /><br />
	<label>Estado</label>
	<input type="text" size="40" maxlength="20" id="cp3" class="textfield" /><br /><br />