• 14-02-2017, 14:46:09
    #1
    klasik asp kullanıyorum
    ..com/kiraz-bakimi-nasilyapilir/
    ..com/elma-bakimi-nasilyapilir/

    gibi 404 e düşmüş sayflarımı
    ...com/meyve-bakimi-nasıilyapılır/

    gibi urlye 301 yönlendirme yapmak istiyorum fakat bunu
    header.asp ye bir 301.asp gömerek

    eğer url "..com/kiraz-bakimi-nasilyapilir/" ise
    "...com/meyve-bakimi-nasıilyapılır/" adresine 301 yönlendir

    gibi bir kod yada fonsiyon yamaz istiyorum bu urlleri istediğim zaman çoğaltabileceğim wordpress teki redirection eklentisi gibi kullanacağım 301.asp kullanmak istiyorum
    yardımcı olabilir misiniz ?
  • 14-02-2017, 17:27:37
    #2
    Aşağıdaki şekilde ben daha önce kullandım geliştirilebilir.

    Bir databasede tabloda eski linkler ve bu linklere gelen linkleri girdim.

    Querystring ile url i alıp temizleyip veritabanından sorguluyorum eğer varsa karşılığına yönlendiriyorum yoksa direk ana sayfaya yönlendiriyorum.

    <%
    degisken = Request.QueryString

    Yonlenme = Replace(Replace(Replace(Replace(degisken,"404;http ://siteadiniz.com:80","http://www.siteadiniz.com"),":80",""),"404;https://siteadiniz.com:443","https://www.siteadiniz.com"),":443","")



    Yonlenme2 = Replace(Replace(degisken,"404;http://siteadiniz.com:80",""),":80","")

    Set Yonlendir = Baglanti.Execute("Select * From ucyuzbir where Eski = '"&Yonlenme&"'")
    If Yonlendir.Eof Then
    Response.Redirect("/")
    Else

    YeniUrl = Yonlendir("Yeni")


    Response.Write(YeniUrl)

    Response.Status="301 Moved Permanently"
    Response.AddHeader "Location",""&Replace(Yonlendir("Yeni"),",","" )&""

    Response.Redirect(Yonlendir("Yeni"))
    End If

    %>
  • 15-02-2017, 09:07:38
    #3
    Hocam tam aradığım şey Allah razı olsun.
    Internetabi adlı üyeden alıntı: mesajı görüntüle
    Aşağıdaki şekilde ben daha önce kullandım geliştirilebilir.

    Bir databasede tabloda eski linkler ve bu linklere gelen linkleri girdim.

    Querystring ile url i alıp temizleyip veritabanından sorguluyorum eğer varsa karşılığına yönlendiriyorum yoksa direk ana sayfaya yönlendiriyorum.

    <%
    degisken = Request.QueryString

    Yonlenme = Replace(Replace(Replace(Replace(degisken,"404;http ://siteadiniz.com:80","http://www.siteadiniz.com"),":80",""),"404;https://siteadiniz.com:443","https://www.siteadiniz.com"),":443","")



    Yonlenme2 = Replace(Replace(degisken,"404;http://siteadiniz.com:80",""),":80","")

    Set Yonlendir = Baglanti.Execute("Select * From ucyuzbir where Eski = '"&Yonlenme&"'")
    If Yonlendir.Eof Then
    Response.Redirect("/")
    Else

    YeniUrl = Yonlendir("Yeni")


    Response.Write(YeniUrl)

    Response.Status="301 Moved Permanently"
    Response.AddHeader "Location",""&Replace(Yonlendir("Yeni"),",","" )&""

    Response.Redirect(Yonlendir("Yeni"))
    End If

    %>