AYUDA PARA INTERPRETAR UN CODIGO ASP
Publicado por Daniel Cruz (2 intervenciones) el 27/09/2005 00:36:04
Lo que pasa es que realizaron una pagina web y esta ya contiene la forma para poder introducir los datos,(LO QUE SE REQUIERE ES QUE ALGUN USUARIO INTRODUSCA SUS DATOS Y ESTOS DATOS, SEAN ENVIADOS A MI CORREO) lo que pasa es que estas personas que realizaron la pagina se fueron y no la concluyeron, esto fue lo que dejaron en la pagina web un archivo que contiene este codigo:
<%contactfield1=Request("field1")contactfield2=Request("field2")contactfield3=Request("field3")contactfield4=Request("field4")mbody = "field1 : "&contactfield1&" | field2 : "&contactfield2&" | field3 : "&contactfield3&" | field4 : "&contactfield4'email object for cdonts''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Set pmail = Server.CreateObject("CDONTS.Newmail")'change the email to your email address
'pmail.From = "[email protected]"
'pmail.To = "[email protected]"
'pmail.Subject = " Website Contact enquiry "
'pmail.Body = mbody
'pmail.MailFormat = 0
'mime type'pmail.BodyFormat = 0
'default value 1 for plain text type
'pmail.Send
'Set pmail=Nothing
'new mail
'DIM Mailer
'email object for CDO Windows 2003 '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Set objMessage = CreateObject("CDO.Message")
objMessage.Subject = "Website Contact Enquiry"
'change the email to your email address
objMessage.Sender = "[email protected]"
objMessage.To = "[email protected]"
objMessage.TextBody = mbody
objMessage.Sendset objMessage=Nothing response.write("response=ok")%>
La verdad no se como funciona por que soy algo nuevo en esto de ASP. Les agradeceria que me horientaran.... GRACIAS.
<%contactfield1=Request("field1")contactfield2=Request("field2")contactfield3=Request("field3")contactfield4=Request("field4")mbody = "field1 : "&contactfield1&" | field2 : "&contactfield2&" | field3 : "&contactfield3&" | field4 : "&contactfield4'email object for cdonts''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Set pmail = Server.CreateObject("CDONTS.Newmail")'change the email to your email address
'pmail.From = "[email protected]"
'pmail.To = "[email protected]"
'pmail.Subject = " Website Contact enquiry "
'pmail.Body = mbody
'pmail.MailFormat = 0
'mime type'pmail.BodyFormat = 0
'default value 1 for plain text type
'pmail.Send
'Set pmail=Nothing
'new mail
'DIM Mailer
'email object for CDO Windows 2003 '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Set objMessage = CreateObject("CDO.Message")
objMessage.Subject = "Website Contact Enquiry"
'change the email to your email address
objMessage.Sender = "[email protected]"
objMessage.To = "[email protected]"
objMessage.TextBody = mbody
objMessage.Sendset objMessage=Nothing response.write("response=ok")%>
La verdad no se como funciona por que soy algo nuevo en esto de ASP. Les agradeceria que me horientaran.... GRACIAS.
Valora esta pregunta


0