str="0,0,0,3,0,5,0,0,7,0,9,0,0"
arr = Split(str,",")
For i=0 To UBound(arr)
if i>0 then
if arr(i)=0 and arr(i-1)<>0 then
arr(i)=arr(i-1)
end if
end if
next
response.Write join(arr,",")
Rs.Open sqlsql ,Conn,1,1
If Not Rs.Eof Then
i=0
Do While Not Rs.Eof
i=i+1
-----------------------------------------问题是下面的如何 写代码--
if Rs(0)> 0 then
price =Rs(0)
jiage =price
else
price=jiage
end if
if price=0 then
price=0
end if
---------------------------------------------------
yaxis_data=price&yaxis_data
Rs.MoveNext
Loop
end if
Rs.Close
Response.write "yaxis_data:"&yaxis_data