数组问题

Question

有没有人在呀？？？
帮帮我吧！！！！！！！

Answer 1

<%  Dim abc(4)
  dim aaa,bbb
  aaa=0
  bbb=0
  sql="select top 5 * from Product order by ID desc"
  rs.open sql,conn,1,1
  do while not rs.eof
  cc = "xlcp_view.asp?ID="&rs("ID")
  bb = "UpLoadFile/"&rs("Ylt")
  abc(aaa)="<a href=" & cc & "><img src=" & bb & " width='120' height='90' border='0'></a> "
  rs.movenext
  aaa=aaa+1
  loop
  rs.close

%>
<textarea id="txt" style="display: none"><%= Join(abc, VBCrLf) %></textarea><script language="JavaScript">
<!--
var leftrightslide=document.getElementById("txt").value.split("\n");
//-->
</script>