<%response.Charset="utf-8" %> <%session.CodePage="65001"%> <%'response.write session.LCID%> <%session.LCID = 1033%> <% dim sayi1,sayi2,sayi3,sayi4,sayi5,sayi6,topsayi randomize sayi1=Round(Rnd(9) *9) sayi2=Round(Rnd(9) *9) sayi3=Round(Rnd(9) *9) sayi4=Round(Rnd(9) *9) sayi5=Round(Rnd(9) *9) sayi6=Round(Rnd(9) *9) topsayi= (sayi1) & (sayi2) & (sayi3) & (sayi4) & (sayi5) & (sayi6) session("topsayi")=topsayi if sayi1=0 then session("resim1")="http://www.gencpark.com/images/guvenlik0.gif" elseif sayi1=1 then session("resim1")="http://www.gencpark.com/images/guvenlik1.gif" elseif sayi1=2 then session("resim1")="http://www.gencpark.com/images/guvenlik2.gif" elseif sayi1=3 then session("resim1")="http://www.gencpark.com/images/guvenlik3.gif" elseif sayi1=4 then session("resim1")="http://www.gencpark.com/images/guvenlik4.gif" elseif sayi1=5 then session("resim1")="http://www.gencpark.com/images/guvenlik5.gif" elseif sayi1=6 then session("resim1")="http://www.gencpark.com/images/guvenlik6.gif" elseif sayi1=7 then session("resim1")="http://www.gencpark.com/images/guvenlik7.gif" elseif sayi1=8 then session("resim1")="http://www.gencpark.com/images/guvenlik8.gif" elseif sayi1=9 then session("resim1")="http://www.gencpark.com/images/guvenlik9.gif" end if if sayi2=0 then session("resim2")="http://www.gencpark.com/images/guvenlik0.gif" elseif sayi2=1 then session("resim2")="http://www.gencpark.com/images/guvenlik1.gif" elseif sayi2=2 then session("resim2")="http://www.gencpark.com/images/guvenlik2.gif" elseif sayi2=3 then session("resim2")="http://www.gencpark.com/images/guvenlik3.gif" elseif sayi2=4 then session("resim2")="http://www.gencpark.com/images/guvenlik4.gif" elseif sayi2=5 then session("resim2")="http://www.gencpark.com/images/guvenlik5.gif" elseif sayi2=6 then session("resim2")="http://www.gencpark.com/images/guvenlik6.gif" elseif sayi2=7 then session("resim2")="http://www.gencpark.com/images/guvenlik7.gif" elseif sayi2=8 then session("resim2")="http://www.gencpark.com/images/guvenlik8.gif" elseif sayi2=9 then session("resim2")="http://www.gencpark.com/images/guvenlik9.gif" end if if sayi3=0 then session("resim3")="http://www.gencpark.com/images/guvenlik0.gif" elseif sayi3=1 then session("resim3")="http://www.gencpark.com/images/guvenlik1.gif" elseif sayi3=2 then session("resim3")="http://www.gencpark.com/images/guvenlik2.gif" elseif sayi3=3 then session("resim3")="http://www.gencpark.com/images/guvenlik3.gif" elseif sayi3=4 then session("resim3")="http://www.gencpark.com/images/guvenlik4.gif" elseif sayi3=5 then session("resim3")="http://www.gencpark.com/images/guvenlik5.gif" elseif sayi3=6 then session("resim3")="http://www.gencpark.com/images/guvenlik6.gif" elseif sayi3=7 then session("resim3")="http://www.gencpark.com/images/guvenlik7.gif" elseif sayi3=8 then session("resim3")="http://www.gencpark.com/images/guvenlik8.gif" elseif sayi3=9 then session("resim3")="http://www.gencpark.com/images/guvenlik9.gif" end if if sayi4=0 then session("resim4")="http://www.gencpark.com/images/guvenlik0.gif" elseif sayi4=1 then session("resim4")="http://www.gencpark.com/images/guvenlik1.gif" elseif sayi4=2 then session("resim4")="http://www.gencpark.com/images/guvenlik2.gif" elseif sayi4=3 then session("resim4")="http://www.gencpark.com/images/guvenlik3.gif" elseif sayi4=4 then session("resim4")="http://www.gencpark.com/images/guvenlik4.gif" elseif sayi4=5 then session("resim4")="http://www.gencpark.com/images/guvenlik5.gif" elseif sayi4=6 then session("resim4")="http://www.gencpark.com/images/guvenlik6.gif" elseif sayi4=7 then session("resim4")="http://www.gencpark.com/images/guvenlik7.gif" elseif sayi4=8 then session("resim4")="http://www.gencpark.com/images/guvenlik8.gif" elseif sayi4=9 then session("resim4")="http://www.gencpark.com/images/guvenlik9.gif" end if if sayi5=0 then session("resim5")="http://www.gencpark.com/images/guvenlik0.gif" elseif sayi5=1 then session("resim5")="http://www.gencpark.com/images/guvenlik1.gif" elseif sayi5=2 then session("resim5")="http://www.gencpark.com/images/guvenlik2.gif" elseif sayi5=3 then session("resim5")="http://www.gencpark.com/images/guvenlik3.gif" elseif sayi5=4 then session("resim5")="http://www.gencpark.com/images/guvenlik4.gif" elseif sayi5=5 then session("resim5")="http://www.gencpark.com/images/guvenlik5.gif" elseif sayi5=6 then session("resim5")="http://www.gencpark.com/images/guvenlik6.gif" elseif sayi5=7 then session("resim5")="http://www.gencpark.com/images/guvenlik7.gif" elseif sayi5=8 then session("resim5")="http://www.gencpark.com/images/guvenlik8.gif" elseif sayi5=9 then session("resim5")="http://www.gencpark.com/images/guvenlik9.gif" end if if sayi6=0 then session("resim6")="http://www.gencpark.com/images/guvenlik0.gif" elseif sayi6=1 then session("resim6")="http://www.gencpark.com/images/guvenlik1.gif" elseif sayi6=2 then session("resim6")="http://www.gencpark.com/images/guvenlik2.gif" elseif sayi6=3 then session("resim6")="http://www.gencpark.com/images/guvenlik3.gif" elseif sayi6=4 then session("resim6")="http://www.gencpark.com/images/guvenlik4.gif" elseif sayi6=5 then session("resim6")="http://www.gencpark.com/images/guvenlik5.gif" elseif sayi6=6 then session("resim6")="http://www.gencpark.com/images/guvenlik6.gif" elseif sayi6=7 then session("resim6")="http://www.gencpark.com/images/guvenlik7.gif" elseif sayi6=8 then session("resim6")="http://www.gencpark.com/images/guvenlik8.gif" elseif sayi6=9 then session("resim6")="http://www.gencpark.com/images/guvenlik9.gif" end if %> Gençpark - Medya Pazarlama ve Organizasyon
adınız ve soyadınız
kurumunuz
telefon numaranız
e-posta adresiniz
mesajınız
güvenlik kodu
" width="17" height="17">" width="17" height="17">" width="17" height="17">" width="17" height="17">" width="17" height="17">" width="17" height="17">
güvenlik kodunu giriniz
<%If Request.querystring("Send") <> "" Then%><%=msg%><%End If%>
<% If Request.querystring("Send") <> "" Then msg_txt = "Gencpark Iletisim Formundan Mailiniz Var" msg_txt = msg_txt & "

Isim: " & Request.form("ad") msg_txt = msg_txt & "
Email: " & Request.form("eposta") msg_txt = msg_txt & "
Kurum: " & Request.form("kurum") msg_txt = msg_txt & "
Telefon:
" & Request.form("tel") msg_txt = msg_txt & "
Mesaj:
" & Request.form("mesaj") msg_txt = msg_txt & "
" Set Mail = Server.CreateObject("Persits.MailSender") Mail.Host = "mail.gencpark.com" Mail.From = Request.form("eposta") Mail.FromName = Request.form("ad") Mail.AddAddress "ugur@m3works.com" Mail.Subject = "Gencpark.com" Mail.IsHTML = True Mail.Body = msg_txt if Request.Form("modulgncprk")=Request.Form("guvenlik") Then Mail.Send msg = "" else msg = "" End if End If %>