- جۇغلانما
- 509
تىزىملاتقان2010-10-14
ئاخىرقى قېتىم1970-1-1
توردا سائەت
دوست
|
ئەسسالامۇ ئەلەيكۇم ئىنتىل سەيناسىدىكى قىرىنداشلار مەن تور بەت ياساشنى يىڭى ئۈگۈنۈۋاتقان ئىدىم، ئۇچۇرلارنا بەتكە بۆلاپ چىقىرىشتا ئازراق خاتالىق چىقىپ قالدى بىراق خاتالىقنى پەقەت تاپالمىدىم شۇڭا مۇنبەردىكى قىرىنداشلاردىن ياردەم سوراپ باقاي دەپ بۇ تىمىنى يىزىپ ئولتۇرۇپتىمەن .
خاتالىق مۇنداق : ئۇچۇرلارنى بەتكە بۆلگەندە ھەممە بەتتە نورمال لىكىن ئەڭ ئاخىرقى بەتكە كىرگەندە ئاستىدىكى بەت سانى يوقاپ كىتىپ بارىدۇ
بەتنى ھەقسىز بوشلۇققا يوللاپ قويدۇم خالىغان بىر تۈرنى ئىچىپ ئەڭ ئاخىرقى بەتكە كىرىپ قاراپ باقساڭلار ئەگەر بىلسەڭلار ياردىمىڭلارنى ئايىمىغايسىلەر
تور ئادرىسى :
http://bilikyurt.3vfree.net
كودنىمۇ قوشۇپ يوللۇدۇم كۆرۈپ باقساڭلار- <%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
-
- <%
- dim tur,page
- tur=request.QueryString("tur")
- set rs=server.CreateObject("adodb.recordset")
- sql="select * from tur where id="&tur&"and turid=0"
- rs.open sql,conn,1,1
- if rs.eof then
- call errorback("此类不存在!")
- end if
- %>
-
<%=rs("turname")%>
- <%
- call close(rs)
- %>
- <%
- set rs=server.CreateObject("adodb.recordset")
- sql="select * from movies where tur=" & tur '& "order by id desc"
- rs.open sql,conn,1,1
- rs.pagesize=7
- page=request.QueryString("page")
- if page="" then page=1
- if not isnumeric(page) then page=1
- if clng(page) < 1 then page=1
- if clng(page) > rs.pagecount then page=rs.pagecount
- if not rs.eof then
- rs.absolutepage=page
- end if
- if not rs.eof then
- for i=1 to rs.pagesize
- if rs.eof then exit for
- isim=rs("isim")
- if len(isim) > 19 then
- isim="..."&left(isim,19)
- end if
- %>
-
-
- &id=<%=rs("id")%>" title="<%=rs("isim")%>" target="_blank">" />
-
- &id=<%=rs("id")%>" title="<%=rs("isim")%>" target="_blank"><%=isim%>
-
- <%=rs("visit")%> : ئاۋاتلىقى
-
- <%
- rs.movenext
- next
- else
- %>
<%response.Write "بۇ تۈرگە ۋاختىنچە فىلىم قوشۇلمىغان"%>
- <%
- end if
- %>
- <%
- for i=1 to rs.pagecount
- if rs.eof then exit for
- %>
- &page=<%=i%>"><%=i%>
- <%
- next
- %>
- <%
- call close(rs)
- call close(conn)
- %>
مەزمۇننى كۆچۈرۈۋېلىش ئىملاغا دىققەت قىلىڭ . ۋاقتىڭىز بولسا تۈزىتىپ قويۇڭ . بۇ يازمىنى ئاخىرىدا altirix تەھرىرلىگەن. ۋاقتى 2012-5-24 23:10
|
|