asp生成三维饼图的函数(2)

       response.Write "</v:shapetype>"
       response.Write "<v:rect id='background' style='position:absolute;left:"&table_left&"px;top:"&table_top&"px;WIDTH:"&all_width&"px;HEIGHT:"&all_height&"px;' fillcolor='#EFEFEF' strokecolor='gray'>"
       response.Write " <v:shadow on='t' type='single' color='silver' offset='4pt,4pt'/>"
       response.Write "</v:rect>"
       response.Write "<v:group ID='table' style='position:absolute;left:"&table_left&"px;top:"&table_top&"px;WIDTH:"&all_width&"px;HEIGHT:"&all_height&"px;' coordsize = '21000,11500'>" 
       response.Write " <v:Rect style='position:relative;left:500;top:200;width:20000;height:800'filled='false' stroked='false'>"
       response.Write " <v:TextBox inset='0pt,0pt,0pt,0pt'>"
       response.Write " <table width='100%' border='0' align='center' cellspacing='0'>"
       response.Write " <tr>"
       response.Write " <td align='center' valign='middle'><div style='font-size:15pt; font-family:黑体;'><B>"&table_title&"</B></div></td>"
       response.Write " </tr>"
       response.Write " </table>"
       response.Write " </v:TextBox>"
       response.Write " </v:Rect> "
       response.Write " <v:rect id='back' style='position:relative;left:500;top:1000;width:20000; height:10000;' onmouseover='movereset(1)' onmouseout='movereset(0)' fillcolor='#9cf' strokecolor='#888888'>"
       response.Write " <v:fill rotate='t' angle='-45' focus='100%' type='gradient'/>"
       response.Write " </v:rect>"
       response.Write " <v:rect id='back' style='position:relative;left:15000;top:1400;width:5000; height:"&((num+1)*9000/11+200)&";' fillcolor='#9cf' stroked='t' strokecolor='#0099ff'>"
       response.Write " <v:fill rotate='t' angle='-175' focus='100%' type='gradient'/>"
       response.Write " <v:shadow on='t' type='single' color='silver' offset='3pt,3pt'/>"