ASP生成柱型体,折线图,饼图源代码(7)


            response.write "<!--[if gte vml 1]><v:line id='_x0000_s1027' alt='' style='position:absolute;left:0;text-align:left;top:0;flip:y;z-index:-1' from='"&table_x+(left_width-15)&"px,"&table_y+i&"px' to='"&table_x+left_width&"px,"&table_y+i&"px'/><![endif]-->"
            response.write "<!--[if gte vml 1]>"
            response.write "<v:shape id='_x0000_s1025' type='#_x0000_t202' alt='' style='position:absolute;left:"&table_x&"px;top:"&table_y+i&"px;width:"&left_width&"px;height:18px;z-index:1'>"
            response.write "<v:textbox inset='0px,0px,0px,0px'><table cellspacing='3' cellpadding='0' width='100%' height='100%'><tr><td align='right'>"&temp4&"</td></tr></table></v:textbox></v:shape><![endif]-->"
            temp4=temp4-temp3/5
        next
        for i=1 to total_no
            temp_space=table_x+left_width+table_space/2+table_space*(i-1)+table_width*(i-1)
            response.write "<v:rect id='_x0000_s1025' alt='' style='position:absolute;left:"
            response.write temp_space
            response.write "px;top:"
            response.write table_y+all_height*(1-(total(i,1)/temp3))
            response.write "px;width:"&table_width&"px;height:"&all_height*(total(i,1)/temp3)&"px;z-index:1' fillcolor='"&tb_color(i,2)&"'>"
            response.write "<v:fill color2='"&tb_color(i,1)&"' rotate='t' type='gradient'/>"
            response.write "<o:extrusion v:ext='view' backdepth='"&thickness&"pt' color='"&tb_color(i,2)&"' on='t'/>"
            response.write "</v:rect>"
            response.write "<v:shape id='_x0000_s1025' type='#_x0000_t202' alt='' style='position:absolute;left:"&temp_space&"px;top:"&table_y+all_height*(1-(total(i,1)/temp3))-table_width&"px;width:"&table_space+15&"px;height:18px;z-index:1'>"

内容版权声明:除非注明,否则皆为本站原创文章。

转载注明出处:http://www.heiqu.com/2962.html