E ai gente beleza !! estou aqui para pedir uma ajuda a todos , seguinte tenho um form em flash e envia os dados para asp, sendo que quando recebo o email as variaveis das input text não segue junto, peço a vocês essa ajuda pois não sei mais o que fazer.
agradeço a colaboração de todos.
segue o codigo asp :
' Definindo uma variavel auxiliar
sch = "http://schemas.microsoft.com/cdo/configuration/"
' Criando o objeto de configuração do CDO
Set cdoConfig = Server.CreateObject("CDO.Configuration")
' Definindo as configurações
cdoConfig.Fields.Item(sch & "sendusing") = 2
cdoConfig.Fields.Item(sch & "smtpauthenticate") = 1
cdoConfig.Fields.Item(sch & "smtpserver") = "smtp.ciberdata.com.br"
cdoConfig.Fields.Item(sch & "sendusername") = "suporteciberdata=ciberdata.com.br"
cdoConfig.Fields.Item(sch & "sendpassword") = "xxxxxxxx"
cdoConfig.fields.update
' Criando o objeto de msg do CDO'
Set cdoMessage = Server.CreateObject("CDO.Message")
' Associando as configurações ao obj Mensagem
Set cdoMessage.Configuration = cdoConfig
'Definido variaveis da msg
cdoMessage.From = "suporteciberdata@ciberdata.com.br"
cdoMessage.To = "suporteciberdata@ciberdata.com.br"
cdoMessage.Subject = "Cadastro para Faturamento"
msgHTML = msgHTML & "<b>Inscrição Estadual ou Municipal:</b> " & Request("inscricao") & "<br>"
msgHTML = msgHTML &"<b>Ramo e Atividade:</b> " & Request("ramoatividade") & "<br>"
msgHTML = msgHTML &"<b>Endereço Comercial:</b> " & Request("endcomercial") & "<br>"
msgHTML = msgHTML &"<b>Complemento:</b> " & Request("complemento") & "<br>"
msgHTML = msgHTML &"<b>Bairro:</b> " & Request("Bairro") & "<br>"
msgHTML = msgHTML &"<b>Cidade:</b> " & Request.form("cidade") & "<br>"
msgHTML = msgHTML &"<b>Cep:</b> " & Request.form("cep") & "<br>"
msgHTML = msgHTML &"<b>Telefone Comercial:</b> " & Request.form("telcomercial") & "<br><br><br>"
msgHTML = msgHTML &"<b>Responsável:</b> " & Request.form("responsavel") & "<br>"
msgHTML = msgHTML &"<b>Email:</b> " & Request.form("email") & "<br>"
msgHTML = msgHTML &"<b>Nome do Contato:</b> " & Request.form("nomecontato") & "<br>"
msgHTML = msgHTML &"<b>Telefone do Contato:</b> " & Request.form("telcontato") & "<br>"
msgHTML = msgHTML &"<b>Home Page:</b> " & Request.form("site") & "<br><br>"
msgHTML = msgHTML &"<b>Endereço de Cobrança:</b> " & Request.form("cobranca") & "<br>"
msgHTML = msgHTML &"<b>Complemento:</b> " & Request.form("complementocobra") & "<br>"
msgHTML = msgHTML &"<b>Bairro:</b> " & Request.form("bairrocobranca") & "<br>"
msgHTML = msgHTML &"<b>Cidade:</b> " & Request.form("cidadecobranca") & "<br>"
msgHTML = msgHTML &"<b>Cep:</b> " & Request.form("cepcobranca") & "<br>"
msgHTML = msgHTML &"<b>Mensagem:</b> " & Request.form("mensagem") & "<br>"
'Utilize esta opção caso deseje definir o e-mail de resposta
'cdoMessage.ReplyTo = Request.Form("email")
cdoMessage.TextBody = "Em breve estaremos entrando em contato.;"
cdoMessage.HTMLBody = msgHTML
if msgHTML <> "" then
cdoMessage.AutoGenerateTextBody = false
cdoMessage.TextBody = request.Form
end if
cdoMessage.Send
Set cdoMessage = Nothing
Set cdoConfig = Nothing
set objCDO = Nothing
%>
aqui o codigo do botão enviar do flash
on (release) {
getURL("http://ciberdata.com.br/formulario/email_enviar.asp", "_self", "POST");
}
Pergunta
clebinho
E ai gente beleza !! estou aqui para pedir uma ajuda a todos , seguinte tenho um form em flash e envia os dados para asp, sendo que quando recebo o email as variaveis das input text não segue junto, peço a vocês essa ajuda pois não sei mais o que fazer.
agradeço a colaboração de todos.
segue o codigo asp :
aqui o codigo do botão enviar do flashLink para o comentário
Compartilhar em outros sites
0 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.