car_menu.asp

OFFICE办公自动化

<%Function CarMenu(MenuTitle)%>
<div class="noprint">
<table border="0" width="100%" cellpadding="1" cellspacing="1" class=tab>
  <tr>
    <td align="center" bgcolor="<%if MenuTitle="车辆基本信息" then%>#F8F8F8<%else%>#FFFFFF<%end if%>" id="td1" nowrap>
      <a href="CarBase_show.asp?cid=<%=cint(cid)%>"
      <%if MenuTitle<>"车辆基本信息" then%> onMouseOver="td1.bgColor='#F8F8F8'" onMouseOut="td1.bgColor='#FFFFFF'"<%end if%>>
      车辆基本信息</a>
    </td>
    <td align="center" bgcolor="<%if MenuTitle="燃料费" then%>#F8F8F8<%else%>#FFFFFF<%end if%>" id="td3" nowrap>
      <a href="CarFee_rl_list.asp?cid=<%=cint(cid)%>"
      <%if MenuTitle<>"燃料费" then%> onMouseOver="td3.bgColor='#F8F8F8'" onMouseOut="td3.bgColor='#FFFFFF'"<%end if%>>
      燃料费</a>
    </td>
    <td align="center" bgcolor="<%if MenuTitle="洗车费" then%>#F8F8F8<%else%>#FFFFFF<%end if%>" id="td5" nowrap>
      <a href="CarFee_xc_list.asp?cid=<%=cint(cid)%>"
      <%if MenuTitle<>"洗车费" then%> onMouseOver="td5.bgColor='#F8F8F8'" onMouseOut="td5.bgColor='#FFFFFF'"<%end if%>>
      洗车费</a>
    </td>
    <td align="center" bgcolor="<%if MenuTitle="停车费" then%>#F8F8F8<%else%>#FFFFFF<%end if%>" id="td6" nowrap>
      <a href="CarFee_tc_list.asp?cid=<%=cint(cid)%>"
      <%if MenuTitle<>"停车费" then%> onMouseOver="td6.bgColor='#F8F8F8'" onMouseOut="td6.bgColor='#FFFFFF'"<%end if%>>
      停车费</a>
    </td>
    <td align="center" bgcolor="<%if MenuTitle="过桥费" then%>#F8F8F8<%else%>#FFFFFF<%end if%>" id="td7" nowrap>
      <a href="CarFee_gq_list.asp?cid=<%=cint(cid)%>"
      <%if MenuTitle<>"过桥费" then%> onMouseOver="td7.bgColor='#F8F8F8'" onMouseOut="td7.bgColor='#FFFFFF'"<%end if%>>
      过桥费</a>
    </td>
    <td align="center" bgcolor="<%if MenuTitle="过路费" then%>#F8F8F8<%else%>#FFFFFF<%end if%>" id="td8" nowrap>
      <a href="CarFee_gl_list.asp?cid=<%=cint(cid)%>"
      <%if MenuTitle<>"过路费" then%> onMouseOver="td8.bgColor='#F8F8F8'" onMouseOut="td8.bgColor='#FFFFFF'"<%end if%>>
      过路费</a>
    </td>
    <td align="center" bgcolor="<%if MenuTitle="养路费" then%>#F8F8F8<%else%>#FFFFFF<%end if%>" id="td9" nowrap>
      <a href="CarFee_yl_list.asp?cid=<%=cint(cid)%>"
      <%if MenuTitle<>"养路费" then%> onMouseOver="td9.bgColor='#F8F8F8'" onMouseOut="td9.bgColor='#FFFFFF'"<%end if%>>
      养路费</a>
    </td>
    <td align="center" bgcolor="<%if MenuTitle="保险费" then%>#F8F8F8<%else%>#FFFFFF<%end if%>" id="td10" nowrap>
      <a href="CarFee_bx_list.asp?cid=<%=cint(cid)%>"
      <%if MenuTitle<>"保险费" then%> onMouseOver="td10.bgColor='#F8F8F8'" onMouseOut="td10.bgColor='#FFFFFF'"<%end if%>>
      保险费</a>
    </td>
    <td align="center" bgcolor="<%if MenuTitle="年审费" then%>#F8F8F8<%else%>#FFFFFF<%end if%>" id="td11" nowrap>
      <a href="CarFee_ns_list.asp?cid=<%=cint(cid)%>"
      <%if MenuTitle<>"年审费" then%> onMouseOver="td11.bgColor='#F8F8F8'" onMouseOut="td11.bgColor='#FFFFFF'"<%end if%>>
      年审费</a>
    </td>
    <td align="center" bgcolor="<%if MenuTitle="维修费" then%>#F8F8F8<%else%>#FFFFFF<%end if%>" id="td4" nowrap>
      <a href="CarFee_wx_list.asp?cid=<%=cint(cid)%>"
      <%if MenuTitle<>"维修费" then%> onMouseOver="td4.bgColor='#F8F8F8'" onMouseOut="td4.bgColor='#FFFFFF'"<%end if%>>
      维修费</a>
    </td>
    <td align="center" bgcolor="<%if MenuTitle="其他费用" then%>#F8F8F8<%else%>#FFFFFF<%end if%>" id="td12" nowrap>
      <a href="CarFee_qt_list.asp?cid=<%=cint(cid)%>"
      <%if MenuTitle<>"其他费用" then%> onMouseOver="td12.bgColor='#F8F8F8'" onMouseOut="td12.bgColor='#FFFFFF'"<%end if%>>
      其他费用</a>
    </td>
    <td align="center" bgcolor="<%if MenuTitle="里程记录" then%>#F8F8F8<%else%>#FFFFFF<%end if%>" id="td2" nowrap>
      <a href="CarMileage_list.asp?cid=<%=cint(cid)%>"
      <%if MenuTitle<>"里程记录" then%> onMouseOver="td2.bgColor='#F8F8F8'" onMouseOut="td2.bgColor='#FFFFFF'"<%end if%>>
      里程记录</a>
    </td>
    <td align="center" bgcolor="<%if MenuTitle="交通事故记录" then%>#F8F8F8<%else%>#FFFFFF<%end if%>" id="td13" nowrap>
      <a href="CarAccident_list.asp?cid=<%=cint(cid)%>"
      <%if MenuTitle<>"交通事故记录" then%> onMouseOver="td13.bgColor='#F8F8F8'" onMouseOut="td13.bgColor='#FFFFFF'"<%end if%>>
      交通事故记录</a>
    </td>
  </tr>
