1de1.com - Denenmiş Tarif Gönderme Formu

Denenmiş Tarif Gönderme Formu

Tarif göndermek için aşağıdaki formu doldurabileceğiniz gibi mail@1de1.com adresini de kullanabilirsiniz.

Tarifinizin anlaşılabilir düzgün bir anlatımı olmasına lütfen dikkat edin. Bizim tarzımızı bilenler, esprili tariflere de hayır demeyeceğimizi bilirler :)

<% if (request.form("ok")<>1)then %>

Tam İsminiz

e-mail adresiniz

Değişik ülke yemeklerinin hangi ülkeye ait olduğunu lütfen aşağıda belirtin.

Tarifinizi Yazın (İsim, Malzemeler, Yapılış, İpuçları....)

<% else Set MyCDONTSMail = CreateObject("CDONTS.NewMail") MyCDONTSMail.From= Request.Form("T2") + "<" + Request.Form("T1") + ">" MyCDONTSMail.To= "mail@1de1.com" MyCDONTSMail.Subject="Denenmis Tarif" MyBody = "Isim : " & request.form("T2") & vbCrLf MyBody = MyBody & "e-mail : " & request.form("T1") & vbCrLf MyBody = MyBody & "Tarif Çeşidi : " & request.form("Cesit") & vbCrLf MyBody = MyBody & "Tarif : " & request.form("S1") MyCDONTSMail.Body= MyBody MyCDONTSMail.Send set MyCDONTSMail=nothing %> <% end if %>