Visual Basic - Leer informacion del tipo de Campo

Life is soft - evento anual de software empresarial
   
Vista:

Leer informacion del tipo de Campo

Publicado por julio (48 intervenciones) el 18/11/2007 22:20:12
Tengo esta rutina
Do While Not RS_AUTONOMO.EOF
Fila = Fila + 1
For i = 0 To 5
If RS_AUTONOMO.Fields(i).Type = adDate Then
ApExcel.Cells(Fila, i + 1).Formula = Format(RS_AUTONOMO.Fields(i), "dd/mm/yyyy")
Else
ApExcel.Cells(Fila, i + 1).Formula = RS_AUTONOMO.Fields(i)
End If
Next
RS_AUTONOMO.MoveNext
Loop

La idea, es dar formato distinto a los campos de tipo fecha. No encuentro la solución, porque asi no me dá error, pero tampoco funciona.
Desde ya agradecido por vuestra ayuda.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Leer informacion del tipo de Campo

Publicado por julio (48 intervenciones) el 18/11/2007 23:22:09
Consulte manual y realmente fields.type devuelve una constante enumerada, el numero 7, corresponde cuando es un campo fecha, 129 caracter, etc, etc.
O sea el código como lo he planteado esta bien. +

Lo único que modifique, es en el formato, use la funcion DateSerial, y de esta forma me presenta la fecha en forma correcta.

Gracias.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar