Estoy tratando de hacer que este autocompletador trabaje, pero no me carga ningun dato...donde esta mi errorr?
[CODE]$(function () {
$("#auto").autocomplete({
source: function (request, response) {
$.ajax({
url: "../../herramientas/ajax.asp?id="+strTipo+"&desc=";
data: "{ 'strTipo': '" + request.term + "' }",
dataType: "json",
type: "POST",
contentType: "application/json; charset=utf-8",
dataFilter: function (data) { return data; },
success: function (data) {
response($.map(data.d, function (item) {
return {
label: item.txtDescripcion, //label: item.name + (item.adminName1 ? ", " + item.adminName1 : "") + ", " + item.countryName,
value: item.txtCodigo // value: item.name
}
}))
},
error: function (XMLHttpRequest, textStatus, errorThrown) {
alert(errorThrown);
}
});
},
minLength: 1
});
[CODE]
Este es el archivo ajax.asp
Código:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!-- #include file="../asp/logon.asp" -->
<%
Dim Resultados
Dim Registro
Dim Empresa
Dim strBuffer
Dim strDonde
Dim strPrefijo
Dim strTabla
Dim strClaveTexto
strDonde=""
strTabla=""
strClaveTexto="0"
Set Empresa = gVisita.Usuarios.Usuario(Session("Usr")).Empresas.Empresa(Session("CodEmpresa"))
Select case Request("id")
case "1"
strPrefijo="CTA"
strTabla="CON_CUENTAS"
strClaveTexto="0"
case "2"
strPrefijo="CLS"
strTabla="CTT_ENTIDADES_GRUPOS_CLASIFICACIONES"
strClaveTexto="0"
case "3"
strPrefijo="CCS"
strTabla="CON_CENTROS_DE_COSTOS"
strClaveTexto="0"
case "4"
strPrefijo="TCC"
strTabla="CTT_TIPO_CENTROS_DE_COSTOS"
strClaveTexto="0"
case "5"
strPrefijo="TPO"
strTabla="BAS_ENTRADAS_DIARIO_TIPOS"
strClaveTexto="0"
end select
if strTabla <> "" and Request("desc") <> "" then
strBuffer="<div>"
Empresa.TablaGenerica = strPrefijo & ";" & strTabla & ";" & strClaveTexto
''strDonde = strPrefijo & "_CODIGO like '%" & Request("desc") & "%'"
strDonde = strPrefijo & "_DESCRIPCION like '%" & Request("desc") & "%'"
Set Resultados = Empresa.BasListarTabla(strDonde)
for each Registro in Resultados
strBuffer = strBuffer &Registro.Codigo &":"& strBuffer &Registro.Descripcion & "<br>"
''strBuffer = strBuffer & Registro.Descripcion & "<br>"
next
strBuffer = strBuffer
Response.Write(strBuffer) &"</div>"
end if
%>
Agradeceria de antemano su cordial ayuda...