Ver Mensaje Individual
  #10 (permalink)  
Antiguo 15/03/2010, 04:31
Phoevbe
 
Fecha de Ingreso: marzo-2010
Mensajes: 14
Antigüedad: 15 años
Puntos: 0
Respuesta: IF que cambia el contenido de un campo

He retomado hoy el problema con el if y probado lo que me proponíais, pero sigue sin devolver nada. Os pego a continuación todo el código tal y como lo tengo ahora:

Código:
<% 
Dim Conexion,Tabla 
Set Conexion=Server.CreateObject("adodb.connection") 
Set Tabla=Server.CreateObject("adodb.recordset") 
Conexion.Open "dsn=midsn"
 
Dim Temp 
Temp="SELECT * FROM mitabla INNER JOIN otratabla ON otratabla.dni_autor=mitabla.dni_autor WHERE otratabla.dni_autor like '" & session("id_autor") & "' and siadjunto ='si'"
%>

<%
Tabla.Open Temp, Conexion 
If Tabla.BOF And Tabla.EOF Then 
%> 

<br>
Aún no ha enviado ningún archivo.

<% 
Else 
%>

<% While Not Tabla.EOF%> 

<%
Response.Write (Tabla("nombre1"))
Response.Write "&nbsp;"
Response.Write (Tabla("apellidos1"))
Response.Write "<br>"
Response.Write(Tabla("institucion1"))
Response.write "<br>"
Response.Write(Tabla("otra_in1"))
response.Write "<br><br>"
%>

<% If Tabla.fields("nombre2").Value <> "" And IsNull(Tabla.fields("nombre2").Value) = False Then
Response.Write (Tabla.fields("nombre2"))
end if%>

<% 
Tabla.MoveNext 
Wend 
Tabla.Close 
Conexion.Close 
End If 
%>
Y lo que me devuelve es:

Nombre1 Apellidos1
Institucion1
otra_in1

... es decir, no me devuelve nada del nombre2. He comprobado los datos de DB; sí hay y no tienen ningún espacio...

muchas gracias por vuestra ayuda!!