Arama butonu
Bu konudaki kullanıcılar: 1 misafir
10
Cevap
364
Tıklama
0
Öne Çıkarma
<title><%=Maxicity('title')%></title> ile ilgili bir soru
M
20 yıl
Onbaşı
Konu Sahibi

selam arkadaşalar title yi veri tabanından okutmak mümkünmü mümkünse yadımcı olursanız sevinirim teşekkürler.

DH forumlarında vakit geçirmekten keyif alıyor gibisin ancak giriş yapmadığını görüyoruz.

Üye olduğunda özel mesaj gönderebilir, beğendiğin konuları favorilerine ekleyip takibe alabilir ve daha önce gezdiğin konulara hızlıca erişebilirsin.

Üye Ol Şimdi Değil



S
20 yıl
Yüzbaşı

veritabanı bağlantısını yaptıktan sonra title tagi arasına <%=rs("title")%> yada <%=maxicity("title") %> dersin yani yaptığın doğru bence


Bu mesaja 1 cevap geldi.
M
20 yıl
Onbaşı
Konu Sahibi

ama hata veriyor şu anda bir daha deneme apıyorum bakalım ne olacak buraya yazarım çalışıp çalışmadığını.


Bu mesaja 1 cevap geldi.
T
20 yıl
Yüzbaşı

kodları yazarsan biz yerleştiririz


Bu mesaja 1 cevap geldi.
M
20 yıl
Onbaşı
Konu Sahibi

arkadaşlar kod bu malesef beceremedim hep hata veriyor
aşşağıdaki linkte script tümü var yardımcı olursanız sevinirim teşekkürler.



link >>>> link script

**********************************************************************************
<% @Language=VBScript %>
<%

%>
<!-- #include file="parola.asp" -->
<%
Set Sur = Server.CreateObject("ADODB.Connection")
Sur.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("links.mdb")

Set yeniasp = Server.CreateObject("ADODB.Recordset")
sor = "Select * from links where islem like '%N%'"
yeniasp.Open sor,Sur,1,3

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

islem=Request.QueryString("islem")
if islem="sil" then
call sil
elseif islem="onay" then
call onay
else
end if
%>
<%
sub sil
id = Request("id")
Set silme = Server.CreateObject("ADODB.RecordSet")
silmek = "delete from links where id="&id&""
silme.open silmek,Sur,1,3

Response.Redirect Request.ServerVariables("HTTP_REFERER")
end sub
%>
<%
sub onay
id=Request.QueryString("id")
Set onayla = Server.CreateObject("ADODB.RecordSet")
onandi = "select * from links where id="&id&""
onayla.open onandi,Sur,1,3

onayla("islem")="Y"
onayla.Update

Response.Redirect Request.ServerVariables("HTTP_REFERER")
end sub
%>

<html>

<head>
<link rel="stylesheet" type="text/css" href="stil.css">
<meta http-equiv="Content-Language" content="tr">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1254">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>Yönetici Sayfası</title> burdaki titleyi bir türlü db den okutamadım
</head>

<body>

<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" width="350">
<tr>
<td><img border="1" src="banner.gif"></td>
</tr>
<tr>
<td height="5"></td>
</tr>
</table>
</center>
</div>
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="1" width="350" bgcolor="#FFFFFF" height="20">
<tr>
<td width="250" bgcolor="#808080"><font color="#FFFFFF"><b> Site adı</b></font></td>
<td width="100" bgcolor="#808080">
<p align="center"><font color="#FFFFFF"><b>İşlem</b></font></td>
</tr>
</table>
</center>
</div>
<%
if yeniasp.eof or yeniasp.bof then
Response.Write "<center>Onaylanmamış link yok...</center>"
Response.End
end if
%>
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="1" width="350" bgcolor="#FFFFFF">
<%
yeniasp.pagesize = 10
yeniasp.absolutepage = git
sayfa = yeniasp.pagecount
for i=1 to yeniasp.pagesize
if yeniasp.eof then exit for
%>
<tr>
<td width="250" bgcolor="#E5E5E5" height="15"> <%=yeniasp("siteadi")%></td>
<td width="100" bgcolor="#E5E5E5" height="15">
<p align="center"><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=3776011&url=admin.asp?islem=onay&id=<%=yeniasp("id")%>" data-href="admin.asp?islem=onay&id=<%=yeniasp("id")%>">Onayla</a> - <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=3776011&url=admin.asp?islem=sil&id=<%=yeniasp("id")%>" data-href="admin.asp?islem=sil&id=<%=yeniasp("id")%>">Sil</a></td>
</tr>
<%yeniasp.movenext%>
<% next %>
</table>
</center>
</div>
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" width="350">
<tr>
<td>
<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=3776011&url="admin.asp?git="&y&""" data-href=""admin.asp?git="&y&""">"&y&"</a></b>"
end if
next
%></td>
</tr>
</table>
</center>
</div>
<p align="center">Copyright © 2002, <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=3776011&url=mailto:yeniasp@yeniasp.net" data-href="mailto:yeniasp@yeniasp.net"> Zekai Filiz</a><br>
<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=3776011&url=http://www.yeniasp.net" target="_blank" data-href="http://www.yeniasp.net" target="_blank">http://www.yeniasp.net</a></p>

</body>

</html>


Bu mesaja 1 cevap geldi.
S
20 yıl
Yüzbaşı

