CSV Readline

My .csv file has only one column, and is filled with mail addresses.
The purpouse of this aplication is to read the csv mail, check if exists in one database, and return me a eof value. See.Code:

Set objeto = CreateObject("Scripting.FileSystemObject")
archivo = Server.MapPath("pathfile.csv")
set CSV = objeto.OpenTextFile(archivo, forReading )

data=csv.readline()
query = "select * from table where mail = '%" & data & "%'"
recordset.open query, conn
response.write recordset.eof
Never, no matters if the exact mail exist or not, the value of EOF is true. It never finds a comparative in the database. I dont know what can it be.. I suppouse something with variables, like data should be "trimmed", or something else.

And, of course, if I write in the screen both values, they are exactly the same