Necesito saber el tipo de dato de un campo

[Daguett]

Encontré la solucion con un controldata en Visual Basic

si creamos un objeto de tipo Data

recuperamos el tipo de dato de esta forma

(si el controldata se llama data1)

Data1.RecordSet.fields(i).type

Donde i=a la posicion del campo

devuelve un numero

pero aka encontre un procedimiento

Código:

Private Function tipoToString(ByVal elTipo As DataTypeEnum, _
                              Optional ByVal ConTipo As Boolean = False) As String
    ' Devuelve una cadena según el tipo de datos                    (05/Nov/00)
    Dim s As String
    '
    Select Case elTipo
    Case dbBigInt
        s = "dbBigInt"
    Case dbBinary
        s = "dbBinary"
    Case dbBoolean
        s = "dbBoolean"
    Case dbByte
        s = "dbByte"
    Case dbChar
        s = "dbChar"
    Case dbCurrency
        s = "dbCurrency"
    Case dbDate
        s = "dbDate"
    Case dbDecimal
        s = "dbDecimal"
    Case dbDouble
        s = "dbDouble"
    Case dbFloat
        s = "dbFloat"
    Case dbGUID
        s = "dbGUID"
    Case dbInteger
        s = "dbInteger"
    Case dbLong
        s = "dbLong"
    Case dbLongBinary
        s = "dbLongBinary"
    Case dbMemo
        s = "dbMemo"
    Case dbNumeric
        s = "dbNumeric"
    Case dbSingle
        s = "dbSingle"
    Case dbText
        s = "dbText"
    Case dbTime
        s = "dbTime"
    Case dbTimeStamp
        s = "dbTimeStamp"
    Case dbVarBinary
        s = "dbVarBinary"
    Case Else
        'If ConTipo Then
        '    s = "Tipo desconocido"
        'Else
            s = "dbMemo"
        'End If
    End Select

ojalá les sirva