Foros del Web » Programando para Internet » ASP Clásico »

cambiar datos de una columna

Estas en el tema de cambiar datos de una columna en el foro de ASP Clásico en Foros del Web. tengo una pagina que muestra los resultados de una consulta paginados pero quiero cambiar una columna que contiene el codigo de la empresa por el ...
  #1 (permalink)  
Antiguo 21/01/2002, 18:25
 
Fecha de Ingreso: enero-2002
Mensajes: 57
Antigüedad: 22 años, 5 meses
Puntos: 0
cambiar datos de una columna


tengo una pagina que muestra los resultados de una consulta paginados
pero quiero cambiar una columna que contiene el codigo de la empresa por el nombre de la empresa que esta en otra tabla. como lo hago?

aqui es donde muestra los registros

<%For campo=0 to num_campos-1 %>
<td align="center" width="515"><%=RS(campo)%>& nbsp;</td>
<%Next%>
</tr>
<%
RS.MoveNext
Wend
%>
  #2 (permalink)  
Antiguo 21/01/2002, 18:29
Avatar de urjose  
Fecha de Ingreso: diciembre-2001
Mensajes: 5.286
Antigüedad: 22 años, 5 meses
Puntos: 1
Re: cambiar datos de una columna

ah pues solo entendi lo de diferentes paginas pero es algo asi

SELECT A.CAMPO1 AS QUO, B.CAMPO1 AS QUO2 FROM TABLA1 A, TABLA2 B

ES DECIR A LA TABLA1 LE DAS EL VALOR DE "A" Y A TABLA2 LE DAS EL VALOR DE "B" AHORA BIEN CON A.CAMPO1 LLAMAS EL CAMPO 1 DE LA TABLA A Y LE DAS EL NOMBRE QUE QUIERAS

DESPUES LOS LLAMAS ASI

ORS("QUO")

Y ORS("QUO2")

SALU2 :) ;)

<embed src="http://www.autocar.com.mx/images/logo.swf" type="application/x-shockwave-flash" width="468" height="60" play="true" wmode="transparent" menu="false" loop="true">
  #3 (permalink)  
Antiguo 21/01/2002, 20:03
 
Fecha de Ingreso: enero-2002
Mensajes: 57
Antigüedad: 22 años, 5 meses
Puntos: 0
Re: cambiar datos de una columna

hola urjose

estuve tratando de hacer lo que me dijiste pero no lo entedi bien, asi que te mando el codigo completo. lo que hace este codigo es paginar los resultados de una tabla, pero hay un campo llamado codigo(codigo del cliente), el cual no quiero que se muestre, si no el nombre del cliente que corresponde a ese codigo que esta en otra tabla llamada clientes. me explique bien?

&lt;%
sSQL=&quot;select pedido, fecha, codigo from pedidos&quot;

If Request.QueryString(&quot;pag&quot;)&lt;&gt;&quot; &quot; Then
Session(&quot;pagina&quot;)=Request.QueryString(&q uot;pag&quot;)
Else
Session(&quot;pagina&quot;)=1
End If

Const adCmdText = &amp;H0001
Const adOpenStatic = 3

Set Conn = Server.CreateObject(&quot;ADODB.Connection&quot;)
Set Command = Server.CreateObject(&quot;ADODB.Command&quot;)
Set RS =Server.CreateObject(&quot;ADODB.RecordSet&quot;)
Conn.Open (&quot;DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=&quot; &amp; Server.MapPath(&quot;pedido.mdb&quot;))
RS.Open sSQL,Conn,adopenstatic,adcmdtext

num_registros = 2

RS.PageSize=num_registros
RS.AbsolutePage=Session(&quot;pagina&quot;)
%&gt;

&lt;body&gt;
&lt;div align=&quot;left&quot;&gt;
Número de página actual: &lt;b&gt;&lt;%=Session(&quot;pagina&quot;)%&gt;&lt ;/b&gt;&lt;br&gt;
Número de páginas total: &lt;b&gt;&lt;%=RS.PageCount%&gt;&lt;/b&gt;&lt;br&gt;
Número de registros por página: &lt;b&gt;&lt;%=RS.PageSize%&gt;&lt;/b&gt;&lt;br&gt;
Número de registros seleccionados: &lt;b&gt;&lt;%=RS.RecordCount%&gt;&lt;/b&gt;
&lt;/div&gt;&lt;br&gt;&lt;br&gt;

&lt;table cellpadding=&quot;2&quot; border=&quot;1&quot; align=&quot;left&quot; width=&quot;527&quot;&gt;
&lt;%
num_campos=RS.Fields.Count

For campo=0 to num_campos-1%&gt;
&lt;td align=&quot;center&quot; width=&quot;515&quot;&gt;&lt;%=RS(campo).Name%&gt; &amp;nbsp;&lt;/td&gt;
&lt;%
Next

registros_mostrados = 0

