Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Olá galera
Tenho um formulario pronto criado no dreamweaver, mas preciso adaptá-lo para a hospedagem no ig empresas, que usa cdosys, tem como me ajudar?
Segue o código:
<html>
<head>
<title>Contato</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link href="fag.css" rel="stylesheet" type="text/css">
<style type="text/css">.formularios { font-family: Verdana, Arial, Helvetica, sans-serif;
font-size: xx-small;
background-color: #FAFDFE;
border: 1px solid #993300;
}</style>
<script type="text/javascript">function MM_validateForm() { //v4.0
if (document.getElementById){
var i,p,q,nm,test,num,min,max,errors='',args=MM_validateForm.arguments;
for (i=0; i<(args.length-2); i+=3) { test=args[i+2]; val=document.getElementById(args[i]);
if (val) { nm=val.name; if ((val=val.value)!="") {
if (test.indexOf('isEmail')!=-1) { p=val.indexOf('@');
if (p<1 || p==(val.length-1)) errors+='- '+nm+' ñ é um email válido.\n';
} else if (test!='R') { num = parseFloat(val);
if (isNaN(val)) errors+='- '+nm+' precisa conter apenas números.\n';
if (test.indexOf('inRange') != -1) { p=test.indexOf(':');
min=test.substring(8,p); max=test.substring(p+1);
if (num<min || max<num) errors+='- '+nm+' must contain a number between '+min+' and '+max+'.\n';
} } } else if (test.charAt(0) == 'R') errors += '- '+nm+' é necessário.\n'; }
} if (errors) alert('Alguns erros ocorreram:\n'+errors);
document.MM_returnValue = (errors == '');</script>
</head>
<body bgcolor="#FFFFFF" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="776" height="581" border="0" align="center" cellpadding="0" cellspacing="0" id="Table_01">
<!--DWLayoutTable-->
<tr>
<td width="361">
<img src="images/sub_01.jpg" width="361" height="158" alt=""></td>
<td colspan="4"><img src="images/sub_02.jpg" alt="" width="415" height="158" border="0" usemap="#Map2">
<map name="Map2">
<area shape="rect" coords="361,41,397,74" href="index.html" target="_parent" alt="Home">
</map> </td>
</tr>
<tr>
<td colspan="2" rowspan="2" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" background="images/sub_03.jpg">
<!--DWLayoutTable-->
<tr>
<td width="48" height="54"> </td>
<td width="454"> </td>
<td width="44"> </td>
</tr>
<tr>
<td height="280"> </td>
<td valign="top"><form action="[http://www.fagma.com.br/cgi-bin/formulario.cgi"](http://www.fagma.com.br/cgi-bin/formulario.cgi) method="POST" name="formcontato" target="_parent" id="formcontato" onSubmit="MM_validateForm('nome','','R','email','','RisEmail','telefone','','NisNum');return document.MM_returnValue">
<input type="hidden" name="RECIPIENT"value="teste@ig.com.br">
<input type="hidden" name="SUBJECT"value="Mensagem">
<input type="hidden" name="REDIRECT"value="[http://www.fagma.com.br/pg_sucesso.htm">](http://www.fagma.com.br/pg_sucesso.htm)
<table width="450" border="0" align="center" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<tr>
<td width="30" height="12"></td>
<td width="84"></td>
<td width="6"></td>
<td width="15"></td>
<td width="10"></td>
<td width="50"></td>
<td width="96"></td>
<td width="54"></td>
<td width="54"></td>
<td width="51"></td>
</tr>
<tr>
<td height="1"></td>
<td></td>
<td></td>
<td></td>
<td colspan="5" rowspan="2" valign="top"><input name="nome" type="text" class="formularios" id="nome" size="40" maxlength="50"></td>
<td></td>
</tr>
<tr>
<td height="19"></td>
<td rowspan="2" valign="top" class="vinho"><b class="menu">Nome: </b> </td>
<td></td>
<td></td>
<td></td>
</tr>
<tr>
<td height="1"></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
</tr>
<tr>
<td height="2"></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
</tr>
<tr>
<td height="1"></td>
<td></td>
<td></td>
<td></td>
<td colspan="5" rowspan="2" valign="top"><input name="email" type="text" class="formularios" id="email" size="40" maxlength="50"></td>
<td></td>
</tr>
<tr>
<td height="19"></td>
<td rowspan="2" valign="top" class="vinho"><b class="menu">E-mail:</b></td>
<td></td>
<td></td>
<td></td>
</tr>
<tr>
<td height="1"></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
</tr>
<tr>
<td height="2"></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
</tr>
<tr>
<td height="1"></td>
<td></td>
<td></td>
<td></td>
<td colspan="5" rowspan="2" valign="top"><input name="telefone" type="text" class="formularios" size="20" maxlength="20" id="telefone"></td>
<td></td>
</tr>
<tr>
<td height="19"></td>
<td rowspan="2" valign="top" class="vinho"><b class="menu">Telefone:</b></td>
<td></td>
<td></td>
<td></td>
</tr>
<tr>
<td height="1"></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
</tr>
<tr>
<td height="2"></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
</tr>
<tr>
<td height="1"></td>
<td></td>
<td></td>
<td></td>
<td colspan="5" rowspan="2" valign="top"><select name="depto" size="1" class="formularios" id="depto">
<option>Vendas</option>
<option>Diretoria</option>
<option>Marketing</option>
<option>Financeiro</option>
</select></td>
<td></td>
</tr>
<tr>
<td height="20"></td>
<td colspan="2" rowspan="2" valign="top" class="vinho"><b class="menu">Departamento:</b></td>
<td></td>
<td></td>
</tr>
<tr>
<td height="1"></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
</tr>
<tr>
<td height="9"></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
</tr>
<tr class="vinho">
<td height="110" colspan="10" valign="top"><span class="txtprodutos">
<b> </b></span><span class="menu"><b> Mensagem: </b></span>
<textarea name="mensagem" cols="40" rows="6" wrap="VIRTUAL" class="formularios" id="mensagem"></textarea> </td>
</tr>
<tr>
<td height="6"></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
</tr>
<tr>
<td height="23"></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td valign="top" class="textocentral"><input name="Submit" type="submit" class="verde" onClick="MM_validateForm('nome','','R','email','','NisEmail');return document.MM_returnValue" value="Enviar"></td>
<td> </td>
<td valign="top" class="textocentral"><input name="limpar" type="reset" class="verde" value="Limpar" id="limpar"></td>
<td> </td>
<td></td>
</tr>
</table>
</form></td>
<td> </td>
</tr>
<tr>
<td height="52"> </td>
<td> </td>
<td> </td>
</tr>
</table></td>
<td width="39" height="195">
<img src="images/sub_04.jpg" width="39" height="195" alt=""></td>
<td width="154" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" background="images/sub_05.jpg">
<!--DWLayoutTable-->
<tr>
<td width="154" height="195" valign="top"><pre class="menu">
<a href="empresa.html" target="_parent" class="menu">EMPRESA</a>
<a href="servicos.html" target="_parent" class="menu"></a><a href="produtos.html" target="_parent" class="menu">PRODUTOS</a>
FALE CONOSCO</pre> </td>
</tr>
</table> </td>
<td width="37">
<img src="images/sub_06.jpg" width="37" height="195" alt=""></td>
</tr>
<tr>
<td height="191" colspan="3" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" background="images/sub_07_1.jpg">
<!--DWLayoutTable-->
<tr>
<td width="230" height="27"> </td>
</tr>
<tr>
<td height="146" valign="top" class="home"><p align="center" class="home"><strong>Central de Vendas</strong></p>
<p align="center" class="home">Tel.: 55 11 3804-7990</p>
<p align="center" class="home">Tel./Fax.: 55 11 3804-7991</p>
<p align="center" class="home"><a href="mailto:vendas@fagma.com.br" class="verde">vendas@fagma.com.br</a></p> <p align="center" class="home">SAC: <a href="mailto:sac@fagma.com.br" class="verde">sac@fagma.com.br</a></p></td>
</tr>
<tr>
<td height="18"></td>
</tr>
</table>
</td>
</tr>
<tr>
<td colspan="5">
<img src="images/sub_08.jpg" alt="" width="776" height="36" border="0" usemap="#Map"></td>
</tr>
<tr>
<td>
<img src="images/spacer.gif" width="361" height="1" alt=""></td>
<td width="185">
<img src="images/spacer.gif" width="185" height="1" alt=""></td>
<td>
<img src="images/spacer.gif" width="39" height="1" alt=""></td>
<td>
<img src="images/spacer.gif" width="154" height="1" alt=""></td>
<td>
<img src="images/spacer.gif" width="37" height="1" alt=""></td>
</tr>
</table>
</body>
</html>Ok ! Mas ñ entendo nada de programação...muito menos de ASP, aonde eu insiro esse códigos nesse meu formulario??? Poderia me orientar?
Valeu!
você terá um formulário que aponta para um determinado action, esse action será sua pagina asp com CDOSYS, que receberá os valores do formulário, dae você precisa apenas setar as variáveis corretas para o request dos dados (campos do formulário) e alterar o email para seu email.
Ok xanburzum! Vou tentar aqui!! Qq. coisa eu berro de novo...
Valeu!!
Pois é...
Inseri os códigos que você me passou e coloquei dentro da tag action, mas ainda dá alguns erros...mexi alterei como disse e aparece a informação: Bad Request (Invalid URL)
Aonde estou errando??
Por favor me ajude...
Bom, entendi maisou menos...a pg de envio ficou assim:
<%
'cria o objeto para o envio de e-mail
Set objCDOSYSMail = Server.CreateObject("CDO.Message")
'cria o objeto para configuração do SMTP
Set objCDOSYSCon = Server.CreateObject ("CDO.Configuration")
'SMTP
objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtpusers.igempresas.com.br"
'porta do SMTP
objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport")
= 25
'porta do CDO
objCDOSYSCon.Fields
("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
'timeout
objCDOSYSCon.Fields
("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 30
objCDOSYSCon.Fields.update
'atualiza a configuração do CDOSYS para o envio do e-mail
Set objCDOSYSMail.Configuration = objCDOSYSCon
'e-mail do remetente
objCDOSYSMail.From = "flori@fator2studio.com.br"
'e-mail do destinatário
objCDOSYSMail.To = "flori@fantastictoys.com.br"
'assunto da mensagem
objCDOSYSMail.Subject = "Assunto"
'conteúdo da mensagem
objCDOSYSMail.TextBody = " Mensagem de email "
'para envio da mensagem no formato html altere o TextBody para HtmlBody
'objCDOSYSMail.HtmlBody = "Mensagem de email"
'objCDOSYSMail.fields.update
'envia e-mail
objCDOSYSMail.Send
Set objCDOSYSMail = Nothing
Set objCDOSYSCon = Nothing
response.write "E-mail enviado para contato@fator2studio.com.br "
%>
Mas aparece o seguinte erro qdo envia:
>
Microsoft VBScript compilation error '800a0400'
Expected statement
/fale.asp, line 13
= 25
^
Que ñ sei muito bem o que é...
Ok...
Resolvido muito obrigado.
Valeu!
Abaixo um exemplo de como enviar email utilizando o cdosys.
<%
'cria o objeto para o envio de e-mail
Set objCDOSYSMail = Server.CreateObject("CDO.Message")
'cria o objeto para configuração do SMTP
Set objCDOSYSCon = Server.CreateObject ("CDO.Configuration")
'SMTP
objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.seu_dominio.com.br"
'porta do SMTP
objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport")
= 25
'porta do CDO
objCDOSYSCon.Fields
("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
'timeout
objCDOSYSCon.Fields
("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 30
objCDOSYSCon.Fields.update
'atualiza a configuração do CDOSYS para o envio do e-mail
Set objCDOSYSMail.Configuration = objCDOSYSCon
'e-mail do remetente
objCDOSYSMail.From = "para@seu_dominio.com.br"
'e-mail do destinatário
objCDOSYSMail.To = "de@seu_dominio.com.br "
'assunto da mensagem
objCDOSYSMail.Subject = "Assunto"
'conteúdo da mensagem
objCDOSYSMail.TextBody = " Mensagem de email "
'para envio da mensagem no formato html altere o TextBody para HtmlBody
'objCDOSYSMail.HtmlBody = "Mensagem de email"
'objCDOSYSMail.fields.update
'envia e-mail
objCDOSYSMail.Send
Set objCDOSYSMail = Nothing
Set objCDOSYSCon = Nothing
response.write "E-mail enviado para email@seu_dominio.com.br "
%>