20/03/2007, 18:03
|
| | | Fecha de Ingreso: marzo-2007
Mensajes: 10
Antigüedad: 18 años, 1 mes Puntos: 0 | |
| Re: como despliegar texto completo de un RecordSet
esta es la sentencia de consulta
SELECT CVEEVENTO,EVENTO.NOMBRE AS TIPO,CTOD(FECHA1) AS FECHA,HORA1 AS HORA, ALLTRIM(IIF(NOT ISNULL(ALLTRIM(DIRECTORIO.NOMBRE)+' '+ALLTRIM(DIRECTORIO.PATERNO)+' '+ALLTRIM(DIRECTORIO.MATERNO)), ALLTRIM(DIRECTORIO.NOMBRE)+' '+ALLTRIM(DIRECTORIO.PATERNO)+' '+ALLTRIM(DIRECTORIO.MATERNO),' ')+ IIF(NOT ISNULL(ALLTRIM(PERSONA)),ALLTRIM(PERSONA),'')) AS NOMBRE,ESTATUS.NOMBRE AS ESTATUS,ALLTRIM(ASUNTO) AS ASUNTO FROM ACTIVIDAD LEFT JOIN DIRECTORIO ON ALLTRIM(ACTIVIDAD.CVEPERSONA)=ALLTRIM(DIRECTORIO.C VEPERSONA) LEFT JOIN EVENTO ON ACTIVIDAD.EVENTO=EVENTO.CLAVE LEFT JOIN ESTATUS ON ACTIVIDAD.ESTATUS=ESTATUS.CLAVE WHERE DAY(CTOD(FECHA1))=20 AND MONTH(CTOD(FECHA1))=3 AND YEAR(CTOD(FECHA1))=2007
y aqui es donde la ejecuto
strSQL = ucase(strSQL)
Set objRS = oConn.Execute(strSQL) |