%
If Request.querystring("Send") <> "" Then
msg_txt = "Yeni İletişim Formu"
msg_txt = msg_txt & "
İsim: " & Request.form("FromName")
msg_txt = msg_txt & "
Email: " & Request.form("From")
msg_txt = msg_txt & "
Firma: " & Request.form("Firma")
msg_txt = msg_txt & "
Telefon: " & Request.form("Phone")
msg_txt = msg_txt & "
Mesaj:
" & Request.form("mesaj")
msg_txt = msg_txt & ""
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "mail.datcadesign.com"
Mail.username = "info@datcadesign.com.com"
Mail.password = "53353"
Mail.From = Request.form("From")
Mail.FromName = Request.form("FromName")
Mail.AddAddress "info@datcadesign.com"
Mail.Subject = "İletişim Formu"
Mail.IsHTML = True
Mail.Body = msg_txt
On Error Resume Next
Mail.Send
If Err <> 0 Then
msg = "Mesajınız Gönderilemedi.
" & Err.Description
else
msg = "Mesajınız Alınmıştır."
End If
End If
%>
Yet-Tur.Com.Tr Yatching Turkey
 |
 |
|
|
BODRUM

MARMARIS

FETHIYE

ANTALYA
|
|
|
<%If Request.querystring("Send") <> "" Then%>
| <%=msg%> |
<%End If%>
Contact Address:
Yetkin NAİBGİL
P.K:1 DATÇA/MUĞLA
Tel :+90 252 712 23 71
Gsm : 0 533 281 40 58
info@yet-tur.com.tr
yetkinnaibgil@yahoo.com
captainyetkin@hotmail.com
|
 |
|
 |
 |