yapıyorum uye dogru yanıt verince deneme.db yegidip dogru ve yanlısları ismi karsılıgında topluyor fakat
db de kendi isminin altında her sayfaya girdiğindede bos satır atıyor db ye değerleri" 0" olan en altta verdim
<meta http-equiv="Content-Language" content="tr">
<%
if session("uyedurum") = True Then
%>
<%
Set Baglanti = Server.CreateObject("ADODB.Connection")
Baglanti.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("denemem.mdb")
%>
<%
sql = "Select * from puan"
Set mahir = Server.CreateObject("Adodb.Recordset")
mahir.Open sql,Baglanti,1,3
%>
<%
mahir.AddNew
mahir("kadi")=session("kadi")
mahir.Update
%>
<%
sql = "Select * from puan WHERE kadi='"&session("kadi")&"'"
Set mahir = Server.CreateObject("Adodb.Recordset")
mahir.Open sql,Baglanti,1,3
mahir("puan")=mahir("puan")-5
mahir("dogru")=mahir("dogru")+0
mahir("yan")=mahir("yan")+1
mahir("toplam")=mahir("dogru")+mahir("yan")
mahir.Update
%>
<META HTTP-EQUIV="refresh" CONTENT="0;URL= yanlis.asp?msg=yanlis">
<%
else
response.redirect "default.asp"
end if
%>
yazan su db deneden dogru topladıgı asagıdaki satırda bos bos "0" veriyor kodda ne yanlıs:ağla:
puankuidkadipuandogruyantoplam
35 123456- 56 12 3 30
37 123456 0 0 0 0
38 123456 0 0 0 0
39 123456 0 0 0 0
db de kendi isminin altında her sayfaya girdiğindede bos satır atıyor db ye değerleri" 0" olan en altta verdim
<meta http-equiv="Content-Language" content="tr">
<%
if session("uyedurum") = True Then
%>
<%
Set Baglanti = Server.CreateObject("ADODB.Connection")
Baglanti.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("denemem.mdb")
%>
<%
sql = "Select * from puan"
Set mahir = Server.CreateObject("Adodb.Recordset")
mahir.Open sql,Baglanti,1,3
%>
<%
mahir.AddNew
mahir("kadi")=session("kadi")
mahir.Update
%>
<%
sql = "Select * from puan WHERE kadi='"&session("kadi")&"'"
Set mahir = Server.CreateObject("Adodb.Recordset")
mahir.Open sql,Baglanti,1,3
mahir("puan")=mahir("puan")-5
mahir("dogru")=mahir("dogru")+0
mahir("yan")=mahir("yan")+1
mahir("toplam")=mahir("dogru")+mahir("yan")
mahir.Update
%>
<META HTTP-EQUIV="refresh" CONTENT="0;URL= yanlis.asp?msg=yanlis">
<%
else
response.redirect "default.asp"
end if
%>
yazan su db deneden dogru topladıgı asagıdaki satırda bos bos "0" veriyor kodda ne yanlıs:ağla:
puankuidkadipuandogruyantoplam
35 123456- 56 12 3 30
37 123456 0 0 0 0
38 123456 0 0 0 0
39 123456 0 0 0 0