Gönderen: 24-Ağustos-2007 Saat 23:02 | Kayıtlı IP

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1254"%>
<%
Set baglanti = Server.CreateObject("ADODB.Connection")
baglanti.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("haber.mdb")
%>
 
<%
kadi=request.form("kadi")
sifre=request.form("sifre")

Set rs=Server.CreateObject("ADODB.Recordset")
sorgu= "select * from admin where kadi='"&kadi&"' and sifre='"&sifre&"'"
rs.Open sorgu,baglanti

if rs("admin")="1" then
session("yonetim")=true
session("kadi")=kadi
response.redirect "admin.asp"
else
response.redirect "login.asp"
end if
%>

yönetici giriş sayfası hazırlıyorum.şu hatayı veriyor

Hata Tipi:
Microsoft VBScript derleme hatası (0x800A0401)
Deyim sonu gerekli
/acpl/haber/admin.asp, line 2, column 24
session("yonetim")=true then

yardımcı olursanız sevinirim