yeni bir veritabanı bağlantısı oluşturup, öyle almalısın title yi , bunun içinde, title nin olduğu, tabloya bağlanmalısın, senin yaptığın sadece links tablosundakilerin benzerini buluyor.


zaten birazdan TEHLİKE gelir daha güzel anlatır


Bu mesaja 1 cevap geldi.
A
20 yıl
Binbaşı

ilk önce titleyi aldıracağın tabloya bağlanman gerekiyo bağlandıkdan sonra
<title><%=RecordSetin("baslik")%></title> şeklinde Başlığı yapabilirsin..


Bu mesaja 1 cevap geldi.
M
20 yıl
Onbaşı
Konu Sahibi

arkadaşlar rica etsem örnek verebilirmisiniz o kadar iyi bilmiyorum asp yi

yeni bir veritabanı baglantısını aynı sayfadamı yapacağım çok çalışmam lazım çok teşekkürler.


Bu mesaja 1 cevap geldi.
A
20 yıl
Binbaşı

<% @Language=VBScript %>
<%

%>
<!-- #include file="parola.asp" -->
<%
Set Sur = Server.CreateObject("ADODB.Connection")
Sur.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("links.mdb")

Set yeniasp = Server.CreateObject("ADODB.Recordset")
sor = "Select * from links where islem like '%N%'"
yeniasp.Open sor,Sur,1,3

Set maxiasp = Server.CreateObject("ADODB.Recordset")
sormax = "Select * from tabloadin
maxiasp.Open sormax,Sur,1,3

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

islem=Request.QueryString("islem")
if islem="sil" then
call sil
elseif islem="onay" then
call onay
else
end if
%>
<%
sub sil
id = Request("id")
Set silme = Server.CreateObject("ADODB.RecordSet")
silmek = "delete from links where id="&id&""
silme.open silmek,Sur,1,3

Response.Redirect Request.ServerVariables("HTTP_REFERER")
end sub
%>
<%
sub onay
id=Request.QueryString("id")
Set onayla = Server.CreateObject("ADODB.RecordSet")
onandi = "select * from links where id="&id&""
onayla.open onandi,Sur,1,3

onayla("islem")="Y"
onayla.Update

Response.Redirect Request.ServerVariables("HTTP_REFERER")
end sub
%>

<html>

<head>
<link rel="stylesheet" type="text/css" href="stil.css">
<meta http-equiv="Content-Language" content="tr">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1254">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title><%=maxiasp("titlen")%></title> Şimdi Okur sanırım
</head>

<body>

<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" width="350">
<tr>
<td><img border="1" src="banner.gif"></td>
</tr>
<tr>
<td height="5"></td>
</tr>
</table>
</center>
</div>
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="1" width="350" bgcolor="#FFFFFF" height="20">
<tr>
<td width="250" bgcolor="#808080"><font color="#FFFFFF"><b> Site adı</b></font></td>
<td width="100" bgcolor="#808080">
<p align="center"><font color="#FFFFFF"><b>İşlem</b></font></td>
</tr>
</table>
</center>
</div>
<%
if yeniasp.eof or yeniasp.bof then
Response.Write "<center>Onaylanmamış link yok...</center>"
Response.End
end if
%>
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="1" width="350" bgcolor="#FFFFFF">
<%
yeniasp.pagesize = 10
yeniasp.absolutepage = git
sayfa = yeniasp.pagecount
for i=1 to yeniasp.pagesize
if yeniasp.eof then exit for
%>
<tr>
<td width="250" bgcolor="#E5E5E5" height="15"> <%=yeniasp("siteadi")%></td>
<td width="100" bgcolor="#E5E5E5" height="15">
<p align="center"><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=3780634&url=admin.asp?islem=onay&id=<%=yeniasp("id")%>" data-href="admin.asp?islem=onay&id=<%=yeniasp("id")%>">Onayla</a> - <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=3780634&url=admin.asp?islem=sil&id=<%=yeniasp("id")%>" data-href="admin.asp?islem=sil&id=<%=yeniasp("id")%>">Sil</a></td>
</tr>
<%yeniasp.movenext%>
<% next %>
</table>
</center>
</div>
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" width="350">
<tr>
<td>
<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=3780634&url="admin.asp?git="&y&""" data-href=""admin.asp?git="&y&""">"&y&"</a></b>"
end if
next
%></td>
</tr>
</table>
</center>
</div>
<p align="center">Copyright © 2002, <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=3780634&url=mailto:yeniasp@yeniasp.net" data-href="mailto:yeniasp@yeniasp.net"> Zekai Filiz</a><br>
<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=3780634&url=http://www.yeniasp.net" target="_blank" data-href="http://www.yeniasp.net" target="_blank">http://www.yeniasp.net</a></p>

</body>

</html>


Bu mesaja 1 cevap geldi.
T
20 yıl
Yüzbaşı

açtığımız recordsetleri kapatmayı unutmayalım, aynı zamanda bağlantıları da


Bu mesaja 1 cevap geldi.
A
20 yıl
Binbaşı

doru



DH Mobil uygulaması ile devam edin. Mobil tarayıcınız ile mümkün olanların yanı sıra, birçok yeni ve faydalı özelliğe erişin. Gizle ve güncelleme çıkana kadar tekrar gösterme.