Como recuperar resultado?

[Carlos Moreira 0]

Olá pessoal gostaria de recuperar esse objeto dentro dos códigos abaixo:EX:

 

<% emailempresa= RS("email") ********PRECISO DELE LA********%><%if request.Form("Submit")="Enviar" thenSet Mailer = Server.CreateObject("SMTPsvg.Mailer") Mailer.FromName = "Vitrine das Malhas - Formulário" Mailer.FromAddress= ********PRECISO DELE AQUI******** Mailer.RemoteHost = "mail.vitrinedasmalhas" Mailer.AddRecipient "Vitrine das Malhas", "contato@vitrinedasmalhas.com.br" Mailer.Subject = "Fale Conosco" Mailer.BodyText = "Formulário" & VbCrLf & "Contato" Mailer.BodyText = "Nome: " & Request.Form("nome")& vbCrLf Mailer.BodyText = "Email: " & Request.Form("email") & vbCrLf Mailer.BodyText = "Cidade: " & Request.Form("cidade") & vbCrLf Mailer.BodyText = "Estado: " & Request.Form("estado") & vbCrLf Mailer.BodyText = "Assunto: " & Request.Form("assunto") & vbCrLf Mailer.BodyText = "Comentários: " & Request.Form("comentarios") & vbCrLf if Mailer.SendMail then Response.redirect "empresaemailresp.asp" else Response.Write "Mail send failure. Error was " & Mailer.Response end if End if%>

 

[sr.silva 1]

explique um pouco melhor...