Asp Uzmanlari Buraya

burak_yksl · 30-05-2009, 10:11 PM

arkadaslar uye giris yaptigimda bu hatalari aliyorum

Script error detected at line 31.
Source line: if session("agent_id")="" and giris<>"ok" then

sanirim hata bu kodlarda nasil duzeltebilrim??????????????

<style>

</style>
<body topmargin="0" leftmargin="0" rightmargin="0">
<%
giris=request.form("giris")
if session("agent_id")="" and giris<>"ok" then
%>
Lütfen Giriş Yapınız!... <a href=giris.asp> Tıklayınız</a>
<%
response.end
end if

yol=server.mappath("sefer.mdb")
Set rs = Server.CreateObject("ADODB.RecordSet")
Set rs2 = Server.CreateObject("ADODB.RecordSet")
Set agent_rs = Server.CreateObject("ADODB.RecordSet")

Set conn = Server.CreateObject("ADODB.Connection")
conn.open "Driver={Microsoft Access Driver (*.mdb)};DBQ="&yol
if session("agent_id")<>"" then
set agent_rs=conn.execute("select * from agent where agent_id="&session("agent_id"))

agent_isim=agent_rs("isim")
agent_soyisim=agent_rs("soyisim")
agent_bayi=agent_rs("bayi_id")
agent_seviye=agent_rs("seviye")
agent_mail=agent_rs("mail")
agent_username=agent_rs("username")
agent_pwd=agent_rs("pwd")

%>
<table border="0" cellpadding="0" cellspacing="0" style="border-width:0; border-collapse: collapse" width="100%" id="AutoNumber1" bgcolor="#0033CC">
<tr>
<td width="100%">
 Kullanıcı: <%=agent_isim&" "&agent_soyisim%>
</td>
</tr>
<tr>
<td width="100%">
 <a href="<%if agent_seviye=3 then response.write "agent_"%>default.asp" style="text-decoration: none">Ana Menü</a>    


<a href="sefer_listesi.asp" style="text-decoration: none">
Seferler</a>     

<a href="oto_duzelt.asp" style="text-decoration: none; font-weight:700">
Atama Yap</a>      

<a href="bayi_listele.asp" style="text-decoration: none; font-weight:700">
Bayiler</a>     

<a href="arama.asp" style="text-decoration: none; font-weight:700">
Arama</a>    
<a href=terket.asp style="text-decoration: none">
Çıkış</a> 
 
 </td>
</tr>
</table>


<%
end if
%>

