JQUERY en ASP

[anarchy9902]

Hola busca esta libreria jquery-1.2.5.pack.js bien ahora
<script type="text/javascript" src="util/jquery-1.2.5.pack.js"></script>

ahora por ejemplo

<script language="JavaScript">
function llenar_combo(cbcc,name_combo,name_combo_sec,tipo,v aladicional){
var cbcc_valor=escape(cbcc.options[cbcc.selectedIndex].value)//Centro de Costo
var name_combo_valor=escape(name_combo.options[name_combo.selectedIndex].value)//Perfil
$(name_combo_sec).html('<option value="-">---</option>');
$.ajax({
type: 'GET',
url: "Inv_Consulta_Ajax.ASP?tipo="+tipo+"&parm1="+cbcc_ valor+"&parm2="+name_combo_valor+"&parm3="+valadic ional,
success: function (html) {
$(name_combo_sec).html(html);
}
});
}
</script>

osea en el onchange="llenar_combo(document.all.cb1,document.a ll.cb1,document.all.cb2,'editDEscPerfil','xx')"

ahora en la pagina Inv_Consulta_Ajax.ASP




<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%

dim s_CadenaSql ,nr
dim resultArray,arrayvalores()
set rs= Server.CreateObject("ADODB.Recordset")
set res= Server.CreateObject("ADODB.Recordset")
set rs6= Server.CreateObject("ADODB.Recordset")
set rss= Server.CreateObject("ADODB.Recordset")

rs.CursorLocation = 3 'Cursor del lado del Cliente

s_tipo=Request("tipo")
s_parm1=Request("parm1")
s_parm2=Request("parm2")
s_parm3=Request("parm3")
s_parm4=Request("parm4")
s_parm5=Request("parm5")
s_parm6=Request("parm6")
s_parm7=Request("parm7")
s_parm8=Request("parm8")
s_parm9=Request("parm9")
myArrResult=array(Request("check"))
'Response.Write (s_tipo)
nom_usu_sesion=cstr(session("Objctrl").prmusuario)
user_sesion=cstr(session("user"))

if s_tipo="editDEscPerfil" Then
s_CadenaSql="update inv_perfil_soft set descripcion='"+s_parm3+"',usu_mod='"+nom_usu_sesio n+"',fec_mod=GETDATE() where nro_perfil='"+CSTR(s_parm5)+"'"
rs.open s_CadenaSql, session("strConexion2005")

s_CadenaSql="select * from inv_perfil_soft order by id"
rs.open s_CadenaSql, session("strConexion2005"),3,1

Response.Write ("<option value='null'>------Ningun Perfil------</option>")
Do While Not rs.EOF
nr=nr+1
If trim(CSTR(s_parm5))=trim(CSTR(rs("nro_perfil"))) Then
Response.Write ("<option value='"+trim(CStr(rs("nro_perfil")))+"' selected>"+trim(CSTR(rs("nro_perfil")))+"--"+rs("descripcion") +"</option>")
Else
Response.Write ("<option value='"+trim(CStr(rs("nro_perfil")))+"'>"+trim(CS TR(rs("nro_perfil")))+"--"+rs("descripcion") +"</option>")
End if
rs.MoveNext
Loop

End if
%>

si te das cuenta success: function (html) html=es lo que devuelve el archivo Inv_Consulta_Ajax.ASP

espero te sirva o a alguna otra persona buscando este tema

saludos

y muchos exitos

ANARCHY9902
SURF PROGRAMMER