Şimdi Ara

<title><%=Maxicity('title')%></title> ile ilgili bir soru

Daha Fazla
Bu Konudaki Kullanıcılar: Daha Az
1 Misafir - 1 Masaüstü
5 sn
11
Cevap
0
Favori
368
Tıklama
Daha Fazla
İstatistik
  • Konu İstatistikleri Yükleniyor
0 oy
Öne Çıkar
Sayfa: 1
Giriş
Mesaj
  • selam arkadaşalar title yi veri tabanından okutmak mümkünmü mümkünse yadımcı olursanız sevinirim teşekkürler.



  • veritabanı bağlantısını yaptıktan sonra title tagi arasına <%=rs("title")%> yada <%=maxicity("title") %> dersin yani yaptığın doğru bence
  • ama hata veriyor şu anda bir daha deneme apıyorum bakalım ne olacak buraya yazarım çalışıp çalışmadığını.
  • kodları yazarsan biz yerleştiririz
  • 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>




  • 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
  • ilk önce titleyi aldıracağın tabloya bağlanman gerekiyo bağlandıkdan sonra
    <title><%=RecordSetin("baslik")%></title> şeklinde Başlığı yapabilirsin..
  • Yapay Zeka’dan İlgili Konular
    Burs ile ilgili bir soru
    13 yıl önce açıldı
    Daha Fazla Göster
  • 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.
  • <% @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>




  • açtığımız recordsetleri kapatmayı unutmayalım, aynı zamanda bağlantıları da
  • doru
  • 
Sayfa: 1
- x
Bildirim
mesajınız kopyalandı (ctrl+v) yapıştırmak istediğiniz yere yapıştırabilirsiniz.