</table>
<hr width="100%" size=1 color="#000000">
</div>
<table border="0" cellspacing='0' cellpadding='4' width="100%" class="noprint" style="border-bottom: 1 dotted #808080">
  <tr>
    <td nowrap>
      <img src="../images/icon_title.gif" align="absMiddle"> <b><%=MenuTitle%></b> (车牌号:<%=htmlout(GetTableValue("tbioaCarBase","bh","id",cid))%>)
    </td>
    <td width="85" nowrap>
      <object id="WebBrowser" width=0 height=0 classid="CLSID:8856F961-340A-11D0-A96B-00C04FD705A2" > </object>
      <img src="../images/PageSetup.gif" align="absMiddle"> <a href="#" onClick="document.all.WebBrowser.ExecWB(8,1);return false">
        页面设置</a>
    </td>
    <td width="85" nowrap>
      <img src="../images/print.gif" align="absMiddle"> <a href="#" onClick="document.all.WebBrowser.ExecWB(7,1);return false">
        打印预览</a>
    </td>
    <td width="85" nowrap>
      <img src="../images/icon_close.gif" align="absMiddle"> <a href="javascript:window.close()">
        关闭窗口</a>
    </td>
  </tr>
</table>
<div align="center" class="noscreen"><b><%=MenuTitle%></b></div>
<br>
<%End Function%> <font face="宋体" size=2>
<p>M