Sizce Hata Nerde?

Aşağı Git Tüm Forumlar Web Tasarım - Programlama Yazılım Geliştirme Asp / Asp.NET Sizce Hata Nerde?

Bu konudaki kullanıcılar: 1 misafir, 1 mobil kullanıcı

0
Cevap 394
Tıklama 0
Öne Çıkarma

1. sayfa

Sizce Hata Nerde?

Cevap Yaz

EEmmrraahh

20 yıl (55 mesaj)

Çavuş

Konu Sahibi

Haber Eklerken Haber içerisindeki resimler vdeolar ve Linkler wswiyg editörde (adını tam hatırlamıyom:D ) gösteriyor ama Haber anasayfasında Şöyle Çıkıyor :

>> Albümü Satın Almak için Tıkla! " target="_blank">http://muzikbazaar.com/www/product_info.php?products_id=752">>> Albümü Satın Almak için Tıkla!

Sorun ne Olabilir sizce ? Haberlerin Gösterildiği Sayfanın Kodları :

<!--#INCLUDE FILE="haber_includes/connections.asp"--> 
  <!--#INCLUDE FILE="haber_includes/pagesettings.asp"--> 
  <!--#INCLUDE FILE="haber_includes/style.inc"--> 
  <meta http-equiv="Content-Type" content="text/html; charset=windows-1254"> 
  <link rel="stylesheet" href="haber_includes/style.css" type="text/css"> 
  <title><%=StrPageTitle%></title> 
  <body bgcolor="<%=StrPageBody%>" topmargin="0" leftmargin="0"> 
  <% 
  	If Request("NewsID") = "" Then 
  		Response.Redirect "default.asp" 
  	Else 
   
  	'##-- 
   
  	If Request("a") = "plus" Then 
   
  		Set ObjMainNews = Createobject("ADODB.Recordset") 
  			ObjMainNews.Open  "SELECT * FROM TblNews Where NewsID=" & Request("NewsID") & "", ObjConn , 1 , 3 
  			If Session("StrPointLock") = Request("NewsID") Then 
  			Else 
  			ObjMainNews("StrPoint") = ObjMainNews("StrPoint") + Request("p") 
  			Session("StrPointLock") = Request("NewsID") 
  			End If 
  			ObjMainNews.Update 
  			ObjMainNews.Close() 
  		Set ObjMainNews = Nothing 
   
  		Response.Redirect "newsdetail.asp?NewsID=" & Request("NewsID") 
   
  	End If 
   
  	'##-- 
   
  	Set ObjMainNews = Createobject("ADODB.Recordset") 
  		ObjMainNews.Open  "SELECT * FROM TblNews Where NewsID=" & Request("NewsID") & " And StrStatus=True", ObjConn , 1 , 3 
  		If Session("StrReadLock") = Request("NewsID") Then 
  		Else 
  		ObjMainNews("StrRead") = ObjMainNews("StrRead") + 1 
  		Session("StrReadLock") = Request("NewsID") 
  		End If 
  		ObjMainNews.Update 
   
  	Set ObjCategorys = Createobject("ADODB.Recordset") 
  		ObjCategorys.open  "SELECT * FROM TblCategory Where CatID=" & ObjMainNews("CatID") & " And StrStatus=True", ObjConn , 1 , 3 
   
  	Set ObjSource = Createobject("ADODB.Recordset") 
  		ObjSource.open  "SELECT * FROM TblSource Where SourceID=" & ObjMainNews("SourceID") & "", ObjConn , 1 , 3 
   
  	Set ObjEditor = Createobject("ADODB.Recordset") 
  		ObjEditor.open  "SELECT * FROM TblEditors Where EditorID=" & ObjMainNews("EditorID") & "", ObjConn , 1 , 3 
   
  	Set ObjComments = Createobject("ADODB.Recordset") 
  		ObjComments.open  "SELECT * FROM TblComments Where NewsID=" & Request("NewsID") & " And StrStatus=True order by CommentsID desc", ObjConn , 1 , 3 
   
  	Set ObjRelations = Createobject("ADODB.Recordset") 
  		ObjRelations.open  "SELECT * FROM TblRelated Where NewsID=" & Request("NewsID") & " order by RelatedID desc", ObjConn , 1 , 3 
  %> 
  <center> 
  <table bgcolor="<%=StrPageTblBody%>" width="1%" border="0" cellspacing="0" cellpadding="0"> 
  	<tr> 
  		<td colspan="3"><!--#INCLUDE FILE="haber_includes/header.asp"--></td> 
  	</tr> 
  	<tr> 
  		<td bgcolor="<%=StrPageMenuLeft%>" valign="top"><!--#INCLUDE FILE="haber_includes/menu_left.asp"--></td> 
  		<td valign="top"> 
  			<table width="1%" border="0" cellspacing="0" cellpadding="0"> 
  				<tr> 
  					<td><img src="haber_images/spacer.gif" height="1" width="475"></td> 
  				</tr> 
  				<tr> 
  					<td class="main"> <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=10903378&url=default.asp" data-href="default.asp">Ana Sayfa</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=10903378&url=categorys.asp?CatID=<%=ObjCategorys("CatID")%>" data-href="categorys.asp?CatID=<%=ObjCategorys("CatID")%>"><%=ObjCategorys("Category")%></a> > <font color="red">Haber Detay</font></td> 
  				</tr> 
  				<tr> 
  					<td class="main"><hr size="0" color="#000000"></td> 
  				</tr> 
  				<tr> 
  					<td valign="top"> 
  						<center> 
  						<table width="96%" border="0" cellspacing="0" cellpadding="0"> 
  							<tr> 
  								<td valign="top"> 
  									<table class="main_2"> 
  										<tr> 
  											<td colspan="2"><b><font color="#333399" size="3"><u><%=ObjMainNews("StrSubject")%></u></font></b></td> 
  										</tr> 
  										<tr> 
  											<% If ObjMainNews("StrImage") = "0" Then %> 
  											<td width="1%" valign="top"><img src="haber_images/noimage_2.gif" height="150" width="150" border="1"></td> 
  											<% Else %> 
  											<td width="1%" valign="top"><img src="<%=ObjMainNews("StrImage")%>" height="150" width="150" border="1"></td> 
  											<% End If %> 
  											<td><%=ObjMainNews("StrFrontBody")%></td> 
  										</tr> 
  										<tr> 
  											<td colspan="2"><hr size="0"></td> 
  										</tr> 
  										<tr> 
  											<td colspan="2" valign="top"><%=FormatChar(ObjMainNews("StrBody"))%><br><br></td> 
  										</tr> 
  										<tr> 
  											<td colspan="2"><b>Haber Tarihi :</b> <%=ObjMainNews("StrDate")%></td> 
  										</tr> 
  										<tr> 
  											<td colspan="2"><b>Haber Editörü :</b> <%=ObjEditor("StrName")%></td> 
  										</tr> 
  										<tr> 
  											<td colspan="2"><b>Haber Kaynağı :</b> <%=ObjSource("Source")%><br><br></td> 
  										</tr> 
  										<tr> 
  											<td bgcolor="#E5EAEF" colspan="2"> 
  												<center> 
  												<table class="main_2"> 
  													<tr> 
  														<td>Bu habere</td> 
  														<td> 
  															<select name="StrPoint" onchange="window.location=StrPoint(selectedIndex).value"> 
  																<% For i = 0 to 10 %> 
  																<option value="newsdetail.asp?NewsID=<%=ObjMainNews("NewsID")%>&a=plus&p=<%=i%>"><%=i%></option> 
  																<% Next %> 
  															</select> 
  														</td> 
  														<td>puan verin</td> 
  													</tr> 
  												</table> 
  												</center> 
  											</td> 
  										</tr> 
  										<tr> 
  											<td colspan="2"><center>Bu haber <b><font color="red"><%=ObjMainNews("StrRead")%></font></b> kez okundu ve <b><font color="red"><%=ObjMainNews("StrPoint")%></font></b> puan aldı</center><br></td> 
  										</tr> 
  										<tr> 
  											<td bgcolor="#FEF8F9" colspan="2"> 
  												<center> 
  												<table class="main_2"> 
  													<tr> 
  														<td><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=10903378&url=addadvices.asp?NewsID=<%=ObjMainNews("NewsID")%>" data-href="addadvices.asp?NewsID=<%=ObjMainNews("NewsID")%>"><b>Bu haberi tavsiye edin</a></b></center></td> 
  													</tr> 
  													<tr> 
  														<td>Bu haberi arkadaşlarınıza tavsiye edin</td> 
  													</tr> 
  												</table> 
  												</center> 
  											</td> 
  										</tr> 
  										<tr> 
  											<td colspan="2"><br></td> 
  										</tr> 
  										<tr> 
  											<td bgcolor="#FEF8F9" colspan="2"> 
  												<center> 
  												<table class="main_2"> 
  													<tr> 
  														<td><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=10903378&url=addcomments.asp?NewsID=<%=ObjMainNews("NewsID")%>" data-href="addcomments.asp?NewsID=<%=ObjMainNews("NewsID")%>"><b>Haberi Yorumla</b></a></center></td> 
  													</tr> 
  													<% If ObjComments.EOF And ObjComments.BOF Then %> 
  													<tr> 
  														<td>Bu habere yapılmış bir yorum bulunmamaktadır</td> 
  													</tr> 
  													<%  
  														Else 
  														Do While Not ObjComments.EOF 
  													%> 
  													<tr> 
  														<td><hr size="0" color="#000000"></td> 
  													</tr> 
  													<tr> 
  														<td><%=ObjComments("StrComment")%></td> 
  													</tr> 
  													<tr> 
  														<td><b>Yazan :</b> <i><%=ObjComments("StrAuthorName")%></i> | <b>Email :</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=10903378&url=mailto:<%=ObjComments("StrAuthorEmail")%>" data-href="mailto:<%=ObjComments("StrAuthorEmail")%>"><i><%=ObjComments("StrAuthorEmail")%></i></a></td> 
  													</tr> 
  													<%  
  														ObjComments.MoveNext 
  														Loop 
  														End If 
  													%> 
  												</table> 
  												</center> 
  											</td> 
  										</tr> 
  										<tr> 
  											<td colspan="2"><br></td> 
  										</tr> 
  										<tr> 
  											<td bgcolor="#FEF8F9" colspan="2"> 
  												<center> 
  												<table class="main_2"> 
  													<tr> 
  														<td><b><center>İlişkili Haberler</center></b></td> 
  													</tr> 
  													<% If ObjRelations.EOF And ObjRelations.BOF Then %> 
  													<tr> 
  														<td>İlişkili haber bulunmamaktadır</td> 
  													</tr> 
  													<%  
  														Else 
  														Do While Not ObjRelations.EOF 
   
  														Set ObjRelationsNews = Createobject("ADODB.Recordset") 
  															ObjRelationsNews.open  "SELECT * FROM TblNews Where NewsID=" & ObjRelations("RelID") & "", ObjConn , 1 , 3 
  													%> 
  													<tr> 
  														<td><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=10903378&url=newsdetail.asp?NewsID=<%=ObjRelationsNews("NewsID")%>" data-href="newsdetail.asp?NewsID=<%=ObjRelationsNews("NewsID")%>"><%=ObjRelationsNews("StrSubject")%></a></td> 
  													</tr> 
  													<%  
  															ObjRelationsNews.Close() 
  														Set ObjRelationsNews = Nothing 
   
  														ObjRelations.MoveNext 
  														Loop 
   
  														End If 
  													%> 
  												</table> 
  											</td> 
  										</tr> 
  									</table> 
  								</td> 
  							</tr> 
  						</table> 
  						<br> 
  						</center> 
  					</td> 
  				</tr> 
  			</table> 
  		</td> 
  		<td bgcolor="#EEEEEE" valign="top"><!--#INCLUDE FILE="haber_includes/menu_right.asp"--></td> 
  	</tr> 
  	<tr> 
  		<td colspan="3"><!--#INCLUDE FILE="haber_includes/footer.asp"--></td> 
  	</tr> 
  </table> 
  <% 
  		ObjRelations.Close() 
  	Set ObjRelations = Nothing 
   
  		ObjComments.Close() 
  	Set ObjComments = Nothing 
   
  		ObjEditor.Close() 
  	Set ObjEditor = Nothing 
   
  		ObjSource.Close() 
  	Set ObjSource = Nothing 
   
  		ObjCategorys.Close() 
  	Set ObjCategorys = Nothing 
   
  		ObjMainNews.Close() 
  	Set ObjMainNews = Nothing 
   
  	End If 
  %>

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

Bir Daha Gösterme

Cevap Yaz

1. sayfa

Tüm Forumlar Web Tasarım - Programlama Yazılım Geliştirme Asp / Asp.NET Sizce Hata Nerde?