Üye Girişi
Bağlan Google+ ile Bağlan Facebook ile Bağlan
Yeni Kayıt
Tüm Forumlar
  • Tüm Forumlar
  • Web Tasarım - Programlama
  • Tasarım ve grafik
  • Bu Konuda
Şimdi Ara

Asp yardım

Sıcak Fırsatlarda Tıklananlar
Editörün Seçtiği Fırsatlar
Bu Konudaki Kullanıcılar:
2 Misafir - 2 Masaüstü
5 sn
15
Cevap
0
Favori
726
Tıklama
Daha Fazla
İstatistik
  • Konu İstatistikleri Yükleniyor
Konuya Özel
0 oy
Öne Çıkar
Cevapla
Sayfa: 1
Giriş
Mesaj
  • Arkadaşlar merhabalar.
    Aspde kategorileme ile ilgili yaptığım bi çalışma var ama galiba kodlarda bi sorun var.ilk sayfa geliyor herşey normal yalnız ilk sayfada bulunan linklere tıkladığım zaman 2.sayfada hata olduğunu söylüyor.Kodlar aşağıda belirttiğim gibidir.Acaba nerede sorun var.Rica etsem bi yardım edebilirmisiniz.Şimdiden teşekkürler.

    SAYGILARIMLA.


    a.asp sayfası 
     
      <%  
       
      Oku="DBQ="& Server.Mappath("db.mdb") &";Driver={Microsoft Access Driver (*.mdb)}"  
      Set Baglan=Server.CreateObject("Adodb.Connection")  
      Baglan.Open Oku  
      %>  
      <%  
      Set Rs=Server.CreateObject("Adodb.Recordset")  
      sorgu = "Select * from anakat"  
      Rs. Open Sorgu, Baglan, 1, 3  
      %>  
       
      <%  
      do while not rs.eof  
      %>  
      <a data-test="test" rel="nofollow" style="word-wrap: break-word; text-decoration: underline;" target="_blank" onclick="return dhExternalLinkRedirect(this)" href="/ExternalLinkRedirect?module=pgdcode&messageId=8780299&url=b.asp?id=<%=rs("id")%>" data-href="b.asp?id=<%=rs("id")%>"><%=rs("anakatismi")%></a>  
      <%  
      rs.movenext  
      loop  
      rs.close  
      set rs=nothing  
      %>



    b.asp sayfası 
     
      <%  
       
      Oku="DBQ="& Server.Mappath("db.mdb") &";Driver={Microsoft Access Driver (*.mdb)}"  
      Set Baglan=Server.CreateObject("Adodb.Connection")  
      Baglan.Open Oku  
      %>  
       
      <%  
      id=request.querystring("id")  
      Set Rs=Server.CreateObject("Adodb.Recordset")  
      sorgu = "Select * from altkat where catid="&id&" "  
      Rs. Open Sorgu, Baglan, 1, 3  
      %>  
       
       
      <%  
      do while not rs.eof  
      %>  
      <%=rs("altkatismi")%>  
      <%  
      rs.movenext  
      loop  
      rs.close  
      set rs=nothing  
      %>



    _____________________________
    IMZANIZ KURAL DIŞIDIR | | Uymanız gereken imza kurallarını okumak icin tıklayınız.




  • hangi satırda hata veriyor. http 500 hatası yazıosa seçeneklerden gelişmişe gelip açıklayıcı hata iletilerini göster satırındaki tick i kaldır. öle bak. hangi sayfada kaçıncı satırda hata varsa yazacaktır


    bir de


    <%

    Oku="DBQ="& Server.Mappath("db.mdb") &";Driver={Microsoft Access Driver (*.mdb)}"
    Set Baglan=Server.CreateObject("Adodb.Connection")
    Baglan.Open Oku
    %>
    <%
    Set Rs=Server.CreateObject("Adodb.Recordset")
    sorgu = "Select * from anakat"
    Rs. Open Sorgu, Baglan, 1, 3
    %>

    mesela çok fazla gereksiz <%%> kullanmışsn.


    <%

    Oku="DBQ="& Server.Mappath("db.mdb") &";Driver={Microsoft Access Driver (*.mdb)}"
    Set Baglan=Server.CreateObject("Adodb.Connection")
    Baglan.Open Oku
    Set Rs=Server.CreateObject("Adodb.Recordset")
    sorgu = "Select * from anakat"
    Rs. Open Sorgu, Baglan, 1, 3
    %>
    kullan daha iyi;)



    id=request.querystring("id")

    şunu b.asp de <% den sonra en başa yazar msıın.bn hep öle kullanıorum ve sorun çıkmadı. olmazsa kendi kodumu veririm sana.
    _____________________________


    Biz iki hırsız arasında kendimizi feda ederiz. Düne ait üzüntülerle yarına ait korkular. (Fulton Cursier)

    Fo+oğraf | 6GEN Fotoğraf Dergisi




  • <%
    Set Sur = Server.CreateObject("ADODB.Connection")
    Sur.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db/datalar.mdb")
    Set bertan = Server.CreateObject("ADODB.Recordset")
    sor = "Select * from kategori ORDER BY kataciklama"
    bertan.Open sor,Sur,1,3
    cats=bertan.recordcount

    function scripts(categoryid)
    set say = server.createobject("ADODB.recordset")
    sql = "select * from urunler where kid=" & categoryid & ""
    say.open sql, Sur, 1, 3
    scripts = say.recordcount
    end function
    If bertan.eof or bof Then
    response.write" "
    else
    While Not bertan.EOF
    %>




    <a data-test="test" rel="nofollow" style="word-wrap: break-word; text-decoration: underline;" target="_blank" onclick="return dhExternalLinkRedirect(this)" href="/ExternalLinkRedirect?module=pgdcode&messageId=8780850&url=urun/aspkat.asp?kid=<%=bertan("kid")%>" data-href="urun/aspkat.asp?kid=<%=bertan("kid")%>"><%=bertan("kategori_adi")%></a>



    <%
    If Not bertan.EOF Then
    bertan.MoveNext
    End If
    wend
    End if
    bertan.close
    set bertan = Nothing
    %>





    ----------------------------------------





    <% @Language=VBScript %>
    <%
    Set Sur = Server.CreateObject("ADODB.Connection")
    Sur.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../db/datalar.mdb")

    kid=Request.QueryString("kid")
    Set bertan = Server.CreateObject("ADODB.Recordset")
    sor = "Select * from urunler WHERE kid=" & kid & ""
    bertan.Open sor,Sur,1,3

    islem=Request.QueryString("islem")
    if islem="indir" then
    call indir
    end if

    git = Request.QueryString("git")
    if git="" then
    git=1
    end if
    %>

    <html>
    <body>
    <%if bertan.eof Or bof Then
    response.write "<BR><BR><CENTER>Kayıt yok</CENTER>"
    else%>


    <center>

    <%
    bertan.pagesize = 10
    bertan.absolutepage = git
    sayfa = bertan.pagecount
    for i=1 to bertan.pagesize
    if bertan.eof then exit for
    %>






    <a href="detay.asp?id=<%=bertan("id")%> alt="<%=bertan("ayrinti")%>"> <img src="<%=bertan("resim")%>" width=64
    border=0 align="center" valign="top"></a>


    <%bertan.movenext
    next %>




    </center>




    <div align="center">
    <center>
    <table border="0" cellpadding="0" cellspacing="0" width="400">
    <tr>
    <td>
    <br>
    <p align="center">Sayfa : <%
    for y=1 to sayfa
    if git=y then
    response.write y
    else
    response.write "<b> <a data-test="test" rel="nofollow" style="word-wrap: break-word; text-decoration: underline;" target="_blank" onclick="return dhExternalLinkRedirect(this)" href="/ExternalLinkRedirect?module=pgdcode&messageId=8780850&url="aspkat.asp?kid="&bertan("kid")&"&git="&y&""" data-href=""aspkat.asp?kid="&bertan("kid")&"&git="&y&""">"&y&"</a></b>"
    end if
    next
    End if%></td>
    </tr>
    </table>
    </center>
    </div>

    </body>

    </html>
    _____________________________


    Biz iki hırsız arasında kendimizi feda ederiz. Düne ait üzüntülerle yarına ait korkular. (Fulton Cursier)

    Fo+oğraf | 6GEN Fotoğraf Dergisi




  • Asp'ci öncelikle ilgilendiğin için teşekkür ediyorum.b.asp sayfası gelmiyordediğin gibi yaptım ilk satıra kodu ekledim gene olmadı.http 500 iç sunucu hatası olduğu "ulaşmaya çalıştığınız sayfada sorun var ve sayfa görüntülenemiyor." yazısı var

    hocam istersen sana sayfaları verim database ile beraber nerde hata olduğuna bi bakabilirmisin senin kodlarıda görünce kafam iyice karıştı.Aspde yeni sayılırım :(

    http://r a p i d s h a r e.de/files/29888037/id.rar
    _____________________________
    IMZANIZ KURAL DIŞIDIR | | Uymanız gereken imza kurallarını okumak icin tıklayınız.
  • o zaman db yi yanlış programladın.id alanına falan bak. şu an toplantıdayım kodlarına birzdan bakarım
    _____________________________


    Biz iki hırsız arasında kendimizi feda ederiz. Düne ait üzüntülerle yarına ait korkular. (Fulton Cursier)

    Fo+oğraf | 6GEN Fotoğraf Dergisi
  • http 500 hatasını kaldırma yöntemini söledim yukarda. onu yap.koddaki hatayı ve satırı yaz buraya
    _____________________________


    Biz iki hırsız arasında kendimizi feda ederiz. Düne ait üzüntülerle yarına ait korkular. (Fulton Cursier)

    Fo+oğraf | 6GEN Fotoğraf Dergisi
  • catid alanını not yapmışsın onu sayı yap(otomatik deil)
    _____________________________


    Biz iki hırsız arasında kendimizi feda ederiz. Düne ait üzüntülerle yarına ait korkular. (Fulton Cursier)

    Fo+oğraf | 6GEN Fotoğraf Dergisi
    • Yapay Zeka’dan İlgili Konular
    excel yardım
    12 yıl önce açıldı
    Outlook Hakkında Yardım
    7 yıl önce açıldı
    JS Uygulamayı Çalıştıramıyorum | ACİL YARDIM
    6 yıl önce açıldı
    Daha Fazla Göster
  • connection ları kapayınız, açık bırakmayınız

    baglan.close
    _____________________________
  • hata kapamamaktan dolayı olmaz her zmn.sunucuya yük getirir ama çalışır(ki unututtuğumda da çalışıo yani kodlar)ama db yanlış kodlanmış.
    _____________________________


    Biz iki hırsız arasında kendimizi feda ederiz. Düne ait üzüntülerle yarına ait korkular. (Fulton Cursier)

    Fo+oğraf | 6GEN Fotoğraf Dergisi
  • quote:

    Orjinalden alıntı: aspci

    hata kapamamaktan dolayı olmaz her zmn.sunucuya yük getirir ama çalışır(ki unututtuğumda da çalışıo yani kodlar)ama db yanlış kodlanmış.


    hata ondan olmuş demedim zaten. benimkisi sadece bir nasihat.
    _____________________________
  • quote:

    Orjinalden alıntı: Finney


    quote:

    Orjinalden alıntı: aspci

    hata kapamamaktan dolayı olmaz her zmn.sunucuya yük getirir ama çalışır(ki unututtuğumda da çalışıo yani kodlar)ama db yanlış kodlanmış.


    hata ondan olmuş demedim zaten. benimkisi sadece bir nasihat.

    haklısın,sunucuya yük.dergi bu kodda çok farketmez ama altında binlerce satır olsaydı ve kapatılmamış olsaydı o zmn sorun olur sunucuya erişim açısından
    _____________________________


    Biz iki hırsız arasında kendimizi feda ederiz. Düne ait üzüntülerle yarına ait korkular. (Fulton Cursier)

    Fo+oğraf | 6GEN Fotoğraf Dergisi
  • @aspci dediğini yaptım oldu veritabanındaymış sorun oldu çok sağol şimdi bu idleri nasıl çaoğaltıcaz ona bakalım.Yardımın için çok çok teşekkür ediyorum.
    @Finney tavsiyen için çok sağol sanada teşekkür borçluyum.
    _____________________________
    IMZANIZ KURAL DIŞIDIR | | Uymanız gereken imza kurallarını okumak icin tıklayınız.
  • o kodlar önce anakat dan hepsini listeler altkatlar ise ana katın id sine bakar catid kısmına ana kategori idlerinden yazarsın(mesela1) catid ye 1 yaz alt cat adı yaz işte.o şekilde çoaltabilirsin. ama bunları form oluşturarak yaparsan yanlış kayıtları engellersin.(mesela anakat id si 30 olan bi kayıt olmasın ama alt kat bölümünde catid ye 30 yazarsın.listelenmez ama db yi şişirir)biliorum çok karışık bi anlatımoldu...
    _____________________________


    Biz iki hırsız arasında kendimizi feda ederiz. Düne ait üzüntülerle yarına ait korkular. (Fulton Cursier)

    Fo+oğraf | 6GEN Fotoğraf Dergisi
  • Evet baya karışık anlarım olmuş.daha sade bi anlatım şekli yokmu hocam bunun.ilk yöntem kolay onu halletimde form oluşturarak yapmayı anlayamadım :(
    _____________________________
    IMZANIZ KURAL DIŞIDIR | | Uymanız gereken imza kurallarını okumak icin tıklayınız.
  • bak şöle.bildiğin klasik bir form(2 tane) birinde sadece anakategori adı almak için form oluşturcan.ordan ana kategori yazdırcan.2. formda ise <option value="id">..</option> içinde for net ya da wlihe wend döngüsü ile id yazan yere ana kategorilerin adını yazdır.altta da alt kat yazmak için bi textbox olcak.onları veritabanına kaydettircen işte. yalnız alt kategori eklerken ana kategorinin id sini kaydettirmeyi unutma
    _____________________________


    Biz iki hırsız arasında kendimizi feda ederiz. Düne ait üzüntülerle yarına ait korkular. (Fulton Cursier)

    Fo+oğraf | 6GEN Fotoğraf Dergisi
    • 
Sayfa: 1

Benzer içerikler

- x
Bildirim
mesajınız kopyalandı (ctrl+v) yapıştırmak istediğiniz yere yapıştırabilirsiniz.
Hizmet kalitesi için çerezleri kullanabiliriz, DH'yi kullanırken depoladığımız çerezlerle ilgili veri politikamıza gözatın.
Kabul Ediyorum