• 17-05-2010, 18:19:07
    #10
    Kimlik doğrulama veya yönetimden onay bekliyor.
    Saolasınız, ama bi türlü uyarlayamadım, Kayıtları Sıralamam için tüm kodları yazabilirmisiniz

    Mesela şunun gibi;

    <%

    ' Mysql Veritabanına bağlantı kuruyorum.

    Set db = Server.CreateObject("adodb.connection" )
    db.Open = "driver={mysql odbc 3.51 driver}; server=localhost; UID=dbuser; pwd=dbpass; db=dbisim;"

    ' Tabloma bağlanıyorum.
    %>
    <%
    Set cins = db.Execute("Select * from iletisim ;" )

    Do Until cins.eof
    Kayit = Kayit +1
    %>

    İsim: (<%=Kayit%> ) <%= cins("adi" )%> <br />

    mail: (<%=cins("mail" )%> ) <a href=sil.asp?id="<%=cins("id" )%>">Silmek için tıkla</a> - <a href=duzenle.asp?id="<%=cins("id" )%>">Düzenlemek İçin Tıklayın</a><br />

    mesaj : (<%=cins("mesaj" )%> ) <br />

    <br />

    <%
    cins.MoveNext
    Loop
    %><%
    Set rs=db.Execute("select*from iletisim" )
    If rs.Eof Then ' Kayıt Yok ise Şunu yazdırsın ;

    Response.Write "Malesef! Kayıt Yok !<br><br>"
    Response.Write "<a href=default.asp> Yeni Kayıt eklemek için Buradan Buyrun.</a>"

    end if
    %>
    -------------

    yani tamamı ile Sorgulama ve verileri gösterme işlemini. ( ilgili kategoriye bağlı verileri göstermek icin) teşekkürler yardımlarınız için
  • 17-05-2010, 18:54:47
    #11
    bana özelden gönderdiğin kod şu.. çalışmaz bu şekil

    Alıntı
    <%
    Set db = Server.CreateObject("adodb.connection" )
    db.Open = "driver={mysql odbc 3.51 driver}; server=localhost; UID=username; pwd=userpass; db=dbismi;"
    %><%
    db.Execute "SET NAMES 'latin5'"
    db.Execute "SET CHARACTER SET latin5"
    db.Execute "SET COLLATION_CONNECTION = 'utf8_turkish_ci'"
    %>

    'verdiğin kodu şöyle uyguluyorum;

    <%
    id = request.querystring("katid")
    set veri= db.execute("select * from film where katID="&id&"")
    db.Open veri,Sur,1,3
    if db.eof then
    end if
    %>

    <h1
    class="componentheading">film isim - <%= rs("filmadi" )%> </h1>
    bununla düzelt
    Alıntı
    <%
    Set db = Server.CreateObject("adodb.connection" )
    db.Open = "driver={mysql odbc 3.51 driver}; server=localhost; UID=username; pwd=userpass; db=dbismi;"
    %><%
    db.Execute "SET NAMES 'latin5'"
    db.Execute "SET CHARACTER SET latin5"
    db.Execute "SET COLLATION_CONNECTION = 'utf8_turkish_ci'"
    %>

    'verdiğin kodu şöyle uyguluyorum;

    <%
    id = request.querystring("katid")
    set veri= db.execute("select * from film where katID="&id&"")
    if veri.eof then
    veri yok
    %>
    <%
    else
    %>
    <h1
    class="componentheading">film isim - <%= veri("filmadi" )%> </h1>
    <%
    end if
    %>
  • 17-05-2010, 19:05:07
    #12
    14. satır;
    Alıntı
    set veri= db.execute("select * from film where katID="&id&"")
    bu satır için Şu hatayı veriyor ;

    Alıntı
    Hata Tipi:
    Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
    [MySQL][ODBC 3.51 Driver][mysqld-5.1.46-community]You have an error in your SQL syntax; check the manual that corresponds to your MySQL server version for the right syntax to use near '' at line 1
    /deneme/kontrola.asp, line 14
    Hocam bu arada Tabloların isimleri;

    1 : Kategori
    2 : film

    2 ayrı tablo; film tablosunda filmid ve Katid bileşeni var,

    film eklerken numerik olarak kategorinin id'ini ekliyor yine,

    Kategori Tablosunda da Katid bileşeni ile Katadi bileşeni mevcut.

    Bu arada ilgili kategorinin linkini şu şekilde ayarladım;

    siteadi.com/film_kategorileri.asp?id=2&Duygusal-romantik , umarım burdada bir hata yapmıyorumdur
  • 17-05-2010, 19:12:28
    #13
    pm ile msn adresini gönder..
    birazdan hallederiz.
  • 17-05-2010, 21:44:20
    #14
    MySQL yıllardır kullanırım çok kolay ve rahat... Ama access oranla bazı değişiklikleride bilmek gerek...

    set veri= db.execute("select * from film where katID="&id&"")
    yukardaki yanlış bir kullanımdır.

    Onu şu şekilde yaz çünkü MySQL ' işaretine önem verir ve access'e oranla seçicidir.

    id = request("katID")

    set ver = db.execute("select * from film where katID = '"& id &"';")

    bu şekilde kullanırsan sorun çıkartmaz. önemli olan burada " (çift tırnaktan önce) ' (tek tırnak) kullanman gerektiğidir.

    Aşağıdaki kullanımınıda bu şekilde değil....
    siteadi.com/film_kategorileri.asp?id=2&Duygusal-romantik , umarım burdada bir hata yapmıyorumdur


    Şu şeklide kullan
    siteadi.com/film_kategorileri.asp?katID=2&katadi=Duygusal-romantik
  • 17-05-2010, 21:51:55
    #15
    Tüm mesajları okudum linklerinde tutarsızlık söz konusu...

    Link verirken : site.com/film_kategori.asp?id=2

    diyorsun...

    Ancak verileri aldığın sayfadaki gelen id requesti ise

    id = request("katID")

    burada sorgu çalışmaz...

    ya linki veriken site.com/film_kategori.asp?katID=2
    diye vereceksin.


    yada sorgu sayfasında
    id = request("id")

    diyeceksin... birinde id verip diğerinde katID isteyemezsin.
  • 17-05-2010, 22:26:34
    #16
    Arkadaş'ın pcsine girdim.. kodları temiz bir sayfaya çektim herhangi bir problem yok benim bildim tek tırnak QueryString'den gelen Kelime ise Tek tırnak kullanılır.. normal ide içinde bu şekil kullanılır "&id&""
  • 18-05-2010, 19:48:09
    #17
    Evet HayroLa Nickli Arkadaşımız Yardımcı oldu Çok teşekkür ederim konuyu takip eden olur ise, Çalışan kod şudur;

    Kategori Tablosundaki id yani auto_increment özelliğine sahip bileşen ismi Şayet KatID ise

    aşağıdaki sorguda şu bölümü " KatID="&id " yapıyoruz;

    <%
    id = Request.QueryString("id")
    set nesne = db.execute("select * from tablo where KatID="&id)
    %>
    <%
    if nesne.eof then
    response.write("Bu Kategoriye Ait Film Bilgi")
    %>
    <%else%>

    <strong> <%=nesne("konu_adi")%> </strong>

    <%end if%>


    Teşekkürler, Yardımcı olan herkeze.

    HayroLa +Rep