<% %> Kodları arasında html kodu yazarken " yerine tek tırnak ' kullanmalısın. Ya da %> kapatıp, normal kullanabilirsin.
Kod:
<%
dbdsn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.Mappath("anket.mdb") & ";"
Set db = Server.CreateObject("ADODB.Connection")
db.Open dbdsn
Set rs = Server.CreateObject("ADODB.Recordset")
sqlDeyim = "SELECT * FROM [admin] Where [user] =" & "'" & Request.Form("user") & "' AND [pass] =" & "'" & Request.Form("pass") & "'"
rs.Open sqlDeyim, db, 3, 3
if rs.RecordCount>=1 then %>
Hoş geldiniz sayın Adminim :P <br><br>
» <a href="listele.asp">Anket Sonuçlarını Listele</a><br>
» <a href="sil.asp">Anket Sonuçlarını Sil</a><br>
<%
else Response.Write "Kullanıcı adı veya şifre yanlış !!!"
end if
rs.Close
db.Close
%>