<%set rs=server.CreateObject("Adodb.recordset")
rs.open "select * from zs_news where m_classid="&classid&" order by m_id desc",conn,1,1
rs.movenext'ÕâÐÐΪʲô²»¹ÜÓÃÄØ£¿È¥ÁËÕâÐÐÄÜÏÔʾ±¾Ìõ¼Ç¼£¬µ«ÊǼÓÉϲ»ÄÜÏÔʾÏÂÌõ¼Ç¼
response.write(rs("m_classid"))
rs.close
%>
Çë½Ì¸ßÊÖÖ¸µã
<%set rs=server.CreateObject("Adodb.recordset")
rs.open "select * from zs_news where m_classid="&classid&" order by m_id desc",conn,1,1
if not rs.eof then
rs.movenext
if not rs.eof then response.write(rs("m_classid"))
end if
rs.close
%>
ÊÔÊÔ°É
VBScript code:
<%
set rs = CreateObject("Adodb.recordset")
rs.CursorLocation = 3
rs.Open "select * from zs_news where m_classid=" & classid & " order by m_id desc", conn, 1, 1
Response.Write "¼Ç¼Êý:" & rs.RecordCount
Do While not rs.EOF
response.write rs("m_classid")
rs.MoveNext
Loop
rs.Close
conn.Close
%>
rs.movenextÒªºÍ
do while not rs.eof
....
rs.movenext
loop
×î½üÎÒͨ¹ýѧϰ£¬¸Ð¾õ×Ô¼ºÑ§µÄ»¹¿ÉÒÔÁË£¬Ïë×öÒ»ÍøÕ¾£¬µ«ÊÇÒ»Ö±¶¼ÕÒ²»µ½Ìâ²Ä£¬²»ÖªµÀ×öʲô£¬Ï£Íû¸÷λ¸øÎÒµãÒâ¼û£¬Èç¹ûÓÐÐèÇóÎĵµ¾Í¸üºÃÁË£¡Ï£Íû´ó¼Ò¸øÎÒµãÒâ¼û£¬Ð»Ð»£¡
ÏÈ×ö¸öÆóÒµÍøÕ¾°É£¬ÎҸоõÒ»¸öÈË×öÍøÕ¾²»ÊÊÒË ......
ÎÒÔÚaspÒ³Ãæ×öÁËÒ»¸ö´Ó1¿ªÊ¼ÍùÉÏÀۼӵĶ«Î÷£¬ÎªÊ²Ã´Ã¿´Îµã»÷°´Å¥Ê±ÊýÖµ¶¼²»ÍùÉϼӡ£
²»ÖªµÀʲôÔÒò£¬Çë½Ì¸ßÊÖ£¡
¿´¿´ÄãµÄ´úÂë°¡
int a=0;
a++;
txtBox.text=a.toString();
......