Gönderen Konu: Yeni Sayfa Açmak (Okunma sayısı 1677 defa)

akkoc · « : Aralık 28, 2010, 00:05:56 ÖÖ »

Arkadaşlar Merhaba uzun süredir bir soru yazmıyordum uzmanweb sayesinde iyi bir asp bilgisine sahip oldum 2 gündür uğraşmama rağmen sorunu çözemedim sorun şu sayfanın sağ köşesinde bir blog açdım yazarın makalesi blogun içinde açılıyor resimde sorumu daha iyi anlayacaksınız....

kodlarıda vereyim


<%

<%
idyazar = request.querystring("idyazar")
conn.open veri
set rs = Server.CreateObject("adodb.recordset")
sql = "Update yazarlar set hit=" & "hit + 1 where idyazar=" & idyazar
rs.open sql,conn,1,3
%>

<%
idyazar = request.querystring("idyazar")
conn.open veri
set rs = Server.CreateObject("adodb.recordset")
sql = "Select * from yazarlar where idyazar=" & idyazar
rs.open sql,conn,1,3
%>
<div align="center">
<center>
<table border="0" width="450" cellspacing="1">
<tr>
<td width="217" bgcolor="#D5EAFF"><font face=arial size=2><%=rs("baslik")%></font></td>
</center>
<td width="223" bgcolor="#D5EAFF"><p align="right"><font face=arial size=2><%=rs("adisoyadi")%></font></td>
</tr>
<center>
<tr>
<td width="442" colspan="2">
<p align="center"><% idyazar=rs("idyazar") %><font face=arial size=3><%=yazibaslik(idyazar) %></font></td>
</tr>
<tr>
<td width="442" colspan="2"><% idyazar=rs("idyazar") %><font face=arial size=2><%=yazi(idyazar) %></font><% idyazar=rs("idyazar") %><font face=arial size=2 color="#D5EAFF"><%=idyazi(idyazar) %></font></td>
</tr>
<tr>
<td width="442" colspan="2">
<p align="center"><font face="Arial" size="2" color="#000000"><font face="Verdana" size="1">

<select name="Link" onchange="if (this.options[this.selectedIndex].value != 'null') { window.open(this.options[this.selectedIndex].value,'','width=450,height=400,left=150,top=100,status=0,resizable=no,menubar=0,directories=no,toolbar=0,scrollbars=1') }" size="1" style="color: #000000; font-family: Arial; font-size: 8pt" tabIndex="0">
<option selected>Yazarın Arşivi</option>

<%
conn.open veri
set rs = Server.CreateObject("adodb.recordset")
sql = "SELECT * FROM yazilar WHERE onay=1 and idyazar=" & idyazar & " order by idyazi desc"
rs.open sql,conn,1,3
do while not rs.eof
%>
<option value="devam_yazi.asp?idyazi=<%=rs("idyazi")%>"><%=left(rs("yazibaslik"),40)%>
- <%=rs("tarih")%></option>
<% rs.movenext
loop %>
</select>

</font></font>
</td>
</tr>
</table>
</center>
</div>
<%
function yazibaslik(idyazar)
set rs1 = server.createobject("ADODB.recordset")
sql = "SELECT * FROM yazilar WHERE onay=1 and idyazar=" & idyazar & " order by idyazi desc"
rs1.open sql, conn, 1, 3
yazibaslik = rs1("yazibaslik")
end function
%>
<%
function yazi(idyazar)
set rs1 = server.createobject("ADODB.recordset")
sql = "SELECT * FROM yazilar WHERE onay=1 and idyazar=" & idyazar & " order by idyazi desc"
rs1.open sql, conn, 1, 3
yazi = rs1("yazi")
end function
%>
<%
function idyazi(idyazar)
set rs1 = server.createobject("ADODB.recordset")
sql = "Update yazilar set hit=" & "hit + 1 WHERE onay=1 and idyazar=" & idyazar
rs1.open sql, conn, 1, 3
end function
%>

sitenin adresi

http://siirhane.com

burajan · « **Yanıtla #1 :** Aralık 28, 2010, 00:23:23 ÖÖ »

Yukarıda verdiğiniz kodlar devam.asp dosyasına ait kodlar sanırım. Ama blok içinde gösterilen sayfa yazaroz klasörü altındaki default.asp olması lazım. Dolayısıyla deneme bağlantısına popup yapmak için default.asp dosyasının güncellenmesi gerekir.

akkoc · « **Yanıtla #2 :** Aralık 28, 2010, 00:27:10 ÖÖ »

<%

