ASP标签式循环(goto)

soundtbugle 2008-11-28 02:25:15
有两个一维数组:a,b
先读a:-->如果a不足6个元素,再去读b数组
反之从a中读6个元素.再去读b数组
再读b:-->要求同a一样

类4嵌套循环
...全文
110 6 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
soundtbugle 2008-11-29
  • 打赏
  • 举报
回复
怎么没人回答呀!是太难了?
soundtbugle 2008-11-29
  • 打赏
  • 举报
回复
我去你公司找你好了!你给我的都让我丢了!不幸
街头小贩 2008-11-29
  • 打赏
  • 举报
回复
你个撒蛋!把我以前给你的哪个企业列表改一下就行了!
soundtbugle 2008-11-28
  • 打赏
  • 举报
回复

Dim jj:jj=0
Dim ri:ri=0
for each tmpimage in imglogolink
Dim tmpimgarray:tmpimgarray=split(tmpimage,"%")
Response.Write "<li><a href="""&tmpimgarray(1)&""" target=""_blank""><img src="""&tmpimgarray(2)&""" title="""&tmpimgarray(0)&""" width='88' height='31'/></a></li>"
ri=ri+1
if ri / 9 >1 And ri mod 9=0 then
jj=jj+1
end if
if ri mod 9=0 And ri>0 then
Call printCharacterSiteLink(jj)
end if
next
if UBound(imglogolink)<9 then Call printCharacterSiteLink(0)
end Sub

Sub printCharacterSiteLink(strIndex)
Dim charsymbol:charsymbol=0
'Response.Write strIndex*6
for j=strIndex*9 to UBound(charlink)
Dim tempchararray:tempchararray=split(charlink(j),"%")
Response.Write "<li><a href="""&tempchararray(1)&""" target=""_blank"" class=""charfont"">"&tempchararray(0)&"</a></li>"
charsymbol=charsymbol+1
if charsymbol=9 then exit sub
next
End Sub


这个有问题!
soundtbugle 2008-11-28
  • 打赏
  • 举报
回复
[Quote=引用 1 楼 zq9811 的回复:]
楼主太懒了吧 自己动手先写写撒 这样才深刻
[/Quote]
我写了!只是遇到问题才来问的!
  • 打赏
  • 举报
回复
楼主太懒了吧 自己动手先写写撒 这样才深刻

4,009

社区成员

发帖
与我相关
我的任务
社区描述
它是一种微软环境下的轻量级的解释型语言,它使用COM组件、WMI、WSH、ADSI访问系统中的元素,对系统进行管理。
社区管理员
  • vbScript社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