Erro na busca de email com traço

No código abaixo não consigo fazer uma busca ao procurar pelo email teste@teste-suporte.com

Se usarmos o email teste@testesuporte.com funciona perfeito.

Parace que o tracinho é o problema.

Ao buscar com o email com tracinho da erro de time out.

Será que alguem consegue dar uma dica?

email = (Request("email"))

senha = (Request("senha"))

 Sql = "SELECT id,email,senha FROM alunosWHERE email = '" &email& "' AND senha LIKE '%" &senha& "%'"

 Set ObjRs_cliente = Server.CreateObject("ADODB.Recordset")

 ObjRs_cliente.CursorLocation = 3

 ObjRs_cliente.CursorType = 0

 ObjRs_cliente.LockType = 1

 ObjRs_cliente.Open Sql, Conexao

 

 If ObjRs_cliente.Eof Then

 Response.Redirect "alunoidentificacao.asp?erro=login"

 End If

 

 ObjRs_cliente.Close

 Set ObjRs_cliente = Nothing