<% ' On Error Resume Next Dim msg Dim gv if Request.Form("gonder") <> "" Then gv = "" gv= gv &" " gv= gv &" " gv= gv &" " gv= gv &" " gv= gv &" " gv= gv &" " gv= gv &" " gv= gv &" " gv= gv &" " gv= gv &" " gv= gv &" " gv= gv &" " gv= gv &" " gv= gv &" " gv= gv &" " gv= gv &" " gv= gv &" " gv= gv &" " gv= gv &" " gv= gv &" " gv= gv &" " gv= gv &"
SAGLAM REKLAM ILETISIM SAYFASI
ISIM" & Request.Form("isim") & "
EMAIL" & Request.Form("email") & "
TELEFON" & Request.Form("tel") & "
MESAJI" & Request.Form("mesaj") & "
" ' Email gönderme islemleri ******************************************************************** Set msg = Server.CreateObject("CDONTS.NewMail") msg.From= "info@saglamajans.com" msg.To="info@saglamajans.com" msg.Subject="sitenizden mail var" msg.BodyFormat=0 msg.MailFormat=0 msg.Body=gv if not msg.Send("info@saglamajans.com") Then aciklama = "isleminiz basari ile gerceklestirildi" Else aciklama = "." End if ' Email gönderme sonu ****************************************************************************** End if %> Untitled Document
İLETİŞİM
BİZE ULAŞIN
Akbank
Osmanbey (390) 57969  Sağlam Reklam

İş Bankası
Gayrettepe (1080) 576128  Sağlam Reklam

Kredi Kart işlemlerinizde %0 komisyon
İlan bedelini banka havalesi ve eft yaparak ödeyebilirsiniz

Tel 0212. 213 75 20
Tel 0212. 213 75 02
Fax 0212. 211 51 34
Adres

Büyükdere Caddesi No:73  Giriş Üstü  Mecidiyeköy

info@saglamajans.com saglam@saglamajans.com hacer@saglamajans.com
BİZE YAZIN
<%= aciklama %>
Adınız Soyadınız:
E-mail address:
Telefonunuz:
Mesajınız: