urjosito ayudame con un combo???

[yoyi2002]

tengo un formulario con un combo y hartos text mas, el combo lo lleno de la base de datos(me funciona). el problema que tengo es:
necesito que cuando seleccione algun valor del combo los text tengan los valores asociados al nombre del combo(los valores son sacados de la base de datos)?????

[Nico+1]

<select name="distrito" id="distrito">
<option> </option>
<%do until ListaDistrito.eof %>
<option value='<%=ListaDistrito(0)%>'><%=Lista Distrito(1)%> </option>
<%ListaDistrito.MoveNext
loop
ListaDistrito.Close %>
</select>

Me carga cuando son tan salemeras...
espero que te sirva...
saludos

[yoyi2002]

no es ese el problema, el problema es que cuando me seleccione un valor del combo en los textos salgan los valores asociados a ese nombre de la base de datos :(

[AlZuwaga]

tengo un formulario con un combo y hartos text mas, el combo lo lleno de la base de datos(me funciona)

Ok, tu problema ASP ya está resuelto

necesito que cuando seleccione algun valor del combo los text tengan los valores asociados al nombre del combo

Tu problema ya escapa al ASP y se mete con javascript o con VBscript client-side. repito: CLIENT-SIDE

Para esas cuestiones favor de utilizar el foro javascript u otras tecnologías web -> vbscript (según tus preferencias)

Tratemos de mantener un orden en el foro.

[yoyi2002]

dazuaga lo que pregunto no escapa de asp
ya que parece que la sentecia para hacer esto es algo asi
<%=rs.Fields("nombre de los campos text")%>"

no se como arreglarlos me pueden ayudar
?????

[Nico+1]

lo que entiendo es que cuando selecione algo del combo lo obtenga alguna caja de texto.???

[yoyi2002]

mira en el combo tengo todos los codigos.
en los textos esta el nombre, en otro el valor, en otro la cantidad.
cuando seleccione un codigo necesito que en los textos me aparezca el nombre,valor, cantidad asociado a ese codigo. ayudenme porfa????????

:(

[Nico+1]

no si te entiendo...

<%=rs.fields("campo")%> es o mismo <%=ListaDistrito(0)%>

<select name="distrito"
<option> </option>
<%do until ListaDistrito.eof %>
<option value='<%=ListaDistrito(0)%>'><%=Lista Distrito(1)%> </option>
<%ListaDistrito.MoveNext
loop
ListaDistrito.Close %>
</select>


donde:
"value" tengo el codigo y es lo que no vez y al lado colocas la descripcion y el codigo si lo deceas...
<option value='<%=ListaDistrito(0)%>' ><%=ListaDistrito(0)%><%=ListaDistrito (1)%> </option>

[yoyi2002]

nico mira este es el problema.
el combo y los botones estan en un formulario.
no tienen que aparecer al lado del combo, la cosa es que cada vez que me cambie un codigo del combo me salga en lo stextos la descipcion?????
vessss????

[AlZuwaga]

la cosa es que cada vez que me cambie un codigo del combo me salga en lo stextos la descipcion

sigo insistiendo en que tu problema no corresponde a este foro...

si no me equivoco, estás necesitando una función javascript que se ejecute en el evento onchange del <select> y que te cambie la descripción del registro seleccionado en un <input type="text"> o en un <textarea>..

[Nico+1]

hay un evento onselectchange() o algo así no recuerdo lo podria reemplazar por onChange() que coloque espero que te sirva

<select name="distrito" onChange="javascript:document.nombreformulari o.cajatexto.value=document.nombreformulario.nombre combo.value;">
<option> </option>
<%do until ListaDistritos.eof %>
<option value='<%=ListaDistritos(0)%>'><%=List aDistritos(1)%> <%=ListaDistritos(0 )%> (<%=ListaDistritos(2)%>)&lt ;/option>
<%ListaDistritos.MoveNext
loop
ListaDistritos.Close %>
</select>

[bakanzipp]

Código:

  

<form name=formulario action=misma_pagina.asp method=post>

<select name=combo onchange="document.formulario.submit();">
<option>Selecciones</option>
<%do until rs.eof %>
<option value="<%=rs("codigo")%>"><%=rs("nombre")%></option>
<%rs.MoveNext
loop
rs.Close %>

<% if request("combo")<>"" then
bla..bla...
sql="select * from tabla where codigo='"& request("combo") &"';"
if not rs.eof then%>
<table>
<tr>
<td>Nombre</td>
<td><input type=text name=nombre value="<%=rs("nombre")%>">
</td>
</tr>
<tr>
<td>cantidad</td>
<td><input type=text name=nombre value="<%=rs("cantidad")%>">
</td>
</tr>
<tr>
<td>valor</td>
<td><input type=text name=nombre value="<%=rs("valor")%>">
</td>
</tr>
</table>
<%end if%>
</form>

[bakanzipp]

oye yoyi...por ke no mejor me envis tu tarea...te la desarrollo segun las especificaciones y me depositas a mi cta por mis honorarios... :P :P

[yoyi2002]

bacanzipp si quieres podemos hacer negocio, me ayudas a hacer alguna pantallas y llegamos a un acuerdo???
como podemos ponernos en contacto????

dime si te gusta la idea????

[bakanzipp]

no pasa nada niña...yo te ayudo pero no es necesario que lleguemos a un acuerdo, total como dicen por ahi en conocimiento no tiene precio y la buena voluntad sobra... ;)

manda algo a mi email y cuando tenga tpo libre tratare de ayudarte...

saludos

[yoyi2002]

de que parte eres?????

como dicen por ahi es mejor ayudar si hay algun incentivo???

tengo que hacer un programa que maneje datos tipo factura???
tienes telefono para ponernos en contacto???

[yoyi2002]

bacanzipp el select de denante no se cierra????
no hay que cerrarlo o si???

[bakanzipp]

si hay ke cerrarlo (eso me pasa por copiar y pegar y no revisar antes...)

<select name=combo onchange="document.formulario.submit();" >
<option>Selecciones</option>
<%do until rs.eof %>
<option value="<%=rs("codigo")%>&quot ;><%=rs("nombre")%></option>
<%rs.MoveNext
loop
</select>
rs.Close %>

soy de stgo city.

mi cel es: 9.... tai mas loca ke lo voy a dar en publico... mandame un correo y te lo envio ahi.

[yoyi2002]

La parte de

<%rs.MoveNext
loop
</select>

rs.Close %>

la arregle por esta
por que me mandaba un error
<%rs.MoveNext
loop%>
</select>

<%rs.Close %>

ahora en esta parte tengo problemass



<% if request("combo")<>"" then
sql="select * from tabla where codigo='"& request("combo") &"';"
if not rs.eof then%>

hay dos if y tu cierras una solo donde se cierra el otro???
me manda un error de Expected 'End'

[bakanzipp]

claro

</table>
<%end if%>
<%end if%>

[yoyi2002]

ya casi casi. al seleccionar el combo me muestra los datos del rut seleccionado pero en el combo se cambia el rut seleccionado. me muestra siempre el primero de la lista con los datos que ya seleccione del rut anterior . y cuando ingreso de nuevo a la pagina en los datos text me muestra datos, no los limpia .
cual puede ser el problema ????
he visto que en el astion del formulario hacen algo parece????

[bakanzipp]

es ke cada vez que refresques la pagina (al hacerle el onchange debes guardar el valor del request del combo para que no pierdas el dato que seleccionaste...algo asi

Código:

  
<select name=combo onchange="document.formulario.submit();">
<option>Selecciones</option>
<%do until rs.eof %>
<option value="<%=rs("codigo")%>" <%if request("combo")=rs("codigo") then%>SELECTED<%end if%>>
 <%=rs("nombre")%></option>
<%rs.MoveNext
loop%>
</select>
<%rs.Close %>

mas o menos

[yoyi2002]

bacanzipp sabes como puedo hacer para que no me aparezca un solo dato en la pantalla. es que aparece el puro combo a veces en la pantalla. Cuando aparece solo me desconfigura las tablas utilizadas(me corre el nombre y el combo lejos de la posicion original. despues de seleccionar uno ahi vuelve a su posicion original)

[bakanzipp]

mandame la pagina y te la reordeno...

quieres que aparezca el combo y adema la tabal con los text pero vacios al principios y luego al momento de seleccionar con la informacion en cada text?

[yoyi2002]

<form name="form1" method="post" action="actualizar_proveedor.asp">

<table width="771" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="172" height="360"></td>
<td width="427" valign="top">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="1" height="10" ></td>
<td width="141" ></td>
<td width="31" ></td>
<td width="253" ></td>
<td width="1" ></td>
</tr>
<tr>
<td height="22" ></td>
<td colspan="4" valign="top" bgcolor="#000099" >
<div align="center"> <font color="#FFFFFF" size="4"><b><font size="4">Actualizar
Proveedor</font></b></font></div>
</td>
</tr>
<tr>
<td height="19" ></td>
<td ></td>
<td ></td>
<td ></td>
<td ></td>
</tr>
<tr>
<td height="28" ></td>
<td valign="top" ><b><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Rut:</font></b></td>
<td colspan="2" valign="top" >
<%set conexion = conecta()
set rs=Server.CreateObject("ADODB.Recordset" )
sql= "select * from proveedor"
rs.open sql, conexion %>


<select name="combo_rut" style="width:115" onchange="document.form1.submit()" >
<option>Seleccione</option>
<%do until rs.eof %>
<option value="<%=rs("rut_proveedor")%&g t;"<%if request("combo_rut")=rs("rut_provee dor") then%>SELECTED<%end if%>>

<%=rs("rut_proveedor")%></option>
<%rs.MoveNext
loop%>
</select>
<%rs.Close %>
<% if request("combo_rut")<>"" then
set conexion = conecta()
set rs=Server.CreateObject("ADODB.Recordset" )
sql="select * from proveedor where rut_proveedor='"& request("combo_rut") &"';"
rs.open sql, conexion
if not rs.eof then%>

</td>
<td ></td>
</tr>
<tr>
<td height="28" ></td>
<td valign="top" ><b><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Servicio:</font></b></td>
<td valign="top" >

[yoyi2002]

parte 2

<input type="checkbox" name="servicio" >
<% if rs("servicio")= 0 then%>
<script language=JScript>
document.form1.servicio.checked=true
</script>
<%end if %>
</td>
<td ></td>
<td ></td>
</tr>
<tr>
<td height="28" ></td>
<td valign="top" ><b><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Nombre:</font></b></td>
<td colspan="2" valign="top" >
<input type="text" name="nombre_proveedor" size="40" maxlength="40" value="<%=rs("nombre_proveedor") %>">
</td>
<td ></td>
</tr>
<tr>
<td height="28" ></td>
<td valign="top" ><b><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Rubro:</font></b></td>
<td colspan="2" valign="top" >
<input type="text" name="rubro_proveedor" size="40" maxlength="40" value="<%=rs("rubro_proveedor")% >" >
</td>
<td ></td>
</tr>
<tr>
<td height="28" colspan="2" valign="top" ><b><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Dirección:</font></b></td>
<td colspan="2" valign="top" >
<input type="text" name="direccion_proveedor" size="40" maxlength="40" value="<%=rs("direccion_proveedor&quo t;)%>">
</td>
<td ></td>
</tr>
<tr>

<td height="28" colspan="2" valign="top" ><b><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Contacto:</font></b></td>
<td colspan="2" valign="top" >
<input type="text" name="contacto_proveedor" size="40" maxlength="40" value="<%=rs("contacto_proveedor&quot ;)%>">
</td>
<td ></td>
</tr>
<tr>