30-05-2009, 10:11 PM	#1
burak_yksl Misafir Üyelik tarihi: Jan 2007 Mesajlar: 3 Teşekkürleri: 0 0 mesajına 0 kere teşekkür edildi.	Asp Uzmanlari Buraya arkadaslar uye giris yaptigimda bu hatalari aliyorum Script error detected at line 31. Source line: if session("agent_id")="" and giris<>"ok" then sanirim hata bu kodlarda nasil duzeltebilrim?????????????? <style> <!-- a:active { font-family: Arial; color:#000000 } a:link { font-family: Arial; color:#000000 } a:visited { font-family: Arial; color:#000000 } button { font-family: Arial; color: #000000; font-weight: bold; border: 1px solid #0066FF; background-color: #FEEDC7 } fieldset { border: 1px solid #0066FF; background-color: #FEEDC7; font-weight:bold } input { border-style: solid; border-width: 1; font-weight:bold } option { padding:0; } select { border-style:solid; border-width:1px; font-weight:bold } textarea { border-style: solid; border-width: 1; font-weight:bold } body { font-family: Verdana; border: 1px solid #0330CB; ; color:#000000 ; background-color:#CCCCCC } table { solid; font-family:Verdana; font-size:12pt } td { solid } tr { solid } --> </style> <body topmargin="0" leftmargin="0" rightmargin="0"> <% giris=request.form("giris") if session("agent_id")="" and giris<>"ok" then %> <p align="center"><b>Lütfen Giriş Yapınız!...</b><br><a href=giris.asp> Tıklayınız</a></p> <% response.end end if yol=server.mappath("sefer.mdb") Set rs = Server.CreateObject("ADODB.RecordSet") Set rs2 = Server.CreateObject("ADODB.RecordSet") Set agent_rs = Server.CreateObject("ADODB.RecordSet") Set conn = Server.CreateObject("ADODB.Connection") conn.open "Driver={Microsoft Access Driver (.mdb)};DBQ="&yol if session("agent_id")<>"" then set agent_rs=conn.execute("select from agent where agent_id="&session("agent_id")) agent_isim=agent_rs("isim") agent_soyisim=agent_rs("soyisim") agent_bayi=agent_rs("bayi_id") agent_seviye=agent_rs("seviye") agent_mail=agent_rs("mail") agent_username=agent_rs("username") agent_pwd=agent_rs("pwd") %> <table border="0" cellpadding="0" cellspacing="0" style="border-width:0; border-collapse: collapse" width="100%" id="AutoNumber1" bgcolor="#0033CC"> <tr> <td width="100%"> <p align="right"><font face="Verdana" size="2" color="#FFFFFF"><b> <u>Kullanıcı:</u> <%=agent_isim&" "&agent_soyisim%> </b></font></td> </tr> <tr> <td width="100%"> <p align="center"><b><font size="2" face="Verdana" color="#FFFF99"> </font><font size="2"><a href="<%if agent_seviye=3 then response.write "agent_"%>default.asp" style="text-decoration: none"><font face="Verdana" color="#FFFF99">Ana Menü</font></a><font face="Verdana" color="#FFFF99">     </font> <a href="sefer_listesi.asp" style="text-decoration: none"> <font face="Verdana" color="#FFFF99">Seferler</font></a><font face="Verdana" color="#FFFF99">      </font></font></b><font size="2"> <a href="oto_duzelt.asp" style="text-decoration: none; font-weight:700"> <font face="Verdana" color="#FFFF99">Atama Yap</font></a><font face="Verdana" color="#FFFF99"><b>      </b> </font> <a href="bayi_listele.asp" style="text-decoration: none; font-weight:700"> <font face="Verdana" color="#FFFF99">Bayiler</font></a><font face="Verdana" color="#FFFF99"><b>     </b> </font> <a href="arama.asp" style="text-decoration: none; font-weight:700"> <font face="Verdana" color="#FFFF99">Arama</font></a></font><b><font size="2"><font face="Verdana" color="#FFFF99">     </font><a href=terket.asp style="text-decoration: none"> <font face="Verdana" color="#FFFF99">Çıkış</font></a></font><font size="2" face="Verdana" color="#FFFF99"> </font><font size="2" face="Verdana" color="#FFFFFF"> <br>  </font></b></td> </tr> </table> <p> <% end if %>

Seçenekler
Yazdırılabilir şekli göster Sayfayı E-Mail olarak gönder
Stil
Normal Hybrid-Şeklinde gösterime geç Ağaç şeklinde gösterime geç

Forum	Yasal Uyarı	HH
Kullanılan Portal Sürümü : HH Portal Script Sürümü : vBulletin Version 3.8.4 PL1 Seo Yazılımı : vBSEO ©2009, Crawlability, Inc Copyright ©2000 - 2010, Jelsoft Enterprises Ltd. Sitemiz Internet Explorer 6+, Firefox 2.0.0.14+, Opera 9.52+, Safari 3.1.2+, Chrome 0.2.153.1+ ve 1024x768+ Ekran Çözünürlüğünde Test Edilmiştir. Sponsor Bağlantı : dövme \| mirc indir \| dövme \| mirc \| sohbet \| sohbet \| msn show	Sitemiz, hukuka, yasalara, telif haklarına ve kişilik haklarına saygılı olmayı amaç edinmiştir. Sitemiz, 5651 sayılı yasada tanımlanan .yer sağlayıcı. olarak hizmet vermektedir. İlgili yasaya göre, site yönetiminin hukuka aykırı içerikleri kontrol etme yükümlülüğü yoktur. Bu sebeple, sitemiz .uyar ve kaldır. prensibini benimsemiştir. Telif hakkına konu olan eserlerin yasal olmayan bir biçimde paylaşıldığını ve yasal haklarının çiğnendiğini düşünen hak sahipleri veya meslek birlikleri, abuse@hackhell.com mail adresinden bize ulaşabilirler. Buraya ulaşan talep ve şikayetler Hukuk Müşavirimiz tarafından incelenecek, şikayet yerinde görüldüğü takdirde ihlal olduğu düşünülen içerikler sitemizden kaldırılacaktır. Ayrıca, mahkemelerden talep gelmesi halinde hukuka aykırı içerik üreten ve hukuka aykırı paylaşımda bulunan üyelerin tespiti için gerekli teknik veriler sağlanacaktır.