28,409
社区成员




<%
h="白色,红色,蓝色,绿色,粉色,黄色,黑色"
l="adicolor lo,adicolor hi,Century LO,Stan smith Comfort,Super Star II,Bill Memullrn For Foot Locker,none"
h_Array = Split(h,",")
l_Array = Split(l,",")
For I = 0 To Ubound(h_Array)
Response.Write h_Array(I)&l_Array(I)&"<BR>"
Next
%>
<%
Dim cnColor,i,j
cnColor=Array("白色","红色","蓝色","绿色","粉色","黄色","黑色")
for j=0 to 5
for i=0 to Ubound(cnColor)
response.write cnColor(i)
next
response.write ("</br>")
next
%>