[yoyi2002]

parte final
td height="28" colspan="2" valign="top" ><font face="Verdana, Arial, Helvetica, sans-serif"><b><font size="2">E-mail:</font></b></font></td>
<td colspan="2" valign="top" >
<input type="text" name="email_proveedor" size="40" maxlength="40" value="<%=rs("email_proveedor")% >">
</td>
<td ></td>
</tr>
<tr>
<td height="28" colspan="2" valign="top" ><b><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Telefono:</font></b></td>
<td colspan="2" valign="top" >
<input type="text" name="telefono_proveedor" size="15" maxlength="9" value="<%=rs("telefono_proveedor&quot ;)%>">
</td>
<td ></td>
</tr>
<tr>
<td height="28" colspan="2" valign="top" ><b><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Fax:</font></b></td>
<td colspan="2" valign="top" >
<input type="text" name="fax_proveedor" size="15" maxlength="9" value="<%=rs("fax_proveedor")%&g t;">
</td>
<td ></td>
</tr>
<tr>
<td height="9" ></td>
<td ></td>
<td ></td>
<td ></td>
<td ></td>
</tr>
<tr>
<td height="35" colspan="4" valign="top" >
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="132" height="33"></td>
<td width="70" valign="top">
<input type="button" name="modificar" value="Modificar">
</td>
<td width="16"></td>
<td width="70" valign="top">
<input type="reset" name="Limpiar" value="Limpiar">


