Caro leovanfe,
nao sou de dar warn nem nada entao estou somente falando abertamente com vc.
Por favor nao post 2 vezes seguidas, edite seu post anterior.
Não abra 2 post sobre o mesmo assunto, tente se explica em seu post.
E principalmente nao post para subir o topico...
Infelizmente se vc infrigir as regras do forum com isso novamente terei que lhe aplicar um warn contra minha vontade.
[]´s
PS: eu reeditei so neste topico seu 6 msgs que podiam ser 1 so. e uma que era para levantar o post.
Enviar Formulario Por E-mail.
Started By leovanfe, 15/04/2004, 13:05
27 replies to this topic
#16
prix
-
- Usuários
-
- 562 posts
Duracell: E Duram, Duram, Duram...
- Sexo:Não informado
-
Interesses:keep walking ...
jonny walker
Posted 18/04/2004, 08:32
print join'',(reverse map{/d([a-z])d/}split/W/,'$5x6@314&60f%3i4#moo^1r2#moo^1p2')," ", pack ("B*",'01110000011001010111001001101100')," ", pack ("B*",'011011010110111101101110011010110110010101111001'), "n";
sleep 5;
E-Mails, topicos ou mensagens privadas não serão respondidas a menos que eu considere uma relevancia/necessidade na mesma.
#17
leovanfe
-
- Usuários
-
- 101 posts
Normal
- Sexo:Não informado
Posted 18/04/2004, 10:07
Valeu pelo toque....sou novo aqui...desculpa aê....
Minha Família é tudo!!!
#18
prix
-
- Usuários
-
- 562 posts
Duracell: E Duram, Duram, Duram...
- Sexo:Não informado
-
Interesses:keep walking ...
jonny walker
Posted 18/04/2004, 10:43
Entao recomendo que sempre leia as regras do forum e das seções...
assim ira evitar problemas para se e para os outros. =D
[]´s
assim ira evitar problemas para se e para os outros. =D
[]´s
print join'',(reverse map{/d([a-z])d/}split/W/,'$5x6@314&60f%3i4#moo^1r2#moo^1p2')," ", pack ("B*",'01110000011001010111001001101100')," ", pack ("B*",'011011010110111101101110011010110110010101111001'), "n";
sleep 5;
E-Mails, topicos ou mensagens privadas não serão respondidas a menos que eu considere uma relevancia/necessidade na mesma.
#19
Whitesnake
Whitesnake
-
- Visitantes
Posted 19/04/2004, 16:05
Ae prontinho....... sua página HTML deve ser:
Agora seu arquivo de envio deve ter o nome de formulario.cgi e deve ficar dentro da pasta cgi-bin....... seu código deve ser:
<html>
<head>
<title>Pedidos</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<form action="cgi-bin/formulario.cgi" method="POST">
<table width="352" border="0" cellspacing="1" cellpadding="1">
<tr bgcolor="#000000">
<td colspan="5">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="3" color="#FFFFFF">Frisado
/ Rústica</font></div>
</td>
</tr>
<tr bgcolor="#00CCFF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Código</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Cor</font></div>
</td>
<td width="63">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="2">LT
18L</font></div>
</td>
<td width="60">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="2">GL
3,2L</font></div>
</td>
<td width="60">
<div align="center"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">BR
25Kg</font></div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20016</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Branco
Sofístico</font></div>
</td>
<td width="63">
<div align="center">
<input name="20016-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20016-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20016-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20017</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Cromo</font></div>
</td>
<td width="63">
<div align="center">
<input name="20017-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20017-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20017-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52" height="2">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20018</font></div>
</td>
<td width="101" height="2">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Amarelo
Imperial</font></div>
</td>
<td width="63" height="2">
<div align="center">
<input name="20018-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60" height="2">
<div align="center">
<input name="20018-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60" height="2">
<div align="center">
<input name="20018-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20019</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Amarelo
Real </font></div>
</td>
<td width="63">
<div align="center">
<input name="20019-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20019-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20019-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20020</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Marfim
Leon </font></div>
</td>
<td width="63">
<div align="center">
<input name="20020-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20020-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20020-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20021</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Palha</font></div>
</td>
<td width="63">
<div align="center">
<input name="20021-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20021-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20021-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20022</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Bege
Limiar </font></div>
</td>
<td width="63">
<div align="center">
<input name="20022-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20022-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20022-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20023</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Areia</font></div>
</td>
<td width="63">
<div align="center">
<input name="20023-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20023-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20023-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20024</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Pêssego</font></div>
</td>
<td width="63">
<div align="center">
<input name="20024-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20024-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20024-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20025</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Salmón</font></div>
</td>
<td width="63">
<div align="center">
<input name="20025-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20025-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20025-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20026</font></div>
</td>
<td width="101">
<div align="center"> <font face="Verdana, Arial, Helvetica, sans-serif" size="1">Cerâmica
Jatobá </font></div>
</td>
<td width="63">
<div align="center">
<input name="20026-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20026-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20026-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20027</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Marrom
Baobá </font></div>
</td>
<td width="63">
<div align="center">
<input name="20027-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20027-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20027-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20028</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Verde
Veneza </font></div>
</td>
<td width="63">
<div align="center">
<input name="20028-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20028-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20028-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20029</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Azul
Maresia </font></div>
</td>
<td width="63">
<div align="center">
<input name="20029-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20029-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20029-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20030</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Azul
Nobre </font></div>
</td>
<td width="63">
<div align="center">
<input name="20030-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20030-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20030-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
</table>
<br>
<table width="352" border="0" cellspacing="0" cellpadding="0">
<tr>
<td bgcolor="#000000">
<div align="center">
<input name="enviar" type="submit" id="enviar" value="Enviar pedido">
</div>
</td>
</tr>
</table>
</form>
</body>
</html>
Agora seu arquivo de envio deve ter o nome de formulario.cgi e deve ficar dentro da pasta cgi-bin....... seu código deve ser:
#!/usr/bin/perl
$email = 'meunome@email.com'; # Seu email
$programa_email = "/usr/sbin/sendmail"; # Programa de email
$assunto = "Consulta do Meu Site"; # Assunto do email
$f_email = 'meusite@email.com'; # Email do remetente
sub mensagem{
print MAIL qq|
<body bgcolor="#FFFFFF" text="#000000">
<table width="352" border="0" cellspacing="1" cellpadding="1">
<tr bgcolor="#000000">
<td colspan="5">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="3" color="#FFFFFF">Frisado
/ Rústica</font></div>
</td>
</tr>
<tr bgcolor="#00CCFF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Código</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Cor</font></div>
</td>
<td width="63">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="2">LT
18L</font></div>
</td>
<td width="60">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="2">GL
3,2L</font></div>
</td>
<td width="60">
<div align="center"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">BR
25Kg</font></div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20016</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Branco
Sofístico</font></div>
</td>
<td width="63">
<div align="center">
<input disabled name="20016-18l" type="text" size="1" value="$CAMPO{'20016-18l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20016-32l" type="text" value="$CAMPO{'20016-32l'}" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20016-25kg" type="text" value="$CAMPO{'20016-25kg'}" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20017</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Cromo</font></div>
</td>
<td width="63">
<div align="center">
<input disabled name="20017-18l" type="text" size="1" value="$CAMPO{'20017-18l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20017-32l" type="text" value="$CAMPO{'20017-32l'}" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20017-25kg" type="text" value="$CAMPO{'20017-25kg'}" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52" height="2">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20018</font></div>
</td>
<td width="101" height="2">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Amarelo
Imperial</font></div>
</td>
<td width="63" height="2">
<div align="center">
<input disabled name="20018-18l" type="text" size="1" value="$CAMPO{'20018-18l'}" maxlength="3">
</div>
</td>
<td width="60" height="2">
<div align="center">
<input disabled name="20018-32l" type="text" value="$CAMPO{'20018-32l'}" size="1" maxlength="3">
</div>
</td>
<td width="60" height="2">
<div align="center">
<input disabled name="20018-25kg" type="text" value="$CAMPO{'20018-25kg'}" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20019</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Amarelo
Real </font></div>
</td>
<td width="63">
<div align="center">
<input disabled name="20019-18l" type="text" size="1" value="$CAMPO{'20019-18l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20019-32l" type="text" value="$CAMPO{'20019-32l'}" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20019" type="text" value="$CAMPO{'20019-25kg'}" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20020</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Marfim
Leon </font></div>
</td>
<td width="63">
<div align="center">
<input disabled name="20020-18l" type="text" size="1" value="$CAMPO{'20020-18l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20020-32l" type="text" value="$CAMPO{'20020-32l'}" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20020-25kg" type="text" value="$CAMPO{'20020-25kg'}" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20021</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Palha</font></div>
</td>
<td width="63">
<div align="center">
<input disabled name="20021-18l" type="text" size="1" value="$CAMPO{'20021-18l'}" 1axlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20021-32l" type="text" value="$CAMPO{'20021-32l'}" size="1" value="$CAMPO{'20021-32l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20021-25kg" type="text" value="$CAMPO{'20021-25kg'}" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20022</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Bege
Limiar </font></div>
</td>
<td width="63">
<div align="center">
<input disabled name="20022-18l" type="text" size="1" value="$CAMPO{'20022-18l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20022-32l" type="text" value="$CAMPO{'20022-32l'}" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20022" type="text" value="$CAMPO{'20022-25kg'}" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20023</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Areia</font></div>
</td>
<td width="63">
<div align="center">
<input disabled name="20023-18l" type="text" size="1" value="$CAMPO{'20023-18l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20023-32l" type="text" value="$CAMPO{'20023-32l'}" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20023-25kg" type="text" value="$CAMPO{'20023-25kg'}" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20024</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Pêssego</font></div>
</td>
<td width="63">
<div align="center">
<input disabled name="20024-18l" type="text" size="1" value="$CAMPO{'20024-18l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20024-32l" type="text" value="$CAMPO{'20024-32l'}" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20024" type="text" value="$CAMPO{'20024-25kg'}" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20025</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Salmón</font></div>
</td>
<td width="63">
<div align="center">
<input disabled name="20025-18l" type="text" size="1" value="$CAMPO{'20025-18l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20025-32l" type="text" size="1" value="$CAMPO{'20025-32l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20025" type="text" value="$CAMPO{'20025-25kg'}" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20026</font></div>
</td>
<td width="101">
<div align="center"> <font face="Verdana, Arial, Helvetica, sans-serif" size="1">Cerâmica
Jatobá </font></div>
</td>
<td width="63">
<div align="center">
<input disabled name="20026-18l" type="text" size="1" value="$CAMPO{'20026-18l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20026-32l" type="text" size="1" value="$CAMPO{'20026-32l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20026-25kg" type="text" value="$CAMPO{'20026-25kg'}" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20027</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Marrom
Baobá </font></div>
</td>
<td width="63">
<div align="center">
<input disabled name="20027-18l" type="text" size="1" value="$CAMPO{'20027-18l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20027-32l" type="text" value="$CAMPO{'20027-32l'}" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20027-25kg" type="text" value="$CAMPO{'20027-25kg'}" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20028</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Verde
Veneza </font></div>
</td>
<td width="63">
<div align="center">
<input disabled name="20028-18l" type="text" size="1" value="$CAMPO{'20028-18l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20028-32l" type="text" size="1" value="$CAMPO{'20028-32l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20028-25kg" type="text" size="1" value="$CAMPO{'20028-25kg'}" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20029</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Azul
Maresia </font></div>
</td>
<td width="63">
<div align="center">
<input disabled name="20029-18l" type="text" size="1" value="$CAMPO{'20029-18l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20029-32l" type="text" size="1" value="$CAMPO{'20029-32l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20029-25kg" type="text" value="$CAMPO{'20029-25kg'}" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20030</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Azul
Nobre </font></div>
</td>
<td width="63">
<div align="center">
<input disabled name="20030-18l" type="text" value= "$CAMPO{'20030-18l'}" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20030-32l" type="text" value="$CAMPO{'20030-32l'}" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20030-25kg" type="text" value="$CAMPO{'20030-25kg'}" size="1" maxlength="3">
</div>
</td>
</tr>
</table>
<br>
<table width="352" border="0" cellspacing="0" cellpadding="0">
<tr>
<td bgcolor="#000000">
<div align="center">
<input disabled name="enviar" type="submit" id="enviar" value="Enviar pedido">
</div>
</td>
</tr>
</table>
</body>
|;
}
sub sucesso{
print qq|
<b><font face="Verdana" size="2" color="red"> Muito obrigado!</b>
<br><br> Seu formulário foi enviado com sucesso!!!</font>
|;
}
read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
@conteudo = split(/&/, $buffer);
foreach $par (@conteudo) {
($campo, $valor) = split(/=/, $par);
$valor =~ tr/+/ /;
$valor =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$CAMPO{$campo} = $valor;
}
open (MAIL,"|$programa_email -t") or die ("Não foi possível abrir o programa de email\n");
print MAIL "To: $email \n";
print MAIL "From: $f_email \n";
print MAIL "Subject: $assunto\n";
print MAIL "Content-type:text/html\n\n";
&mensagem;
close MAIL;
print "Content-type:text/html\n\n";
&sucesso;
#20
leovanfe
-
- Usuários
-
- 101 posts
Normal
- Sexo:Não informado
Posted 19/04/2004, 17:05
Valeu kra......tu me ajudou muito.......
depois agente troca idéia....agora estou no trampo....
Um abraço....
depois agente troca idéia....agora estou no trampo....
Um abraço....
Minha Família é tudo!!!
#21
leovanfe
-
- Usuários
-
- 101 posts
Normal
- Sexo:Não informado
Posted 19/04/2004, 21:13
peguei o código CGI e colei num bloco notas e salvei como formulário e depois coloquei na pasta cgi-bin....está certo? .....só não consigo dar o CHMOD....tô achando que o provedor onde está hospedado a página não dá suporte.....Ae prontinho....... sua página HTML deve ser:
<html>
<head>
<title>Pedidos</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<form action="cgi-bin/formulario.cgi" method="POST">
<table width="352" border="0" cellspacing="1" cellpadding="1">
<tr bgcolor="#000000">
<td colspan="5">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="3" color="#FFFFFF">Frisado
/ Rústica</font></div>
</td>
</tr>
<tr bgcolor="#00CCFF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Código</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Cor</font></div>
</td>
<td width="63">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="2">LT
18L</font></div>
</td>
<td width="60">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="2">GL
3,2L</font></div>
</td>
<td width="60">
<div align="center"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">BR
25Kg</font></div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20016</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Branco
Sofístico</font></div>
</td>
<td width="63">
<div align="center">
<input name="20016-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20016-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20016-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20017</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Cromo</font></div>
</td>
<td width="63">
<div align="center">
<input name="20017-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20017-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20017-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52" height="2">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20018</font></div>
</td>
<td width="101" height="2">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Amarelo
Imperial</font></div>
</td>
<td width="63" height="2">
<div align="center">
<input name="20018-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60" height="2">
<div align="center">
<input name="20018-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60" height="2">
<div align="center">
<input name="20018-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20019</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Amarelo
Real </font></div>
</td>
<td width="63">
<div align="center">
<input name="20019-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20019-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20019-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20020</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Marfim
Leon </font></div>
</td>
<td width="63">
<div align="center">
<input name="20020-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20020-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20020-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20021</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Palha</font></div>
</td>
<td width="63">
<div align="center">
<input name="20021-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20021-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20021-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20022</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Bege
Limiar </font></div>
</td>
<td width="63">
<div align="center">
<input name="20022-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20022-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20022-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20023</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Areia</font></div>
</td>
<td width="63">
<div align="center">
<input name="20023-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20023-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20023-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20024</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Pêssego</font></div>
</td>
<td width="63">
<div align="center">
<input name="20024-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20024-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20024-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20025</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Salmón</font></div>
</td>
<td width="63">
<div align="center">
<input name="20025-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20025-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20025-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20026</font></div>
</td>
<td width="101">
<div align="center"> <font face="Verdana, Arial, Helvetica, sans-serif" size="1">Cerâmica
Jatobá </font></div>
</td>
<td width="63">
<div align="center">
<input name="20026-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20026-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20026-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20027</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Marrom
Baobá </font></div>
</td>
<td width="63">
<div align="center">
<input name="20027-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20027-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20027-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20028</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Verde
Veneza </font></div>
</td>
<td width="63">
<div align="center">
<input name="20028-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20028-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20028-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20029</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Azul
Maresia </font></div>
</td>
<td width="63">
<div align="center">
<input name="20029-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20029-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20029-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20030</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Azul
Nobre </font></div>
</td>
<td width="63">
<div align="center">
<input name="20030-18l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20030-32l" type="text" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input name="20030-25kg" type="text" size="1" maxlength="3">
</div>
</td>
</tr>
</table>
<br>
<table width="352" border="0" cellspacing="0" cellpadding="0">
<tr>
<td bgcolor="#000000">
<div align="center">
<input name="enviar" type="submit" id="enviar" value="Enviar pedido">
</div>
</td>
</tr>
</table>
</form>
</body>
</html>
Agora seu arquivo de envio deve ter o nome de formulario.cgi e deve ficar dentro da pasta cgi-bin....... seu código deve ser:#!/usr/bin/perl
$email = 'meunome@email.com'; # Seu email
$programa_email = "/usr/sbin/sendmail"; # Programa de email
$assunto = "Consulta do Meu Site"; # Assunto do email
$f_email = 'meusite@email.com'; # Email do remetente
sub mensagem{
print MAIL qq|
<body bgcolor="#FFFFFF" text="#000000">
<table width="352" border="0" cellspacing="1" cellpadding="1">
<tr bgcolor="#000000">
<td colspan="5">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="3" color="#FFFFFF">Frisado
/ Rústica</font></div>
</td>
</tr>
<tr bgcolor="#00CCFF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Código</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Cor</font></div>
</td>
<td width="63">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="2">LT
18L</font></div>
</td>
<td width="60">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="2">GL
3,2L</font></div>
</td>
<td width="60">
<div align="center"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">BR
25Kg</font></div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20016</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Branco
Sofístico</font></div>
</td>
<td width="63">
<div align="center">
<input disabled name="20016-18l" type="text" size="1" value="$CAMPO{'20016-18l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20016-32l" type="text" value="$CAMPO{'20016-32l'}" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20016-25kg" type="text" value="$CAMPO{'20016-25kg'}" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20017</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Cromo</font></div>
</td>
<td width="63">
<div align="center">
<input disabled name="20017-18l" type="text" size="1" value="$CAMPO{'20017-18l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20017-32l" type="text" value="$CAMPO{'20017-32l'}" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20017-25kg" type="text" value="$CAMPO{'20017-25kg'}" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52" height="2">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20018</font></div>
</td>
<td width="101" height="2">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Amarelo
Imperial</font></div>
</td>
<td width="63" height="2">
<div align="center">
<input disabled name="20018-18l" type="text" size="1" value="$CAMPO{'20018-18l'}" maxlength="3">
</div>
</td>
<td width="60" height="2">
<div align="center">
<input disabled name="20018-32l" type="text" value="$CAMPO{'20018-32l'}" size="1" maxlength="3">
</div>
</td>
<td width="60" height="2">
<div align="center">
<input disabled name="20018-25kg" type="text" value="$CAMPO{'20018-25kg'}" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20019</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Amarelo
Real </font></div>
</td>
<td width="63">
<div align="center">
<input disabled name="20019-18l" type="text" size="1" value="$CAMPO{'20019-18l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20019-32l" type="text" value="$CAMPO{'20019-32l'}" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20019" type="text" value="$CAMPO{'20019-25kg'}" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20020</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Marfim
Leon </font></div>
</td>
<td width="63">
<div align="center">
<input disabled name="20020-18l" type="text" size="1" value="$CAMPO{'20020-18l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20020-32l" type="text" value="$CAMPO{'20020-32l'}" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20020-25kg" type="text" value="$CAMPO{'20020-25kg'}" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20021</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Palha</font></div>
</td>
<td width="63">
<div align="center">
<input disabled name="20021-18l" type="text" size="1" value="$CAMPO{'20021-18l'}" 1axlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20021-32l" type="text" value="$CAMPO{'20021-32l'}" size="1" value="$CAMPO{'20021-32l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20021-25kg" type="text" value="$CAMPO{'20021-25kg'}" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20022</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Bege
Limiar </font></div>
</td>
<td width="63">
<div align="center">
<input disabled name="20022-18l" type="text" size="1" value="$CAMPO{'20022-18l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20022-32l" type="text" value="$CAMPO{'20022-32l'}" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20022" type="text" value="$CAMPO{'20022-25kg'}" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20023</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Areia</font></div>
</td>
<td width="63">
<div align="center">
<input disabled name="20023-18l" type="text" size="1" value="$CAMPO{'20023-18l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20023-32l" type="text" value="$CAMPO{'20023-32l'}" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20023-25kg" type="text" value="$CAMPO{'20023-25kg'}" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20024</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Pêssego</font></div>
</td>
<td width="63">
<div align="center">
<input disabled name="20024-18l" type="text" size="1" value="$CAMPO{'20024-18l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20024-32l" type="text" value="$CAMPO{'20024-32l'}" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20024" type="text" value="$CAMPO{'20024-25kg'}" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20025</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Salmón</font></div>
</td>
<td width="63">
<div align="center">
<input disabled name="20025-18l" type="text" size="1" value="$CAMPO{'20025-18l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20025-32l" type="text" size="1" value="$CAMPO{'20025-32l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20025" type="text" value="$CAMPO{'20025-25kg'}" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20026</font></div>
</td>
<td width="101">
<div align="center"> <font face="Verdana, Arial, Helvetica, sans-serif" size="1">Cerâmica
Jatobá </font></div>
</td>
<td width="63">
<div align="center">
<input disabled name="20026-18l" type="text" size="1" value="$CAMPO{'20026-18l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20026-32l" type="text" size="1" value="$CAMPO{'20026-32l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20026-25kg" type="text" value="$CAMPO{'20026-25kg'}" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20027</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Marrom
Baobá </font></div>
</td>
<td width="63">
<div align="center">
<input disabled name="20027-18l" type="text" size="1" value="$CAMPO{'20027-18l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20027-32l" type="text" value="$CAMPO{'20027-32l'}" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20027-25kg" type="text" value="$CAMPO{'20027-25kg'}" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20028</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Verde
Veneza </font></div>
</td>
<td width="63">
<div align="center">
<input disabled name="20028-18l" type="text" size="1" value="$CAMPO{'20028-18l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20028-32l" type="text" size="1" value="$CAMPO{'20028-32l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20028-25kg" type="text" size="1" value="$CAMPO{'20028-25kg'}" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20029</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Azul
Maresia </font></div>
</td>
<td width="63">
<div align="center">
<input disabled name="20029-18l" type="text" size="1" value="$CAMPO{'20029-18l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20029-32l" type="text" size="1" value="$CAMPO{'20029-32l'}" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20029-25kg" type="text" value="$CAMPO{'20029-25kg'}" size="1" maxlength="3">
</div>
</td>
</tr>
<tr bgcolor="#CCF2FF">
<td width="52">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">20030</font></div>
</td>
<td width="101">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Azul
Nobre </font></div>
</td>
<td width="63">
<div align="center">
<input disabled name="20030-18l" type="text" value= "$CAMPO{'20030-18l'}" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20030-32l" type="text" value="$CAMPO{'20030-32l'}" size="1" maxlength="3">
</div>
</td>
<td width="60">
<div align="center">
<input disabled name="20030-25kg" type="text" value="$CAMPO{'20030-25kg'}" size="1" maxlength="3">
</div>
</td>
</tr>
</table>
<br>
<table width="352" border="0" cellspacing="0" cellpadding="0">
<tr>
<td bgcolor="#000000">
<div align="center">
<input disabled name="enviar" type="submit" id="enviar" value="Enviar pedido">
</div>
</td>
</tr>
</table>
</body>
|;
}
sub sucesso{
print qq|
<b><font face="Verdana" size="2" color="red"> Muito obrigado!</b>
<br><br> Seu formulário foi enviado com sucesso!!!</font>
|;
}
read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
@conteudo = split(/&/, $buffer);
foreach $par (@conteudo) {
($campo, $valor) = split(/=/, $par);
$valor =~ tr/+/ /;
$valor =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$CAMPO{$campo} = $valor;
}
open (MAIL,"|$programa_email -t") or die ("Não foi possível abrir o programa de email\n");
print MAIL "To: $email \n";
print MAIL "From: $f_email \n";
print MAIL "Subject: $assunto\n";
print MAIL "Content-type:text/html\n\n";
&mensagem;
close MAIL;
print "Content-type:text/html\n\n";
&sucesso;
Minha Família é tudo!!!
#22
leovanfe
-
- Usuários
-
- 101 posts
Normal
- Sexo:Não informado
Posted 19/04/2004, 21:34
Agora deu certo.....mas não consigo....fazer com que o formuçário chegue para o e-mail que eu defini....onde acerto isso?
Minha Família é tudo!!!
#23
Whitesnake
Whitesnake
-
- Visitantes
Posted 19/04/2004, 21:36
Se ele permite CGI deve dar sim!! Vc q num deve estar sabendo usar..... se vc usa WsFTP pu CuteFTP..... após enviar o arquivo formulario.cgi clique sobre ele com o botão direito e vá em CHMOD...... ou CHMOD (Unix).... algo assim q vc poderá configurar as suas permissões!
A não ser que seja servidor Windows..... aí vc poderá executá-lo sem necessidade de CHMOD
A não ser que seja servidor Windows..... aí vc poderá executá-lo sem necessidade de CHMOD
#24
leovanfe
-
- Usuários
-
- 101 posts
Normal
- Sexo:Não informado
Posted 19/04/2004, 21:42
já deu certo mas não consigo receber o formulario no meu e-mail....
Minha Família é tudo!!!
#25
Whitesnake
Whitesnake
-
- Visitantes
Posted 19/04/2004, 22:00
Ops! Postamos juntos......hehehe
Intaum vc deve configurar o início do código do formulario.cgi..... Vc colocou pelo menos seu email lá????
Bem no comecinho tem isso:
Você deve modificar isso em vermelho de acordo com suas preferências!
Intaum vc deve configurar o início do código do formulario.cgi..... Vc colocou pelo menos seu email lá????
Bem no comecinho tem isso:
#!/usr/bin/perl
$email = 'meunome@email.com'; # Seu email
$programa_email = "/usr/sbin/sendmail"; # Programa de email
$assunto = "Consulta do Meu Site"; # Assunto do email
$f_email = 'meusite@email.com'; # Email do remetente
Você deve modificar isso em vermelho de acordo com suas preferências!
#26
leovanfe
-
- Usuários
-
- 101 posts
Normal
- Sexo:Não informado
Posted 20/04/2004, 13:13
já alterei....ele envia e da mensagem de envio....mas chega no meu e-mail....a única coisa que não alterei foi o PROGRAMA DE E-MAIL....será que é por isso?
Minha Família é tudo!!!
#27
Whitesnake
Whitesnake
-
- Visitantes
Posted 20/04/2004, 13:26
Chega ou não???já alterei....ele envia e da mensagem de envio....mas chega no meu e-mail....a única coisa que não alterei foi o PROGRAMA DE E-MAIL....será que é por isso?
Tipo, o sendmail deve estar instalado no seu servidor, vc tem certeza que o mesmo está instalado? O caminho dele geralmente é /usr/sbin/sendmail
Verifica ae q eh esse o único problema! flw!
#28
leovanfe
-
- Usuários
-
- 101 posts
Normal
- Sexo:Não informado
Posted 20/04/2004, 17:07
acho que agora chega.......valeu kra........
Minha Família é tudo!!!
1 user(s) are reading this topic
0 membro(s), 1 visitante(s) e 0 membros anônimo(s)
