Omsætning af type

Nyt Problem !

Jeg anvender en sql 7.0 og skal hente et timestamp ud og vise den...

Jeg får følgende fejl:

Der opstod en Microsoft VBScript-kørselsfejl error \'800a000d\'

Typerne passer ikke sammen

Jeg gør følgende:

For Each fldF in objRec.Fields
           
strValue = fldF.Value
           
Select Case fldF.Type
Case adDBDate, adDBTimeStamp, adDBTime, adDate
If Not IsNull(strValue) Then
    strValue = FormatDateTime (strValue, 2)
End If
Case adBoolean
    If strValue = \"TRUE\" Then
    strValue = \"YES\"
    Else
    strValue = \"NO\"
    End If
Case adCurrency
    If Not IsNull(strValue) Then
    strValue = FormatCurrency(strValue)
    End If
Case adBigInt, adDecimal, adDouble, adNumeric, adSingle, adSmallInt, adTinyInt, adUnsignedBigInt, adUnsignedInt, adUnsignedSmallInt, adUnsignedTinyInt
    If Not IsNull(strValue) Then
    strValue = FormatNumber (strValue)
    End If

end Select
***** her fejler den -> strT = strT & \"<TD>\" & strValue & \"&nbsp;</TD>\"
Next
strT = strT & \"</TR>\"
objRec.MoveNext

Den fejler - angivet ***** 

Er der nogen der kan give et godt råd ??

/arno