Fehler: Typen unverträglich

[Firefox]

set ad2 = Conn.Execute("select * from Adressen where status = 'ne'")
x1 = ad2("DatumID")
set bd = Conn.Execute("select * from Bestellung where Datex = '" & x1 & "'")

Dabei erhalte ich folgende Fehlermeldung:

Laufzeitfehler in Microsoft VBScript- Fehler '800a000d'

Typen unverträglich

Es wurde versucht, Werte inkompatibler Datentypen zu vergleichen. Beispielsweise tritt dieser Fehler auf, wenn eine Zeichenfolge mit einem numerischen Wert verglichen wird.

Schon mal versucht mit den Konvertierungsfunktionen was umzubiegen ???
Ist nur ne Idee.