<% islem=request.QueryString("islem") select case islem case "Kaydet" ParentID=Temizle(Request.Form("ParentID")) Onay=Temizle(Request.Form("Onay")) Title=YariTemizle(Request.Form("Title")) oz1=YariTemizle(Request.Form("oz1")) oz2=YariTemizle(Request.Form("oz2")) oz3=YariTemizle(Request.Form("oz3")) oz4=YariTemizle(Request.Form("oz4")) oz5=YariTemizle(Request.Form("oz5")) oz6=YariTemizle(Request.Form("oz6")) oz7=YariTemizle(Request.Form("oz7")) Summary=YariTemizle(Request.Form("Summary")) Header=YariTemizle(Request.Form("Header")) Header3=YariTemizle(Request.Form("Header3")) Header2=YariTemizle(Request.Form("Header2")) HariciLink=YariTemizle(Request.Form("HariciLink")) HariciLinkType=Temizle(Request.Form("HariciLinkType")) MenuImage=Temizle(Request.Form("MenuImage")) MenuImageHover=Temizle(Request.Form("MenuImageHover")) Icon=Temizle(Request.Form("Icon")) UstFotograf=Temizle(Request.Form("UstFotograf")) Fotograf=Temizle(Request.Form("Fotograf")) Kucukft=Temizle(Request.Form("Kucukft")) Kucukft2=Temizle(Request.Form("Kucukft2")) Kucukft3=Temizle(Request.Form("Kucukft3")) Kucukft4=Temizle(Request.Form("Kucukft4")) Dokuman=Temizle(Request.Form("Dokuman")) LanguageID=Temizle(Request.Form("LanguageID")) Image=Temizle(Request.Form("Image")) ImageHover=Temizle(Request.Form("ImageHover")) GoogleTitle=Temizle(Request.Form("GoogleTitle")) GoogleKeyword=Temizle(Request.Form("GoogleKeyword")) GoogleDescription=Temizle(Request.Form("GoogleDescription")) PageName=Temizle(Request.Form("PageName")) FormB=Temizle(Request.Form("FormB")) SehirID=Temizle(Request.Form("SehirID")) If ParentID="" then ParentID=0 If Onay="" then Onay=0 If FormB="" then FormB=0 if ParentID="" or isnumeric(ParentID)=false then response.Redirect("?") conn.execute("insert into Table_Haberler (ParentID,SehirID,Onay,Title,oz1,oz2,oz3,oz4,oz5,oz6,oz7,Summary,Header,Header3,Header2,HariciLink,HariciLinkType,MenuImage,MenuImageHover,Image,ImageHover,Icon,UstFotograf,Fotograf,Kucukft,Kucukft2,Kucukft3,Kucukft4,Dokuman,Raw,CreatedDate,ModifyDate,GoogleTitle,GoogleKeyword,GoogleDescription,CultureID,PageName,FormB) values ('"& ParentID &"','"& SehirID &"','"& Onay &"','"& Title &"','"& oz1 &"','"& oz2 &"','"& oz3 &"','"& oz4 &"','"& oz5 &"','"& oz6 &"','"& oz7 &"','"& Summary &"','"& Header &"','"& Header3 &"','"& Header2 &"','"& HariciLink &"','"& HariciLinkType &"','"& MenuImage &"','"& MenuImageHover &"','"& Image &"','"& ImageHover &"','"& Icon &"','"& UstFotograf &"','"& Fotograf &"','"& Kucukft &"','"& Kucukft2 &"','"& Kucukft3 &"','"& Kucukft4 &"','"& Dokuman &"',0,'"& Replace(Now(),".","/") &"','"& Replace(Now(),".","/") &"','"& GoogleTitle &"','"& GoogleKeyword &"','"& GoogleDescription &"','"& LanguageID &"','"& PageName &"','"& FormB &"')") Response.Redirect("haberler.asp?LanguageID="& LanguageID &"&cid="&ParentID ) 'Set TabYonlendir = Conn.Execute("SELECT TOP 1 * FROM Table_Haberler order by CreatedDate desc") 'If not TabYonlendir.EOF Then ' Response.Redirect("haberleredit.asp?cid="& TabYonlendir("ContentID") &"& LanguageID="& LanguageID) 'end if 'TabYonlendir.Close %> <%end select%>

