<%
set rs_s=server.CreateObject("adodb.recordset")
rs_s.open "select * from shop_fudong where id="&rs("banci"),conn,1,1
[知识问答ωωω.χiuGoo.сom]
if cint(request("songhuofangshi"))=3 then '看是不是“送货上门”
if request.Cookies("snsn")("reglx")=2 then
fudongjia_dj=rs_s("smvip")
else
fudongjia_dj=rs_s("smhy")
end if
elseif cint(request("songhuofangshi"))=1 then '看是不是“平邮”
if request.Cookies("snsn")("reglx")=2 then
fudongjia_dj=rs_s("pyvip")
else
fudongjia_dj=rs_s("pyhy")
end if
else
if request.Cookies("snsn")("reglx")=2 then
fudongjia_dj=rs_s("emsvip")
else
fudongjia_dj=rs_s("emshy")
end if
end if
response.write fudongjia_dj
rs_s.close
set rs_s=nothing
%>
大家帮忙解决一下
set rs_s=server.CreateObject("adodb.recordset")
IF rs.EOF Or rs.BOF Then
Response.Write "数据库中没有记录"
Else
rs_s.open "select * from shop_fudong where id="&rs("banci"),conn,1,1
IF rs_s.EOF Then
Response.Write "数据库中没有记录"
Else
if cint(request("songhuofangshi"))=3 then '看是不是“送货上门”
if request.Cookies("snsn")("reglx")=2 then
fudongjia_dj=rs_s("smvip")
else
fudongjia_dj=rs_s("smhy")
end if
elseif cint(request("songhuofangshi"))=1 then '看是不是“平邮”
if request.Cookies("snsn")("reglx")=2 then
fudongjia_dj=rs_s("pyvip")
else
fudongjia_dj=rs_s("pyhy")
end if
else
if request.Cookies("snsn")("reglx")=2 then
fudongjia_dj=rs_s("emsvip")
else
fudongjia_dj=rs_s("emshy")
end if
end if
response.write fudongjia_dj
End IF
rs_s.close
set rs_s=nothing
End IF