Ayuda en Base de datos

[yenny7]

Hola

Tengo una base de datos con la siguiente tabla la cual tiene los siguientes campos: codigo, fecha, pedido, p1,p2,p3,p4...hasta...p114. mi pregunta es, quiero mostrar solamente los campos p1 hasta p114 que contengan datos. se puede hacer? Como lo hago?

[agarciaa]

Si, hay varias maneras:

puedes usar esta consulta:


SELECT p1,p2,p3,p4...hasta...p114 FROM tu_tabla;


ó un poco más cómoda

SELECT * FROM tu tabla;

Bueno a la hora de pedir los recorsets te asignará los índices de los resultados según el diseño de tu base de datos, es decir:
Si tu código es algo como esto:


Set Comm = Server.CreateObject("ADODB.Command")
Comm.Open "Driver={...};...;"
Set oRS = Comm.Execute "SELECT * FROM tu_tabla"

entonces:

' oRS(0) codigo,
' oRS(1) fecha,
' oRS(2) pedido,
' oRS(3) P1,
' oRS(4) P2,
'....
' oRS(116) P113,
' oRS(117) P114.

paral o cual puedes usar un cliclillo


FOR I=3 TO 117
Response.Write oRS(I) & "<br>"
Next


Espero que esto te ayude con lo que buscas.

Suerte.

<a href="http://www.unitecos.net">
<img src="http://www.soportexpresso.com/pass/correo/agarciaa.jpg" border=0>
</a>

[urjose]

nada mas agregar algo a lo anterior ya que pide mostrar unicamente los campos que contengan algo

FOR I=3 TO 117
If oRS(I)&lt;&gt;&quot;&quot; Then
Response.Write oRS(I) &amp; &quot;&lt;br&gt;&quot;
End if
Next


<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">

[mmoreno1977]

&lt;%Set conexion=server.createobject(&quot;ADODB.connectio n&quot;)
conexion.connectionstring(&quot;DSN=Nomber de tu ODBC&quot;)
conexion.Mode=3
conexion.open
conexion.beginttrans

Query=(&quot;Select * from Tu_tabla&quot;)
Set Recordset=conexion.execute(Query)

While not recordset.eof
For i=1 to 114
if recordset.fields(&quot;p&quot;&amp;i)&lt;&gt;&quot ;&quot; then

'Aqui puedes hacer lo que necesites con los datos validados
End if
Next
Wend

Conexion.committrans
Conexion.close%&gt;

Espero que te sirva