While (Not RS.eof And registros_mostrados &lt; num_registros)
registros_mostrados = registros_mostrados +1
%&gt;
&lt;tr&gt;
&lt;%For campo=0 to num_campos-1 %&gt;
&lt;td align=&quot;center&quot; width=&quot;515&quot;&gt;&lt;%=RS(campo)%&gt;&amp; nbsp;&lt;/td&gt;
&lt;%Next%&gt;
&lt;/tr&gt;
&lt;%
RS.MoveNext
Wend
%&gt;
&lt;tr&gt;&lt;td colspan=&quot;&lt;%=num_campos%&gt;&quot; align=&quot;center&quot; width=&quot;515&quot;&gt;
&lt;%
i=0
While i&lt;RS.PageCount
i=i+1
%&gt;
&lt;b&gt;&lt;a href=&quot;paginar.asp?pag=&lt;%=i%&gt;&quot;&gt;& lt;%=i%&gt;&lt;/a&gt;&lt;/b&gt;
&lt;%Wend%&gt;

&amp;nbsp;&lt;/td&gt;&lt;/tr&gt;&lt;/tabl
  #4 (permalink)  
Antiguo 21/01/2002, 20:04
 
Fecha de Ingreso: enero-2002
Mensajes: 57
Antigüedad: 22 años, 5 meses
Puntos: 0
Re: cambiar datos de una columna

hola urjose

estuve tratando de hacer lo que me dijiste pero no lo entedi bien, asi que te mando el codigo completo. lo que hace este codigo es paginar los resultados de una tabla, pero hay un campo llamado codigo(codigo del cliente), el cual no quiero que se muestre, si no el nombre del cliente que corresponde a ese codigo que esta en otra tabla llamada clientes. me explique bien?

&lt;%
sSQL=&quot;select pedido, fecha, codigo from pedidos&quot;

If Request.QueryString(&quot;pag&quot;)&lt;&gt;&quot; &quot; Then
Session(&quot;pagina&quot;)=Request.QueryString(&q uot;pag&quot;)
Else
Session(&quot;pagina&quot;)=1
End If

Const adCmdText = &amp;H0001
Const adOpenStatic = 3

Set Conn = Server.CreateObject(&quot;ADODB.Connection&quot;)
Set Command = Server.CreateObject(&quot;ADODB.Command&quot;)
Set RS =Server.CreateObject(&quot;ADODB.RecordSet&quot;)
Conn.Open (&quot;DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=&quot; &amp; Server.MapPath(&quot;pedido.mdb&quot;))
RS.Open sSQL,Conn,adopenstatic,adcmdtext

num_registros = 2

RS.PageSize=num_registros
RS.AbsolutePage=Session(&quot;pagina&quot;)
%&gt;

&lt;body&gt;
&lt;div align=&quot;left&quot;&gt;
Número de página actual: &lt;b&gt;&lt;%=Session(&quot;pagina&quot;)%&gt;&lt ;/b&gt;&lt;br&gt;
Número de páginas total: &lt;b&gt;&lt;%=RS.PageCount%&gt;&lt;/b&gt;&lt;br&gt;
Número de registros por página: &lt;b&gt;&lt;%=RS.PageSize%&gt;&lt;/b&gt;&lt;br&gt;
Número de registros seleccionados: &lt;b&gt;&lt;%=RS.RecordCount%&gt;&lt;/b&gt;
&lt;/div&gt;&lt;br&gt;&lt;br&gt;

&lt;table cellpadding=&quot;2&quot; border=&quot;1&quot; align=&quot;left&quot; width=&quot;527&quot;&gt;
&lt;%
num_campos=RS.Fields.Count

For campo=0 to num_campos-1%&gt;
&lt;td align=&quot;center&quot; width=&quot;515&quot;&gt;&lt;%=RS(campo).Name%&gt; &amp;nbsp;&lt;/td&gt;
&lt;%
Next

registros_mostrados = 0

While (Not RS.eof And registros_mostrados &lt; num_registros)
registros_mostrados = registros_mostrados +1
%&gt;
&lt;tr&gt;
&lt;%For campo=0 to num_campos-1 %&gt;
&lt;td align=&quot;center&quot; width=&quot;515&quot;&gt;&lt;%=RS(campo)%&gt;&amp; nbsp;&lt;/td&gt;
&lt;%Next%&gt;
&lt;/tr&gt;
&lt;%
RS.MoveNext
Wend
%&gt;
&lt;tr&gt;&lt;td colspan=&quot;&lt;%=num_campos%&gt;&quot; align=&quot;center&quot; width=&quot;515&quot;&gt;
&lt;%
i=0
While i&lt;RS.PageCount
i=i+1
%&gt;
&lt;b&gt;&lt;a href=&quot;paginar.asp?pag=&lt;%=i%&gt;&quot;&gt;& lt;%=i%&gt;&lt;/a&gt;&lt;/b&gt;
&lt;%Wend%&gt;

&amp;nbsp;&lt;/td&gt;&lt;/tr&gt;&lt;/table&gt;

&lt;%
RS.Close
Conn.Close
%&gt;
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 21:44.