arkadaşlar konu doğru yere açtımı bilmem ama yalnışsa özurdilerim
sorunum şu absolutepage
Verdiği hataaltta
Hata Tipi:
ADODB.Recordset (0x800A0CB3)
Geçerli Kayıt Dizisi yer işaretlerini desteklemiyor. Bu, sağlayıcının veya seçili kayıt kümesi türünün bir sınırlaması olabilir.
/vezi/indirmi.asp, line 31
Tarayıcı Tipi:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 2.0.50727)
Sayfa:
GET /vezi/default.asp
Kodlarda altta
<%
Set Sur = Server.CreateObject("ADODB.Connection")
Sur.Open="driver={mysql odbc 3.51 driver}; server=localhost; UID=root; pwd=; db=ayhan;"
%>
<%
maxid=Request.QueryString("maxid")
Set can = Server.CreateObject("ADODB.Recordset")
sor = "Select * from urun WHERE indirimli>0 order by tarih desc"
can.Open sor,Sur,1,3
%>
<%bol =3'
shf = Request.QueryString("shf")
if shf="" then
shf=1
end if
can.pagesize=2
can.absolutepage = shf
sayfala = can.pagecount 'sayfa sayysy
yuzde = CInt(100/bol) 'sütunlaryn geni?li?ini hesap
For I = 1 To can.pagesize %>
<% If not I mod bol = 0 Then %>
<% If not can.Eof Then %>
yardım ederseniz sevinirim
herkese kolay gelsin
sorunum şu absolutepage
Verdiği hataaltta
Hata Tipi:
ADODB.Recordset (0x800A0CB3)
Geçerli Kayıt Dizisi yer işaretlerini desteklemiyor. Bu, sağlayıcının veya seçili kayıt kümesi türünün bir sınırlaması olabilir.
/vezi/indirmi.asp, line 31
Tarayıcı Tipi:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 2.0.50727)
Sayfa:
GET /vezi/default.asp
Kodlarda altta
<%
Set Sur = Server.CreateObject("ADODB.Connection")
Sur.Open="driver={mysql odbc 3.51 driver}; server=localhost; UID=root; pwd=; db=ayhan;"
%>
<%
maxid=Request.QueryString("maxid")
Set can = Server.CreateObject("ADODB.Recordset")
sor = "Select * from urun WHERE indirimli>0 order by tarih desc"
can.Open sor,Sur,1,3
%>
<%bol =3'
shf = Request.QueryString("shf")
if shf="" then
shf=1
end if
can.pagesize=2
can.absolutepage = shf
sayfala = can.pagecount 'sayfa sayysy
yuzde = CInt(100/bol) 'sütunlaryn geni?li?ini hesap
For I = 1 To can.pagesize %>
<% If not I mod bol = 0 Then %>
<% If not can.Eof Then %>
yardım ederseniz sevinirim
herkese kolay gelsin