Asp Uzmanlari Buraya

burak_yksl

New member
Katılım
25 Ocak 2007
Mesajlar
5
Reaction score
0
Puanları
0
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
%>
 
Geri
Üst