te la envio al correo mejor?????? esta echa con dreamwever???

[bakanzipp]

ya..ya. entiendo...cambia las validaciones entonces

esta:

<% if request("combo_rut")<>"" then
set conexion = conecta()
set rs=Server.CreateObject("ADODB.Recordset" )
sql="select * from proveedor where rut_proveedor='"& request("combo_rut") &"';"
rs.open sql, conexion
if not rs.eof then%>

por esta

Código:

  
<% if request("combo_rut")<>"" then
set conexion = conecta()
set rs=Server.CreateObject("ADODB.Recordset")
sql="select * from proveedor where rut_proveedor='"& request("combo_rut") &"';"
rs.open sql, conexion
if not rs.eof then
session("mostrar")=1
else
session("mostrar")=-1
end if
end if%>

y en todas la cajas donde muestra la informacion a actualizar del proveedor haz esto

Código:

 
<input type=text name=nombre <%if session("mostrar")=1 then%> value="<%=rs.fields("nombre")%>" <%else%> value="" <%end if%> >

ufff...tengo mucho trabajo espero me hayas captado

si el html esta hecho en dreamweaver...ni idea...eso no puedo respondertelo.

[yoyi2002]

bacanzipp ahore pude hacer que al cargar la pagina me apareciera el listbox con los demas text tengo un solo problemite que al apretar el campo que dice seleccione me deja el combo solo sin los text?? :(

[bakanzipp]

¿?...explicate mejor..no entiendo tu problema...