- Mesajlar
- 363
Arkadaşlar Asp fotoğraf galerisi var elimde ve kısa bilgi yazıldığı bir bölüm var. Bu kısa bilginin tıklandığında başlık olarak geçmesini istiyorum. Bu konu hakkında bana yardımcı olacak asp'cilerin desteğine ihtiyacım var.
Asp de <%=title%> başlık kısmına Kısa bilginin yerleşmesi
- Konbuyu başlatan beslenmeciler
- Başlangıç tarihi
- Mesajlar
- 3,863
sorununuzu tam anlayamadım ama;
link verirken;
<a href="sayfa.asp?deger=resimkategorisi1">Resim Kategori1</a>
deyin sonra bunun gösterileceği sayfada "deger" değişkenini alın ve title ye yazdırın...
<title><%=trim(request.QueryString("deger"))%></title>
verdiğim linkteki örnek için titleye "resimkategorisi1" yazacaktır.
link verirken;
<a href="sayfa.asp?deger=resimkategorisi1">Resim Kategori1</a>
deyin sonra bunun gösterileceği sayfada "deger" değişkenini alın ve title ye yazdırın...
<title><%=trim(request.QueryString("deger"))%></title>
verdiğim linkteki örnek için titleye "resimkategorisi1" yazacaktır.
- Mesajlar
- 363
Hocam öncelikle ilgine teşekkür ederim. Googlede arama yaptırdığımda resmin kısa bilgisini yazdığımda googleye indexlemesini istiyorum. Mesela hepsiburada.com sitesinde bir ürüne tıkladığımızda başlık olarak o ürünün ismi, üst kısma yerleşiyor. Ben bunu yapmaya çalışıyorum. Bir örnek daha: mesela bizim sitemizde (bilgisayarbilişim.net) herhangi bir konuya tıkladığımızda Konu başlığı üst kısma yerleşiyor. Bunu yapmaya çalışmak gibi...
- Mesajlar
- 3,863
hocam veri tabanı kullanın...
ressimler tablosu alanları
----------------------------------------------
id |resim_adres | title
diye alanlar olsun veri tabanınızda...
resimlerinizi gösterirken
<%
yol=Server.MapPath("veritabanınız.mdb")
Set vy=Server.CreateObject("ADODB.Connection")
vy.open "Provider=Microsoft.jet.oledb.4.0;data source="&yol
Set kd1=Server.CreateObject("Adodb.Recordset")
sql="Select * from ressimler order by id asc"
kd1.open sql,vy, 1,3
if kd1.eof or kd1.bof then
response.write("resim eklenmmiş")
else
do while not kd1.eof
<a href="resimler_detay.asp?baslik=<%=kd1("id")%>"><img src="<%=kd1("resim_adres")%>"/> </a>
kd1.movenext
loop
end if
kd1.close
set kd1=nothing
set vy=nothing%>
resmin üzerine tıklayınca resim_detay sayfası açılacak ve oraya baslık adında id değerini gönderdik... Şimdi diğer sayfada title'nin hemen üzerinde onu alıp yazdıracağız...
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1254"%>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-9" />
<%idd=request.QueryString("baslik")
yol=Server.MapPath("veritabanınız.mdb")
Set vy=Server.CreateObject("ADODB.Connection")
vy.open "Provider=Microsoft.jet.oledb.4.0;data source="&yol
Set kd1=Server.CreateObject("Adodb.Recordset")
sql="Select * from ressimler where id="&idd&" order by id asc"
kd1.open sql,vy, 1,3
if kd1.eof or kd1.bof then%>
<title>Hata</title>
<%else%>
<title><%=kd("title")%></title>
<%end if
kd1.close
set kd1=nothing
set vy=nothing%>%>
</head>
<body>
..
..
..
şöyleki... Gelen değere göre veri tabanımızı açıyoruz ve eğer doğru bir değer gelmediyse Title'ye "hata" yazdırıyoruz, eğer doğru değer geldiyse ilgili değerin karşısındaki "title" alanının içeriğini yazdırıyoruz...
Sanırım bu şekilde...
Kolay gelsin...
ressimler tablosu alanları
----------------------------------------------
id |resim_adres | title
diye alanlar olsun veri tabanınızda...
resimlerinizi gösterirken
<%
yol=Server.MapPath("veritabanınız.mdb")
Set vy=Server.CreateObject("ADODB.Connection")
vy.open "Provider=Microsoft.jet.oledb.4.0;data source="&yol
Set kd1=Server.CreateObject("Adodb.Recordset")
sql="Select * from ressimler order by id asc"
kd1.open sql,vy, 1,3
if kd1.eof or kd1.bof then
response.write("resim eklenmmiş")
else
do while not kd1.eof
<a href="resimler_detay.asp?baslik=<%=kd1("id")%>"><img src="<%=kd1("resim_adres")%>"/> </a>
kd1.movenext
loop
end if
kd1.close
set kd1=nothing
set vy=nothing%>
resmin üzerine tıklayınca resim_detay sayfası açılacak ve oraya baslık adında id değerini gönderdik... Şimdi diğer sayfada title'nin hemen üzerinde onu alıp yazdıracağız...
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1254"%>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-9" />
<%idd=request.QueryString("baslik")
yol=Server.MapPath("veritabanınız.mdb")
Set vy=Server.CreateObject("ADODB.Connection")
vy.open "Provider=Microsoft.jet.oledb.4.0;data source="&yol
Set kd1=Server.CreateObject("Adodb.Recordset")
sql="Select * from ressimler where id="&idd&" order by id asc"
kd1.open sql,vy, 1,3
if kd1.eof or kd1.bof then%>
<title>Hata</title>
<%else%>
<title><%=kd("title")%></title>
<%end if
kd1.close
set kd1=nothing
set vy=nothing%>%>
</head>
<body>
..
..
..
şöyleki... Gelen değere göre veri tabanımızı açıyoruz ve eğer doğru bir değer gelmediyse Title'ye "hata" yazdırıyoruz, eğer doğru değer geldiyse ilgili değerin karşısındaki "title" alanının içeriğini yazdırıyoruz...
Sanırım bu şekilde...
Kolay gelsin...