Datatype not specifying

See more:

VB6

Oracle

Private Sub Combo7_Click()
Dim RES As New ADODB.Recordset
Dim SQL As String
SQL = "SELECT * FROM DRIVER WHERE DID='" & Combo7.Text & "'"
RES.Open SQL, CON, adOpenDynamic, adLockOptimistic
    If RES.RecordCount > 0 Then
        Text9.Text = RES!DCONT
        Text10.Text = RES!DADD
    End If
RES.Close
End Sub

ERROR:
Invalid number at RES.RECORDCOUNT>0
coz it contains character field
What should i do?

[Edit]Removed shouting[/Edit]