Ver Mensaje Individual
  #4 (permalink)  
Antiguo 17/04/2002, 10:27
El Jedi
 
Fecha de Ingreso: abril-2002
Mensajes: 127
Antigüedad: 23 años
Puntos: 0
Re: Necesito ayuda con este codigo

Male33 tu dices que lo ponga así como esta ahora.


<%
Dim strnombre, stremails, strtema, strsugerencias, ObjMail
strnombre = request.form("nombre")
stremails = request.form("emails")
strtema = request.form("tema")
strsugerencias = request.form("sugerencias")

'-----------------------[ START ERROR CHECKING ]---------------------------

If strnombre = "" or isnull(strnombre) Then
Response.Write("El parametro nombre es requerido, por favor ingreselo")
Response.End
End If

If strtema = "" or isnull(strtema) Then
Response.Write("El parametro tema es requerido, por favor ingreselo")
Response.End
End If


'-----------------------[ END ERROR CHECKING ]---------------------------


Set ObjMail = Server.CreateObject("CDONTS.NewMail")

Mail.From = "stremails"
Mail.To = "[email protected]"
Mail.Subject = "Comentarios"
Mail.Body = "strsugerencias"
Mail.Send

Set Mail = Nothing

%>

Gracias a los dos por responder mi mensaje. Voy a probar lo que me dicen y les cuento.