|
|
<% set iogr = Server.CreateObject("ADODB.Recordset")
iogr.open "SELECT* FROM siniflar order by sinif asc",erdc,1,3
if not iogr.eof then
%>
| Sıra |
Sınıf |
Duzey |
Düzenle |
<%
sira=1
do while not iogr.eof %>
| <%=sira%> |
<%=iogr("sinif")%> |
<%=iogr("duzey")%> |
 |
<% sira=sira+1
iogr.movenext
loop
iogr.close
%>
<%end if%>
|
|
<%
if islem="1" then
ders=request.form("ders_adi")
if ders<>"" then
set k_ekle = Server.CreateObject("ADODB.Recordset")
k_ekle.open "SELECT* FROM dersler where dersadi='"&ders&"'",erdc,1,3
if k_ekle.eof then
k_ekle.addnew
k_ekle("dersadi")=ders
k_ekle.update
response.Redirect("dersler.asp")
else
response.Redirect("dersler.asp")
k_ekle.close
set k_ekle=Nothing
end if
end if
end if
%>