Bağlı Olduğu Sayfa

Ana Sayfa <% Set TabTopKat = Conn.Execute("SELECT * FROM Table_Haberler where ParentID=0 and CultureID="& LanguageID) If not TabTopKat.EOF Then Do While not TabTopKat.EOF %> " <%If cid<>"" then%> <%If cid=""& TabTopKat("ContentID") &"" then%>selected <%end if%><%end if%>><%=TabTopKat("Title")%> <% Set TabTopKatAlt = Conn.Execute("SELECT * FROM Table_Haberler where ParentID="& TabTopKat("ContentID") &" and CultureID="& LanguageID) If not TabTopKatAlt.EOF Then %> <% Do While not TabTopKatAlt.EOF %> " <%If cid<>"" then%> <%If cid=""& TabTopKatAlt("ContentID") &"" then%>selected <%end if%><%end if%>>--<%=TabTopKatAlt("Title")%> <% Set TabTopKatAlt1 = Conn.Execute("SELECT * FROM Table_Haberler where ParentID="& TabTopKatAlt("ContentID") &" and CultureID="& LanguageID) If not TabTopKatAlt1.EOF Then %> <% Do While not TabTopKatAlt1.EOF %> " <%If cid<>"" then%> <%If cid=""& TabTopKatAlt1("ContentID") &"" then%>selected <%end if%><%end if%>>----<%=TabTopKatAlt1("Title")%> <% Set TabTopKatAlt2 = Conn.Execute("SELECT * FROM Table_Haberler where ParentID="& TabTopKatAlt1("ContentID") &" and CultureID="& LanguageID) If not TabTopKatAlt2.EOF Then %> <% Do While not TabTopKatAlt2.EOF %> " <%If cid<>"" then%> <%If cid=""& TabTopKatAlt2("ContentID") &"" then%>selected <%end if%><%end if%>>------<%=TabTopKatAlt2("Title")%> <% Set TabTopKatAlt3 = Conn.Execute("SELECT * FROM Table_Haberler where ParentID="& TabTopKatAlt2("ContentID") &" and CultureID="& LanguageID) If not TabTopKatAlt3.EOF Then %> <% Do While not TabTopKatAlt3.EOF %> " <%If cid<>"" then%> <%If cid=""& TabTopKatAlt3("ContentID") &"" then%>selected <%end if%><%end if%>>--------<%=TabTopKatAlt3("Title")%> <% TabTopKatAlt3.MoveNext Loop %> <% end if TabTopKatAlt3.Close %> <% TabTopKatAlt2.MoveNext Loop %> <% end if TabTopKatAlt2.Close %> <% TabTopKatAlt1.MoveNext Loop %> <% end if TabTopKatAlt1.Close %> <% TabTopKatAlt.MoveNext Loop %> <% end if TabTopKatAlt.Close %> <% TabTopKat.MoveNext Loop end if TabTopKat.Close %>

Başlık

Diğer Başlık Kısmı İçin Kullanılacak

2. Başlık Kısmı

Özet

İçerik

Diğer Baslik veya 2 İçerik Kısmı

Harici Link

  _blank _selef

Menü İmaj

Resim Yükle

Menü İmaj Over

Resim Yükle

Üst Fotoğraf

Resim Yükle

Fotoğraf

Resim Yükle

Giriş Resmi (Bazı Bölümlerde Kucuk Resim İcin Kullanıla Bilir. Ornek/Haber/Veya Ana Sayfa Resimleri)

Resim Yükle

Ic Urun Kucuk

Resim Yükle

Ic Urun Buyuk (TIKLANINCA)

Resim Yükle

Sag Detay Buyuk Boyut (800x600px olarak ayarlana bilir.)

Resim Yükle

Döküman

Döküman Yükle

Seo Ayarları

Title

Keyword

Description

Seçenekler

Sayfayı Yayınla

Sayfa Adı