aca pongo el codigo de los dos ficheros, a ver si alguien me sabe decir que es lo que estoy haciendo mal,
Ademas no se nada de programacion asi que puedo haber puesto cualquier barrabasada
la pagina del form es
http://www.diswarehouse.com.ar/encarguesusistema.htm
Desde ya , gracias y saludos !!!!
<html>
<head>
<title>Encargue su sistema</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<script language="JavaScript">
<!--
function MM_findObj(n, d) { //v4.0
var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
if(!x && document.getElementById) x=document.getElementById(n); return x;
}
function MM_validateForm() { //v4.0
var i,p,q,nm,test,num,min,max,errors='',args=MM_valida teForm.arguments;
for (i=0; i<(args.length-2); i+=3) { test=args[i+2]; val=MM_findObj(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+' must contain an e-mail address.\n';
} else if (test!='R') {
if (isNaN(val)) errors+='- '+nm+' must contain a number.\n';
if (test.indexOf('inRange') != -1) { p=test.indexOf(':');
min=test.substring(8,p); max=test.substring(p+1);
if (val<min || max<val) errors+='- '+nm+' must contain a number between '+min+' and '+max+'.\n';
} } } else if (test.charAt(0) == 'R') errors += '- '+nm+' is required.\n'; }
} if (errors) alert('The following error(s) occurred:\n'+errors);
document.MM_returnValue = (errors == '');
}
//-->
</script>
</head>
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0">
<table width="780" border="0" cellpadding="0" cellspacing="0" height="101">
<tr>
<td colspan="4" height="120" valign="middle" bgcolor="#FFFFFF"><img src="logo.gif" width="780" height="120"></td>
</tr>
<tr>
<td width="43" height="15"></td>
<td width="217"></td>
<td width="464"></td>
<td width="56" rowspan="2" valign="top"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=4,0,2,0" width="34" height="14">
<param name=movie value="text6.swf">
<param name=quality value=high>
<param name="BASE" value=".">
<param name="BGCOLOR" value="#FFFFFF">
<param name="SCALE" value="exactfit">
<embed src="text6.swf" base="." quality=high pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" scale="exactfit" width="34" height="14" bgcolor="#FFFFFF">
</embed>
</object></td>
</tr>
<tr>
<td height="10"></td>
<td valign="middle" rowspan="2"><b><font color="#000000" size="3" face="Arial, Helvetica, sans-serif"><img src="Pto.gif" width="17" height="17">Encargue
sus sistema</font></b></td>
<td></td>
</tr>
<tr>
<td height="13"></td>
<td></td>
<td></td>
</tr>
<tr>
<td height="44"></td>
<td valign="middle"><b><font size="2" face="Arial, Helvetica, sans-serif">Ingrese
sus datos a continuación:</font></b></td>
<td></td>
<td></td>
</tr>
</table>
<form name="Formulario encargue su sist" method="post" action="envia_mail.asp">
<table width="403" border="0">
<tr>
<td width="16" height="30"></td>
<td width="145" valign="top"><font size="2" face="Arial, Helvetica, sans-serif">Nombre</font></td>
<td width="58%">
<input type="text" name="Nombre" onBlur="MM_validateForm('Correo electronico','','NisEmail');return document.MM_returnValue">
</td>
</tr>
<tr>
<td height="30"></td>
<td valign="top"><font size="2" face="Arial, Helvetica, sans-serif">Teléfono</font></td>
<td width="58%">
<input type="text" name="Telefono">
</td>
</tr>
<tr>
<td height="30"></td>
<td valign="top"><font size="2" face="Arial, Helvetica, sans-serif">Correo
electrónico</font></td>
<td width="58%">
<input type="text" name="Correo_electronico">
</td>
</tr>
<tr>
<td height="30"></td>
<td valign="top"><font size="2" face="Arial, Helvetica, sans-serif">Provincia</font></td>
<td width="58%">
<input type="text" name="Provincia">
</td>
</tr>
<tr>
<td height="30"></td>
<td valign="top"><font size="2" face="Arial, Helvetica, sans-serif">Localidad</font></td>
<td width="58%">
<input type="text" name="Localidad">
</td>
</tr>
</table>
<p><b><font color="#000000" size="2" face="Arial, Helvetica, sans-serif"> Describa
el sistema que necesita y nos comunicaremos con usted a la brevedad:</font></b></p>
<p>
<textarea name="Comentarios" cols="50" rows="5"></textarea>
</p>
<table width="52%" border="0">
<tr>
<td width="45%"> </td>
<td width="55%">
<input type="submit" name="Submit" value="Enviar">
</td>
</tr>
</table>
<p> </p>
</form>
<p> </p>
</body>
</html>
acá va el .asp
<%
'Declaramos las variables a usar
Dim Nombre, Telefono, Correo_electronico, Provincia, Localidad, Comentarios, OBJ_EMAIL
'Obtenemos los valores del formulario
Nombre = Request.Form("Nombre")
Telefono = Request.Form("Telefono")
Correo_electronico = Request.Form("Correo_electronico")
Provincia = Request.Form("Provincia")
Localidad = Request.Form("Localidad")
Comentarios = Request.Form("Comentarios")
'Creación del objeto
Set OBJ_EMAIL = Server.CreateObject("CDONTS.NewMail")
OBJ_EMAIL.From = "[email protected]" 'No hace falta especificar un email valido
OBJ_EMAIL.To = "[email protected]"
OBJ_EMAIL.Subject = "Formulario Encargue su sistema"
OBJ_EMAIL.Body = Nombre & Telefono & Correo_electronico & Provincia & Localidad & Comentarios ' Cuerpo del mensaje
OBJ_EMAIL.Send 'Envia el mail
'Cierra el Objeto
Set OBJ_EMAIL = Nothing
Response.Write"Gracias, lo contactaremos a la brevedad"
%>
por favor ayuda!!!!!
