Asp Title Yardım Lütfen

14-02-2007, 18:10:57

Arkadaşlar alttaki kodu kullanıyorum ama tüm sayfaların titlelerini databasedeki ilk satırı yazıyo. Mesela 15 katagori var ilk satırdaki katagorinin ismini tüm sayfalara veriyo ben nasıl her katagorinin ismini db den çekerek title olarak ayarlayabilirim çok uğraştım ama beceremedim. Yardımcı olursanız sevinirim...

<!-- #include file=inc_baglan.asp -->

<% 
Set Baglanti=Server.CreateObject("Adodb.Connection")
Baglanti.Open Cumle
Set Rs=Server.CreateObject("Adodb.Recordset")
Rs.Open "MAKALE_KATEGORI", Baglanti, 1, 3 
While Not Rs.EOF 
%>


<title><%=Rs("KATEGORI_ADI")%> Kategorisi //<%=Date%></title>
<% 
Rs.MoveNext 
Wend
%>

<%
Rs.Close
Set Rs=Nothing
Baglanti.Close
Set Baglanti=Nothing
%>

14-02-2007, 18:35:41

#2

tosih

kategorinin id sini fln request.querystring yolu ile çekip o id deki kategoriyi yazdırman lazım. =) ya mesela bnm kullandım kod şu şekilde.

Alıntı

<%
deisken=request.querystring("kat")
set cat = server.createobject("adodb.recordset")
restablo = "Select * from kategori where kimlik=" & deisken
cat.open restablo,baglanti,1,3
%>

yane id si , url de kat= den sonra gelen sayıya eşit olan kategoriyi çıkarıo bu kod. <%cat("isim")%> yazınca o kategorinin adı çıkıo. bilmem anlatabildimmi =)

14-02-2007, 19:21:09

#3

metro

ya bu kodda kendime göre değiştirmem gereken yerler neresi ve tablonun hangi bölümlerini yazmalıyım bide onu alırsam çok iyi olucak.

14-02-2007, 19:29:26

#4

tosih

kategori.asp başlangıcı..

Alıntı

<%
deisken=request.querystring("kat")
set cat = server.createobject("adodb.recordset")
restablo = "Select * from makale_kategori where kategori_ID=" & deisken
cat.open restablo,baglanti,1,3
%>
<title><%=cat("KATEGORI_ADI")%> Kategorisi //<%=Date%></title>
<%
cat.Close
Set cat=Nothing
Baglanti.Close
Set Baglanti=Nothing
%>

ve inc_baglan.asp de

Alıntı

<%
set baglanti = Server.CreateObject("ADODB.Connection")
baglanti.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("DATASEADRESİ"))
%>

bu şekilde olursa. sorun olmaz snrm..
ve kategoriyi açarken mesela http://www.domain.com/kategori.asp?kat=25 gibi olucak. mesela bu verdim adresle 25 id sine sahip kategoriyi gösterir.

14-02-2007, 19:33:52

#5

gencmania

<%
Set Sur = Server.CreateObject("ADODB.Connection")
Sur.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("databaseadi.mdb")
%>
<%
gelen=Request.QueryString("kat")
	  Set MAIN = Server.Createobject("ADODB.Recordset")
	  sqltxt="Select KATEGORI_ID, KATEGORI_ADI from MAKALE_KATEGIRI where id="&gelen&""
	  MAIN.Open sqltxt,sur,1,3
%>

<title><%=MAIN("KATEGORI_ADI")%> Kategorisi //<%=Date%></title>

<%
MAIN.Close
Set MAIN=Nothing
%>

[/QUOTE]

14-02-2007, 19:57:15

#6

gencmania

tosih arkadasımızla aynı anda atmsıız sanrım postu fakt onun ayzdı kod bence en sağlamı.

14-02-2007, 19:59:13

#7

metro

ADODB.Recordset hata '800a0bb9'

Yanlýþ türdeki deðiþkenler kabul edilebilir aralýk dýþýnda veya bir baþkasýyla çakýþan baðýmsýz deðiþkenler kullanýlýyor.

gibi bir hata aldım..

birde kullandığım sayfaların linki http://www.site.com/kategori.asp?kategori=26 şeklinde olması lazım linklerim hep öyle.

İlginiz için teşekkürler.

14-02-2007, 20:32:12

#8

tosih

deisken=request.querystring("kat")
kısmını
deisken=request.querystring("kategori")
şeklinde değiştirirsen ?kategori.asp?kategori=26 şeklini alır.

kategori.asp yi direk şu şekilde ayarla bklm.

Alıntı

<%
set baglanti = Server.CreateObject("ADODB.Connection")
baglanti.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("dbklasoru/dbadi.mdb"))
%>
<%
deisken=request.querystring("kategori")
set cat = server.createobject("adodb.recordset")
restablo = "Select * from MAKALE_KATEGORI where KATEGORI_ID=" & deisken
cat.open restablo,baglanti,1,3
%>
<title><%=cat("KATEGORI_ADI")%> Kategorisi //<%=Date%></title>
<%
cat.Close
Set cat=Nothing
Baglanti.Close
Set Baglanti=Nothing
%>

dbklasoru/dbadi.mdb i kendine göre düzenlersen bu kodla istedin olayı yapabilirsin. ancak script ise mesela inc_baglan.asp den başka veride çekio olabilir. öyle olursa hata verebilir o veriyi çekemediği için. hata olursa inc_baglan.asp nin içindeki kodları yolla bklm =)

14-02-2007, 21:17:50

#9

metro

Tosih arkadaşım çok Teşekkür ederim eline sağlık.

verdiği hatay son mesajında belirttiğin hataymış. Son mesajındaki kodu kullandım ve verdiği hata için katagori sayfasındaki  kaldırdım yerine senin verdiğin bağlantı kodunu yazdım.
Sağlıklı bir şekilde çalışıyor. + rep