Ver Mensaje Individual
  #4 (permalink)  
Antiguo 05/12/2007, 01:01
Avatar de Shiryu_Libra
Shiryu_Libra
Colaborador
 
Fecha de Ingreso: febrero-2007
Ubicación: Cantando "Screenager" en "Kirafa Kaput"
Mensajes: 3.614
Antigüedad: 18 años, 2 meses
Puntos: 88
Re: Consulta y Subconsulta a BD

, una idea descabellada.....

tomando en consideracion que la estructura de la base de datos sea de la siguiente forma:
Código PHP:
campo        valor en arreglo
idcomentario      0
cabecera          1
padre             2
cuerpo            3 
de esto nos basamos para la realizacion del listado de registros
el codigo similar a esto

Código PHP:
'Realizamos la consulta, y si existen resultados, se creara un arreglo
SQL = "select * from tabla where cuerpo like '
%" & criterio & "%'"
set rs = conexion.execute(SQL)

if Err=0 then
    if RS.EOF=FALSE then
        '
Eurekafunciono!!
        
resultados=RS.getrows
    
else
        
response.write "No sabes buscar, no encontre nada..."
    
end if
else
    
response.write "Esto valio .... llamale al doctor"
end if
'liberamos la base de datos
conexion.close
set RS = nothing
set conexion = nothing

'
si existio un resultadose creara el arregloy se podra mostrar
if isarray(resultadosthen

    
'inicializo, y evitemos errores
    cabecera = ""
    padre = ""

    for I = 0 to UBound(resultados,2) 

        padre = resultados(2,I)
        mensaje = resultados(3,I)

        '
verificando mensajes consecuentes
        
if cabecera resultados(1,Ithen

            
'verifico que sea el primer mensaje
            if padre = 0 then
                response.write "Mensaje " & mensaje
                cabecera = resultados(1,I)

            '
esto se realiza en caso de que contenga respuestas el post inicial
            
else
                
response.write "<span>" mensaje "</span>"
                
cabecera resultados(1,I)
            
end if

        
esto ocurre cuando cambiamos de tema
        
else
            if 
padre 0 then
                response
.write "Mensaje " mensaje
                cabecera 
resultados(1,I)
            else
                
response.write "<span>" mensaje "</span>"
                
cabecera resultados(1,I)
            
end if
        
end if
    
next
end 
if 
al final de cuentas solo es una idea; de aki podria generarse alguna sentencia SQL
mas estructurada o alguna forma de que este codigo sea lo mas sencillo posible

__________________
"Eres parte del problema, parte de la solucion o parte del paisaje"
Un Saludo desde Desierto de Altar, Sonora, MX.
Shiryu_libra