-
看不懂你的"酒吧"這是什麼意思,簡單明瞭,否則沒人能做到。
-
不要利用你。 看看我的。
"select * from [news]",conn,1,1if and then
暫無資料"else
每頁顯示多少條資料。
<%j=1
for i=1 to x
if (j mod 2)=1 then ""%><=rs("title")%>
if j mod 2)=0 then ""
j=j+1next%>
vbcrlf )
& vbcrlf )
end sub
-
set rs="")
select * from bsort order by anclassidorder",conn,1,1
if then
目前沒有產品類別"
elsewhile not
<%=rs("anclass")%
set rs_s="")
rs_ "select * from ssort where anclassid=" rs("anclassid") order by nclassidorder",conn,1,1
if rs_ then
沒有子類別。
elsei=0
while not rs_
nid=<%rs_s("nclassid")%rs_s("nclass")%
rs_if rs_ then
elsenid=<%rs_s("nclassid")%rs_s("nclass")%
rs_end if%>
wendend if
rs_set rs_s=nothing
wendend if
set rs=nothing
-
找出 while 中的 ** 並將其刪除。
-
<%if then
沒有這方面的記錄"
elsefor ipage=1 to
<%""& rs ("name") %
if then exit for
nextend if
將上段修改如下:
if then
沒有這方面的記錄"
else><%for ipage=0 to - 1
if ipage mod 3 = 0 then ""
"><%=rs("name")%>
if ipage mod 3 = 2 then ""
if then exit for
next><%end if
-
在 3 之後結束一行,並在其中新增一行失敗。
rcd=1% do while not ( or err) %=rs("內容"模製除顫)%>
如果 rcd mod 3= 0,則“每行幾列。
end if
rcd=rcd+1
試試這個消除橋梁的想法。