[Resolvido] Guardar e-mail em uma variavel (enviar dados p / emai

Olá pessoal, minha dúvida é a seguinte:

Fiz um formulário em asp que o usuário se cadastra, ao terminar o cadastro eu disparo um e-mail para o e-mail do usuário cadastrado.

no link do e-mail coloco o e-mail do canditado para quando chegar na próxima tela eu pegar o e-mail com um Request.querystring

O e-mail que chega está escrito o seguinte:

Obrigado Fulano, você se cadastrou com sucesso no Curso Tal.

Clique aqui para gerar seu boleto bancário.

Só que ai onde está o problema:

o botão clique aqui não aparece o e-mail da pessoa

http://site.site.com.br/inscricao/boleto/imprimir_boleto.asp?email=

a variável email está vazia sem nenhum e-mail sendo que capturei esse e-mail do próprio banco de dados:

llog="usuario"
ssen="senha"
Set objConn = Server.CreateObject( "adodb.Connection" )
objConn.Open "driver={SQL Server};" & _
"server=xxx.xxx.xxx;" & _
"database=seu_database;" & _
"Uid="&llog&";" & _
"Pwd="&ssen&";"
nTabela="Tabela"

'recebo o email e puxo pelo request
eemail=Request.querystring("email")

QueryStr = "Select * from "&nTabela&" where dsEmail='"&eemail&"'"

Set ObjRs = objConn.Execute(QueryStr)

While Not objRS.EOF
'pego os dados do usuário cadastrado
nome = ObjRs("nmCandidato")
curso=ObjRs("nmCursoEscolhido")
email = ObjRs("dsEmail")
objRS.MoveNext

Wend
objRs.close
objConn.close
Set objRs = Nothing
Set objConn = Nothing
link="http://site.site.com.br/inscricao/boleto/imprimir_boleto.asp?email="&email&""

descricao = "Obrigado Fulano você se cadastrou com sucesso no Curso Tal, <a href='"&link&"' target='_blank'>Clique Aqui</a> para gerar seu boleto bancário."
strHTML = "Nome: " & nome & "<br />"
strHTML = strHTML & "E-mail: " & email & "<br />"

strHTML = strHTML & descricao
on error Resume Next
'Response.write(strHTML)
set objEmail = CreateObject("CDO.Message")
objEmail.From = "usuarioquemandou@site.com.br"
objEmail.To = email
objEmail.Subject = "Confirmação de Inscrição Para o Curso"
objEmail.HTMLBody = strHTML
objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = ?
objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") ="xxx.xxx.xxx"
objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
objEmail.Configuration.Fields.Update
objEmail.Send
Set objEmail = Nothing
Response.Write "<p>Mensagem enviada com sucesso.</p>"

Alguém tem uma idéia do que está acontecendo ?

Obrigado.