%>
<head>
<style>
table {font-family: arial; font-size: 11;}
a {color: #000000; text-decoration: bold}
a:hover {color: #FF0000}
body {
   font-family: arial;
   font-size: 11;
   background-color: #DFEFFF;
}
h2 {color: #000000}

</style>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"></head>
<body>
<% conn.open veri
set rs = Server.CreateObject("adodb.recordset")
rs.open ("Select * from yazarlar order by sira desc"),conn,1,3
%>
<%
function yazibaslik(idyazar)
set rs1 = server.createobject("ADODB.recordset")
sql = "SELECT * FROM yazilar WHERE onay=1 and idyazar=" & idyazar & " order by idyazi desc"
rs1.open sql, conn, 1, 3
if not rs1.eof then
yazibaslik = rs1("yazibaslik")
end if
end function
%>
<%
function yazi(idyazar)
set rs1 = server.createobject("ADODB.recordset")
sql = "SELECT * FROM yazilar WHERE onay=1 and idyazar=" & idyazar & " order by idyazi desc"
rs1.open sql, conn, 1, 3
if not rs1.eof then
yazi = left(rs1("yazi"),200)
end if
end function
%>
<% do while not rs.eof %>
<table border="0" width="135" cellspacing="1">
<tr>
<td width="129" colspan="2" bgcolor="#0060BF">
<p align="center"><font face="arial" size="2" color="white"><%=rs("baslik")%></font></td>
</tr>
<tr>
<td width="34">
<img src="<%=rs("resim")%>" width="55" height="58" border="1" align="center"></td>
<td width="91">
<p align="center"><font face=arial size=2><%=rs("adisoyadi")%></font></td>
</tr>
<tr>
<td width="129" colspan="2"><%idyazar=rs("idyazar")%><a href="devam.asp?idyazar=<%=rs("idyazar")%>">
<font size="1" face="Arial"><%=yazibaslik(idyazar)%></font>
[/url]</td>
</tr>
<tr>
<td width="129" colspan="2"><hr size="1" color="black"></td>
</tr>
</table>
<%
rs.movenext
loop
%>
<%
rs.close
set rs = nothing
%>

burda default.asp nin kodları nasıl bir kod eklersem sorun çözülecek

AdmiN · « **Yanıtla #3 :** Aralık 28, 2010, 00:29:51 ÖÖ »

iframe koduyla aşağıdaki sayfa çağırılıyor.Bu sayfada başlık kısmını düzenleyip pop up olarak açtıracak linki ekleyebilirsin.

Kod: [Seç]

http://www.siirhane.com/yazaroz/default.asp?m=y5&z1=f7f7f7&z2=efefef&y1=000000
Örnek pop-up link kodu

Kod: [Seç]

<a href="Forum"onClick="window.name='forum';window.open('http://www.siirhane.com/yazaroz/devam.asp?idyazar=19','new','toolbar=no,location=no,directories=no,status=no, menubar=no,scrollbars=no, resizable=no,copyhistory=no,width=270,height=335'); return false;">Link</a>

burajan · « **Yanıtla #4 :** Aralık 28, 2010, 00:35:28 ÖÖ »

(default.asp için)
Şu kodu bulunuz:

Kod: [Seç]

<head>Bu kodun altına şu kodu ekleyiniz:

Kod: [Seç]

<SCRIPT language=JavaScript>
 function yazarpopup(whatURL) {
        open( whatURL ,"ProjView","scrollbars=auto,width=445,height=445");
}
</SCRIPT>

Daha sonra şu kodu bulunuz:

Kod: [Seç]

<a href="devam.asp?idyazar=<%=rs("idyazar")%>">Bu kodu şu şekilde değiştiriniz:

Kod: [Seç]

<a href="javascript:yazarpopup('devam.asp?idyazar=<%=rs("idyazar")%>');">

Kısacası sizin verdiğiniz koda göre ve yukarıdaki değişiklikler yapılmış hali şudur:

Kod: [Seç]

<!--#include file="veri.asp"-->
<%

%>
<head>
<SCRIPT language=JavaScript>
 function yazarpopup(whatURL) {
        open( whatURL ,"ProjView","scrollbars=auto,width=445,height=445");
}
</SCRIPT>
<style>
table {font-family: arial; font-size: 11;}
a {color: #000000; text-decoration: bold}
a:hover {color: #FF0000}
body {
   font-family: arial;
   font-size: 11;
   background-color: #DFEFFF;
}
h2 {color: #000000}
<!--
a{text-decoration:none}
//body,td,th {
   font-size: 11px;
}
body,td,th {
   font-size: 11px;
}
-->
</style>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"></head>
<body>
<% conn.open veri
set rs = Server.CreateObject("adodb.recordset")
rs.open ("Select * from yazarlar order by sira desc"),conn,1,3
%>
<%
function yazibaslik(idyazar)
set rs1 = server.createobject("ADODB.recordset")
sql = "SELECT * FROM yazilar WHERE onay=1 and idyazar=" & idyazar & " order by idyazi desc"
rs1.open sql, conn, 1, 3
if not rs1.eof then
yazibaslik = rs1("yazibaslik")
end if
end function
%>
<%
function yazi(idyazar)
set rs1 = server.createobject("ADODB.recordset")
sql = "SELECT * FROM yazilar WHERE onay=1 and idyazar=" & idyazar & " order by idyazi desc"
rs1.open sql, conn, 1, 3
if not rs1.eof then
yazi = left(rs1("yazi"),200)
end if
end function
%>
<% do while not rs.eof %>
<table border="0" width="135" cellspacing="1">
<tr>
<td width="129" colspan="2" bgcolor="#0060BF">
<p align="center"><font face="arial" size="2" color="white"><%=rs("baslik")%></font></td>
</tr>
<tr>
<td width="34">
<img src="<%=rs("resim")%>" width="55" height="58" border="1" align="center"></td>
<td width="91">
  <p align="center"><font face=arial size=2><%=rs("adisoyadi")%></font></td>
</tr>
<tr>
<td width="129" colspan="2"><%idyazar=rs("idyazar")%><a href="javascript:yazarpopup('devam.asp?idyazar=<%=rs("idyazar")%>');">
<font size="1" face="Arial"><%=yazibaslik(idyazar)%></font>
[/url]</td>
</tr>
<tr>
<td width="129" colspan="2"><hr size="1" color="black"></td>
</tr>
</table>
<% 
rs.movenext
loop 
%>
<%
rs.close
set rs = nothing
%>

Deneyiniz.

akkoc · « **Yanıtla #5 :** Aralık 28, 2010, 00:38:48 ÖÖ »

ben blogda link çıksın istemiyorum yukarıda verdiğin kodda yazarlar kısmı bloğun içindeki link e tıklayınca popup olarak açılıyor yazarlar kısmı bloduğun içinde çıkacak ama yazarın makalesine tıklayınca popup şeklinde açılacak yazarın makalesi

sana iframe kodunuda vereyim

<iframe src=http://www.siirhane.com/yazaroz/default.asp?m=y5&z1=f7f7f7&z2=efefef&y1=000000 width=200 height=275 frameborder=0 scrolling=no></iframe>

bu kodu yazarlarim.asp olarak kaydedip



olarak bloğa include ettim

burajan · « **Yanıtla #6 :** Aralık 28, 2010, 01:04:54 ÖÖ »

default.asp içinde;

Kod: [Seç]

<a href="devam.asp?idyazar=<%=rs("idyazar")%>">
Onu şu şekilde değiştirelim:

Kod: [Seç]

<a href="javascript:yazarpopup('devam_yazi.asp?idyazi=<%=yazi(idyazar)%>');">
head kodunun altında şu koduda ekleyelim (yukarıdaki değişiklikle eklediyseniz tekrar eklemeniz gerek yoktur):

Kod: [Seç]

<SCRIPT language=JavaScript>
 function yazarpopup(whatURL) {
        open( whatURL ,"ProjView","scrollbars=auto,width=445,height=445");
}
</SCRIPT>

Yukarıdaki değişiklikle deneme linkine tıklanıldığında popup olarak deneme yazısı açılacak.

akkoc · « **Yanıtla #7 :** Aralık 28, 2010, 01:06:21 ÖÖ »

tamam kardeşim sorunum çözüldü teşekkür ettim ellerine sağlık

burajan · « **Yanıtla #8 :** Aralık 28, 2010, 01:14:41 ÖÖ »

Rica ederim.

Konu / Başlatan	Yanıt	Son İleti
Bir sayfa açmak! Başlatan oyunarea Web Tasarımı Yardım ve Destek Hattı	5 Yanıt 1861 Gösterim	Mayıs 06, 2007, 22:29:51 ÖS Gönderen: AdmiN
Farklı bir sayfa açmak için? Başlatan taho27 MWP v2.12 Destek Hattı ve Güncellemeleri	1 Yanıt 1495 Gösterim	Haziran 07, 2007, 19:23:34 ÖS Gönderen: burajan
yeni sayfa.. Başlatan AYAS Maxwebportal Destek Hattı	1 Yanıt 966 Gösterim	Şubat 15, 2008, 17:18:15 ÖS Gönderen: burajan
Sayfa içinde sayfa acmak (Çözüldü) Başlatan Taslibayir Mkportal Destek Hattı	9 Yanıt 1193 Gösterim	Ekim 05, 2010, 19:44:56 ÖS Gönderen: AdmiN
Tek tiklama ile iki sayfa acmak (html) Başlatan ataktos « 1 2 » Web Tasarımı Yardım ve Destek Hattı	10 Yanıt 1943 Gösterim	Nisan 03, 2011, 19:14:13 ÖS Gönderen: ataktos

Gönderen Konu: Yeni Sayfa Açmak (Okunma sayısı 1677 defa)

akkoc

Yeni Sayfa Açmak

burajan

-Yeni Sayfa Açmak

akkoc

-Yeni Sayfa Açmak

AdmiN

-Yeni Sayfa Açmak

burajan

-Yeni Sayfa Açmak

akkoc

-Yeni Sayfa Açmak

burajan

-Yeni Sayfa Açmak

akkoc

-Yeni Sayfa Açmak

burajan

-Yeni Sayfa Açmak

Benzer Konular