<%
dim sx,sy,ex,ey,color
sx=cint(200)
sy=cint(2800)
color="blue"
      sq="select  * from bout_test where g_id=1 and p_id=1"
                     set rc=conn.execute(sq)
                     if not rc.eof then 
  do while not rc.eof 
ex=200+cint(rc("id"))*100
ey=2800-cint(rc("turnout"))

%>
<Script language="javascript">
drawPolyline(<%=sx%>,<%=sy%>,<%=ex%>,<%=ey%>,"<%=color%>");
</script>
<%
sx=ex
sy=ey
rc.movenext
loop
end if
set rc=nothing
%>