Volledige versie bekijken : wat veranderen?



Kennethje
1 oktober 2005, 12:01
Mijne website is www.kenneth.v3.be (http://www.kenneth.v3.be/) en het gaat over die contact pagina


<%
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 = kennethje_001@msn.com
'pmail.To = kennethje_001@msn.com

'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 = kennethje_001@msn.com
objMessage.To = kennethje_001@msn.com
objMessage.TextBody = mbody
objMessage.Send
set objMessage=Nothing

response.write("response=ok")
%>

Martijnc
1 oktober 2005, 12:17
Wat is eigenlijk het probleem?

Kennethje
1 oktober 2005, 12:27
ik heb da eens getest op mijne site en ik verstuur een e-mail maar ik krijg diene nie toe

Snakey
1 oktober 2005, 12:46
Ondersteund je server asp?

Kennethje
1 oktober 2005, 12:56
Hoe kun je da weten? :p
Lolz tis via http://users.skynet.be ik weet da het bij telenet nie gaat maar van skynet weet ik da niet

Snakey
1 oktober 2005, 13:00
Dan zal het niet werken. Skynet ondersteund naar mijn weten geen serverside scripting.

Kennethje
1 oktober 2005, 13:20
Dan zal het niet werken. Skynet ondersteund naar mijn weten geen serverside scripting.
Okej tnx he