<table width="100%" border="0" cellspacing="5" cellpadding="0">
                <tr>
                  <td>&nbsp;</td>
                  <td>商品所在地：</td>
                  <% Set rs = Server.CreateObject("ADODB.Recordset")
        sql="select * from fukuan where userid =" & rikeenet("shopid")
        rs.open sql,conn,3,2

       if rs.eof and rs.bof then

        wmsg="掌柜还没有设置配送及支付方式"
        end if
        %>
                  <td style="word-break:break-all"><%=rs("suozaidi")%></td>
                </tr>
                <tr>
                  <td width="9%">&nbsp;</td>
                  <td width="19%">配送费用:</td>
                  <td width="72%" style="word-break:break-all"><%if rs("maijia")=1 then%>
                    卖家承担运费
                    <%else%>
                    EMS:<%=rs("amount")%>元&nbsp;&nbsp;平邮<%=rs("amount1")%>元&nbsp;&nbsp;快递：<%=rs("amount2")%>元
                    <%end if%>                  </td>
                </tr>
                <tr>
                  <td>&nbsp;</td>
                  <td>配送范围:</td>
                  <td style="word-break:break-all"><%=rs("fw")%></td>
                </tr>
                <tr>
                  <td>&nbsp;</td>
                  <td>发货方式:</td>
                  <td style="word-break:break-all"><%=rs("fahuofangshi")%></td>
                </tr>
                <tr>
                  <td>&nbsp;</td>
                  <td>预计收货时间:</td>
                  <td style="word-break:break-all"><%=rs("shouhuosj")%></td>
                </tr>
                <tr>
                  <td>&nbsp;</td>
                  <td>&nbsp;</td>
                  <td>&nbsp;</td>
                </tr>
                <tr>
                  <td>&nbsp;</td>
                  <td>付款方式:</td>
                  <td>&nbsp;</td>
                </tr>
                <tr>
                  <td colspan="3" bgcolor="#FFE1EB"><div align="center"></div>
                      <div align="center">
                        <%If rs("zhifubao")<>"" Then response.write "<img src=../../image/zhifubao.gif>" End if%>
                        &nbsp;
                        <%If rs("wangyinzaixian")<>"" Then response.write "<img src=../../image/wangyinlogo.gif>" End if%>
                        &nbsp;
                        <%If rs("egold")<>"" Then response.write "<img src=../../image/egold.gif>" End if%>
                        &nbsp;
                        <%If rs("youjuhuikuan")<>"" Then response.write "<img src=../../image/post.gif>" End if%>
                        &nbsp;
                        <%If rs("jiaotongyinhang")<>"" Then response.write "<img src=../../image/bank_jt.gif>" End if%>
                        &nbsp;
                        <%If rs("zhaoshangyinhang")<>"" Then response.write "<img src=../../image/bank_cmb.gif>" End if%>
                        &nbsp;
                        <%If rs("zhongguoyinhang")<>"" Then response.write "<img src=../../image/bank_headbg.gif>" End if%>
  &nbsp;
                        &nbsp;
                        <%If rs("jiansheyinhang")<>"" Then response.write "<img src=../../image/bank_ccb.gif>" End if%>
                        &nbsp;
                        <%If rs("nongyeyinhang")<>"" Then response.write "<img src=../../image/bank_abc.gif>" End if%>
                        &nbsp;
                        <%If rs("gongshangyinhang")<>"" Then response.write "<img src=../../image/bank_cbc.gif>" End if%>
                        &nbsp;
                        <%If rs("visa")<>"" Then response.write "<img src=../../image/bank_visa.gif>" End if%>
                        <%rs.close
                set rs=nothing%>
                          </div></td>
                </tr>
            </table>

BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。
各位帮忙看一下 这里 要怎么修改？

if rs.eof or rs.bof then
也是一样的错误

ok 搞定  ……

应该逻辑判断不完整，是这里少了一段语句
if rs.eof and rs.bof then
  wmsg="掌柜还没有设置配送及支付方式"
else
  wmsg="掌柜已经发送待查收"
end if