<%
If request.cookies("timesshop")("username")="" Then
dim url
url=url&request.ServerVariables("SCRIPT_NAME")
if(len(trim(request.ServerVariables("QUERY_STRING")))>0) then
url=url & "?" & request.ServerVariables("QUERY_STRING")
end if
response.write url
response.Redirect "/user/login.asp?url='"&url&"'"
end if%>
<%
mz=request("mz")
totaljg=request("totaljg")
area=request("area")
city=request("city")
send=request("send")
ssmz=mz-0.5
if area="上海市区" then
'判断金额和毛重
if totaljg < 100 then
if (mz-0.5)<0 then
yfyf=6
else
yfyf=6+2*(mz-0.5)
end if
else
if (mz-0.5)<0 then
yfyf=0
else
yfyf=0+2*(mz-0.5)
end if
end if
elseif area="上海远郊" then
if totaljg<180 then
if (mz-0.5)<0 then
yfyf=8
else
yfyf=8+2*(mz-0.5)
end if
else
if (mz-0.5)<0 then
yfyf=0
else
yfyf=0+2*(mz-0.5)
end if
end if
elseif area="江浙地区" then
if send="国内平邮" then
if (mz-0.5)<0 then
yfyf=3
else
yfyf=3+3*(mz-0.5)
end if
elseif send="邮政EMS快递" then
if (mz-0.5)<0 then
yfyf=20
else
yfyf=20+3*(mz-0.5)
end if
elseif send="中铁快运" then
if (mz-0.5)<0 then
yfyf=35
else
yfyf=35+3*(mz-0.5)
end if
elseif send="申通快递" then
if (mz-0.5)<0 then
yfyf=5
else
yfyf=5+3*(mz-0.5)
end if
elseif send="上门自提" then
yfyf=0
elseif send="华宇货运" then
if (mz-0.5)<0 then
yfyf=20
else
yfyf=20+3*(mz-0.5)
end if
end if
elseif area="国内其它地区" then
if send="国内平邮" then
if (mz-0.5)<0 then
yfyf=3
else
yfyf=3+3*(mz-0.5)
end if
elseif send="邮政EMS快递" then
if (mz-0.5)<0 then
yfyf=20
else
yfyf=20+3*(mz-0.5)
end if
elseif send="中铁快运" then
if (mz-0.5)<0 then
yfyf=35
else
yfyf=35+3*(mz-0.5)
end if
elseif send="申通快递" then
if (mz-0.5)<0 then
yfyf=8
else
yfyf=8+3*(mz-0.5)
end if
elseif send="上门自提" then
yfyf=0
elseif send="华宇货运" then
if (mz-0.5)<0 then
yfyf=20
else
yfyf=20+3*(mz-0.5)
end if
end if
end if
%>
<%=webname%> ---- 运费计算
.gif){kind=small}
运费计算 .gif){kind=small}