Arkadaşlar sayfayı aşağı indirdikçe verilerin yüklenmesini istiyorum. internette gördüğüm örnekler hep php ile. php yi asp ye uyarlamaya çalıştım ama pek başarılı olamadım. sıkıntım ajax ile post kısmında. uyarlamaya çalıştığım kod şöyle;
default.asp
<%
set db = Server.CreateObject("ADODB.Connection")
db.Open "Provider=Microsoft.ACE.OLEDB.12.0; Data Source=" & Server.MapPath("database.accdb") & ";Persist Security Info=False;"
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<script type="text/javascript" src="http://code.jquery.com/jquery-2.1.4.min.js"></script>
<script type="text/javascript">
$(function(){
$("#blok").scroll(function(){
if ($(this).scrollTop() === $(".blok").height() - $(this).height()){
$("#loader").show();
var sira = $(".blok ul li:last").attr("sira");
$.ajax({
type: "post",
url: "veri.asp",
data: {"sira":sira},
success: function(veri){
if(veri == 'bos'){
$("#loader").html("Başka Veri Yok");
}else{
$(".blok ul").append(veri);
$("#loader").hide();
}
}
});
};
});
});
</script>
<style type="text/css">
body{margin:auto;font:12px/21px Geneva, Arial, Helvetica, sans-serif;}
ul,li{padding:0;margin:0;list-style:none;}
#blok{width:250px; height:300px; position:fixed; top:0; right:0; background-color:#F1F1F1; border:#CCCCCC 1px solid; overflow:auto;}
.blok ul li{ padding:10px; border-bottom:1px solid #ddd;}
#loader{background:#FFFFFF; border:1px solid #CCCCCC; margin:10px; padding:8px; text-align:center; display:none;}
</style>
</head>
<body>
<div id="blok">
<div class="blok">
<ul>
<%
j=1
Set WM=Server.CreateObject("ADODB.Recordset")
sor = "Select * from fotolar order by sira desc"
WM.Open sor,db,1,3
do while j<11 and not WM.eof
%>
<li>
<%=WM("baslik")%> (<%=WM("sira")%>)
</li>
<%
WM.movenext
j=j+1
loop
%>
</ul>
<div id="loader"><img src="loader.gif" width="18" height="18" /></div>
</div>
</div>
</body>
</html>veri.asp
<%
set db = Server.CreateObject("ADODB.Connection")
db.Open "Provider=Microsoft.ACE.OLEDB.12.0; Data Source=" & Server.MapPath("database.accdb") & ";Persist Security Info=False;"
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
</head>
<body>
<%if request.Form("sira") = 1 then%>
Bitti
<%else%>
<%
j=1
Set WM=Server.CreateObject("ADODB.Recordset")
sor = "Select * from fotolar where sira < "&request.form("sira")&" order by sira desc"
WM.Open sor,db,1,3
do while j<11 and not WM.eof
%>
<li>
<%=WM("baslik")%> (<%=WM("sira")%>)
</li>
<%
WM.movenext
j=j+1
loop
%>
<%end if%>
</body>
</html>default.asp içindeki javascript kodunda data kısmını elle girdiğimde oluyor da oraya ben en son görünen verinin sirasını nasıl yazdıracağım anlayamadım.