<%
function format_bar(bar_var,bar_body,bar_more,bar_type,bar_color)
  dim temp1
  temp1=vbcrlf&"<table border=0 cellspacing=0 cellpadding=0 width='100%' height=20><tr>" & _
	vbcrlf&"<td width=20><img border=0 src='images/"&web_skin&"/bar_"&bar_type&"_left.gif'></td>" & _
	vbcrlf&"<td background='images/"&web_skin&"/bar_"&bar_type&"_bg.gif' class=end><b>"&bar_var&"</b></td>" & _
	vbcrlf&"<td background='images/"&web_skin&"/bar_"&bar_type&"_bg.gif' align=right>"&bar_more&"</td>" & _
	vbcrlf&"<td width=20><img border=0 src='images/"&web_skin&"/bar_"&bar_type&"_right.gif'></td>" & _
	vbcrlf&"</tr></table>"
  format_bar=vbcrlf&kong&"<table border=0 cellspacing=0 cellpadding=0 width='100%'>" & _
	vbcrlf&"<tr><td>"&temp1&"</td></tr>" & _
	vbcrlf&"<tr><td"&bar_color&"><table border=0 width='100%' cellspacing=0 cellpadding=2><tr><td>"&bar_body&"</td></tr></table></td></tr>" & _
	vbcrlf&"</table>"
end function
function format_bar2(bar_var,bar_body,bar_jt,bar_color)
  dim temp1,tjt:tjt=""
  if bar_jt<>"" then tjt=img_small(bar_jt)
  format_bar2=vbcrlf&kong&"<table cellspacing=1 cellpadding=1 class=table0><tr>" & _
	vbcrlf&"<td class=td>&nbsp;"&tjt&bar_var&"</td>" & _
	vbcrlf&"<tr><td"&bar_color&" class=bg_2><table border=0 width='100%' cellspacing=0 cellpadding=2><tr><td>"&bar_body&"</td></tr></table></td></tr>" & _
	vbcrlf&"</tr></table>"
end function
function format_bar3(bar_var)
  format_bar3="<table border=0 width='97%' cellspacing=0 cellpadding=0><tr><td>"&bar_var&"</td></tr></table>"
end function
%>