A mi entender, el error esta en el WHERE, al ponerlo en comillas simples le indicas que es un texto, yo lo hago asi:
Código:
StrSQL = "SELECT * FROM tabla WHERE campo = '" . variable . "'"
Eso si el campo es de tipo VARCHAR (alfanumerico) pero si es de tipo numerico
Código:
StrSql = "SELECT * FROM tabla WHERE campo = " . variable
Espero te sirva.