%Response.Buffer=true%>
<%Response.Expires=0 %>
<%
If request.ServerVariables("Request_method")="POST" Then
BodyMsg = ""
BodyMsg = BodyMsg & "PEDIDO DE PRESUPUESTO
"
BodyMsg = BodyMsg & "Nombre:" & Request.Form("txtNombre") & "
"
BodyMsg = BodyMsg & "Cargo:" & request("txtCargo") & "
"
BodyMsg = BodyMsg & "Empresa:" & request("txtEmpresa") & "
"
BodyMsg = BodyMsg & "CUIT:" & request("txtCuit") & "
"
BodyMsg = BodyMsg & "Nombre:" & request("txtDireccion") & "
"
BodyMsg = BodyMsg & "Teléfono:" & request("txtTelefono") & "
"
BodyMsg = BodyMsg & "Fax:" & request("txtFax") & "
"
BodyMsg = BodyMsg & "e-mail:" & request("txtEmail") & "
"
BodyMsg = BodyMsg & "
"
BodyMsg = BodyMsg & ""
BodyMsg = BodyMsg & "
"
BodyMsg = BodyMsg & ""
BodyMsg = BodyMsg & " "
BodyMsg = BodyMsg & " Pares "
BodyMsg = BodyMsg & " Producto "
BodyMsg = BodyMsg & " Linea "
BodyMsg = BodyMsg & " Puntera "
BodyMsg = BodyMsg & " "
BodyMsg = BodyMsg & " "
BodyMsg = BodyMsg & " " & request("txtPar1")& " "
BodyMsg = BodyMsg & " " & request("cmbProducto1")& " "
BodyMsg = BodyMsg & " " & request("cmbLinea1")& " "
BodyMsg = BodyMsg & " " & request("cmbPuntera1")& " "
BodyMsg = BodyMsg & " "
BodyMsg = BodyMsg & " "
BodyMsg = BodyMsg & " " & request("txtPar2")& " "
BodyMsg = BodyMsg & " " & request("cmbProducto2")& " "
BodyMsg = BodyMsg & " " & request("cmbLinea2")& " "
BodyMsg = BodyMsg & " "& request("cmbPuntera2")& " "
BodyMsg = BodyMsg & " "
BodyMsg = BodyMsg & " "
BodyMsg = BodyMsg & "" & request("txtPar3")& " "
BodyMsg = BodyMsg & " " & request("cmbProducto3")& " "
BodyMsg = BodyMsg & " " & request("cmbLinea3")& " "
BodyMsg = BodyMsg & " " & request("cmbPuntera3")& " "
BodyMsg = BodyMsg & "
"
BodyMsg = BodyMsg & "Productos Especiales:" & request("txtEspecial") & "
"
BodyMsg = BodyMsg & ""
SendMail BodyMsg, "Presupuesto"
response.Redirect("gracias.htm")
End If
%>
|
Llene los datos de la forma
siguiente y luego haga click en el boton ENVIAR. En menos de 24 horas recibirá su información via e-mail. |
|||