evaluation.asp

模块及功能： 1.汽车新闻 分类.查询.翻页 2.出售信息 搜索.评估.地区展示.发布.展示.固顶.刷新 3.求购信息 发布.展示.固顶.刷新 3.加盟商家管理 注册.登录.信

<link href="css/style.css" rel="stylesheet" type="text/css">
<title>
二手车评估
</title>
<%
year1=request("year")'年

month1=int(request("month"))'月

uselong=int(request("uselong"))'行驶路
price=int(request("price"))'原价
zk=int(request("zk"))'车况

nowyear=int(year(date()))
nowmonth=int(month(date()))


uselong=(uselong\10000)*10000

if  year1 < 1898  then

%>
    <p align="center"><font color="red"><b>请输入正确的年份</b></font> </p>
			<p align="center"><a onclick="window.close();" href="#">关闭窗口</a></p>
			
			<%else%>
			<%


yuanprice=price
price=yuanprice-(nowyear-year1)*yuanprice*0.1-(nowmonth-month1)*yuanprice*0.1/12'年月
'response.write nowyear-year1
'response.write nowmonth-month1
'response.write "价钱1："&price
price=price-uselong'行驶路程
'response.write "价钱2："&price
price=price-zk
'response.write "价钱3："&price
price=int(price)



%>


            <p align="center">评估价格：<font color="red"><b><%
            if price<=5000 then
            response.write "该车已无价值"
            else
            response.write price
            end if
            %></b></font> 元</p>
			<p align="center"><a onclick="window.close();" href="#">关闭窗口</a></p>
<%end if%>