viewdingdan.asp

商业网站开发有源代码可以运行

                                <%
	while not songxf.eof%>
                                <tr> 
                                  <td bgcolor="#EFF5FE"> 
                                    <%
	set songxf1=server.CreateObject("adodb.recordset")
	songxf1.open "select * from shop_jiangpin where bookid="&songxf("bookid"),conn,1,1
	if songxf1.recordcount=1 then
	response.write songxf1("bookname")
	end if
	rs_sh.close
	set rs_sh=nothing
	songxf1.close
	set songxf1=nothing%>
                                  </td>
                                  <td align="center" bgcolor="#EFF5FE"><%=songxf("jifen")%></td>
                                </tr>
                                <%
	songxf.movenext
	wend%>
                              </table>
                            </td>
                          </tr>
                          <%end if
songxf.close
set songxf=nothing%>
                          <tr> 
                            <td bgcolor="#EFF5FE" style='PADDING-LEFT: 10px'>收货人姓名：</td>
                            <td bgcolor="#EFF5FE" style='PADDING-LEFT: 10px'><%=trim(rs("userzhenshiname"))%></td>
                          </tr>
                          <tr> 
                            <td bgcolor="#EFF5FE" style='PADDING-LEFT: 10px'>收货地址：</td>
                            <td bgcolor="#EFF5FE" style='PADDING-LEFT: 10px'><%=trim(rs("shouhuodizhi"))%></td>
                          </tr>
                          <tr> 
                            <td bgcolor="#EFF5FE" style='PADDING-LEFT: 10px'>邮编：</td>
                            <td bgcolor="#EFF5FE" style='PADDING-LEFT: 10px'><%=trim(rs("youbian"))%></td>
                          </tr>
                          <tr> 
                            <td bgcolor="#EFF5FE" style='PADDING-LEFT: 10px'>联系电话：</td>
                            <td bgcolor="#EFF5FE" style='PADDING-LEFT: 10px'><%=trim(rs("usertel"))%></td>
                          </tr>
                          <tr> 
                            <td bgcolor="#EFF5FE" style='PADDING-LEFT: 10px'>电子邮件：</td>
                            <td bgcolor="#EFF5FE" style='PADDING-LEFT: 10px'><%=trim(rs("useremail"))%></td>
                          </tr>
                          <tr> 
                            <td bgcolor="#EFF5FE" style='PADDING-LEFT: 10px'>送货方式：</td>
                            <td bgcolor="#EFF5FE" style='PADDING-LEFT: 10px'> 
                              <%set rs2=server.CreateObject("adodb.recordset")
    rs2.Open "select * from shop_songhuo where songid="&rs("songhuofangshi"),conn,1,1
    response.Write trim(rs2("subject"))
    rs2.Close
    set rs2=nothing%>
                            </td>
                          </tr>
                          <tr> 
                            <td bgcolor="#EFF5FE" style='PADDING-LEFT: 10px'>支付方式：</td>
                            <td bgcolor="#EFF5FE" style='PADDING-LEFT: 10px'> 
                              <%set rs2=server.CreateObject("adodb.recordset")
    rs2.Open "select * from shop_songhuo where songid="&rs("zhifufangshi"),conn,1,1
    response.Write trim(rs2("subject"))
    rs2.close
    set rs2=nothing%>
                            </td>
                          </tr>
                          <tr> 
                            <td bgcolor="#EFF5FE" style='PADDING-LEFT: 10px'>是否要发票：</td>
                            <td bgcolor="#EFF5FE" style='PADDING-LEFT: 10px'><%if rs("fapiao")=1 then %><font color=red>需要发票</font><%else%>不需要发票<%end if%></td>
                          </tr>
                          <tr> 
                            <td bgcolor="#EFF5FE" style='PADDING-LEFT: 10px'>用户留言：</td>
                            <td bgcolor="#EFF5FE" style='PADDING-LEFT: 10px'><%=trim(rs("liuyan"))%></td>
                          </tr>
                          <tr> 
                            <td height="20" bgcolor="#EFF5FE" style='PADDING-LEFT: 10px'>下单日期：</td>
                            <td height="20" bgcolor="#EFF5FE" style='PADDING-LEFT: 10px'><%=rs("actiondate")%></td>
                          </tr>
                          <tr> 
                            <td height="32" colspan="2" bgcolor="#EFF5FE"> 
                              <div align="center"> 
                                <input type="button" name="Submit3" value="删除订单" onClick="if(confirm('您确定要删除吗?')) location.href='savedingdan.asp?action=del&dan=<%=dingdan%>&username=<%=username%>';else return;">
                                &nbsp;&nbsp; 
                                <input type="button" name="Submit2" value="关闭窗口" onClick=javascript:window.close()>
                              </div>
                            </td>
                          </tr>
                        </table>
                      </td>
                    </tr>
                  </table>
                </td>
              </tr>
            </table>
          </td>
        </tr>
      </table>
    </td>
  </tr>
</table>
<%sub zhuang()
select case rs("zhuangtai")
case "1"%>
<input name="checkbox" type="checkbox" DISABLED id="checkbox" value="checkbox" checked>未作任何处理<span style='font-family:Wingdings;'>à</span> 
<%if rs("zhifufangshi")<>4 then %>
<input name="checkbox" type="checkbox" id="checkbox" value="checkbox" DISABLED>用户已经划出款<span style='font-family:Wingdings;'>à</span> 
<input type="checkbox" name="zhuangtai" value="3">服务商已经收到款<span style='font-family:Wingdings;'>à</span> 
<input type="checkbox" name="checkbox3" value="checkbox" DISABLED>服务商已经发货<span style='font-family:Wingdings;'>à</span> 
<input type="checkbox" name="checkbox4" value="checkbox" DISABLED>用户已经收到货 
<%else%>
<input name="zhuangtai" type="checkbox" id="zhuangtai" value="3">订单已确认<span style='font-family:Wingdings;'>à</span> 
<input type="checkbox" name="checkbox4" value="checkbox" DISABLED>订单已完成 
<%end if%>
<%case "2"%>
<input name="checkbox" type="checkbox" DISABLED id="checkbox" value="checkbox" checked>未作任何处理<span style='font-family:Wingdings;'>à</span> 
<input name="checkbox" type="checkbox" id="checkbox" value="adf" checked DISABLED>用户已经划出款<span style='font-family:Wingdings;'>à</span> 
<input type="checkbox" name="zhuangtai" value="3" >服务商已经收到款<span style='font-family:Wingdings;'>à</span> 
<input type="checkbox" name="checkbox" value="checkbox" DISABLED>服务商已经发货<span style='font-family:Wingdings;'>à</span> 
<input type="checkbox" name="checkbox4" value="checkbox" DISABLED>用户已经收到货
<%case "3"%>
<input name="checkbox" type="checkbox" DISABLED id="checkbox" value="checkbox" checked>未作任何处理<span style='font-family:Wingdings;'>à</span> 
<%if rs("zhifufangshi")<>4 then %>
<input name="checkbox" type="checkbox" id="checkbox" value="checkbox" checked DISABLED>用户已经划出款<span style='font-family:Wingdings;'>à</span> 
<input type="checkbox" name="checkbox2" value="checkbox" checked DISABLED>服务商已经收到款<span style='font-family:Wingdings;'>à</span> 
<input type="checkbox" name="zhuangtai" value="4" >服务商已经发货<span style='font-family:Wingdings;'>à</span> 
<input type="checkbox" name="checkbox4" value="checkbox" DISABLED>用户已经收到货
<%else%>
<input name="checkbox" type="checkbox" DISABLED value="checkbox" checked>订单已确认<span style='font-family:Wingdings;'>à</span> 
<input type="checkbox" name="zhuangtai" id="checkbox" value="5">
订单已完成 
<%end if%>
<%case "4"%>
<input name="checkbox" type="checkbox" DISABLED id="checkbox" value="checkbox" checked>未作任何处理<span style='font-family:Wingdings;'>à</span> 
<input name="checkbox" type="checkbox" id="checkbox" value="2" checked DISABLED>用户已经划出款<span style='font-family:Wingdings;'>à</span> 
<input type="checkbox" name="checkbox2" value="checkbox" checked DISABLED>服务商已经收到款<span style='font-family:Wingdings;'>à</span> 
<input type="checkbox" name="checkbox3" value="checkbox" checked DISABLED>服务商已经发货<span style='font-family:Wingdings;'>à</span> 
<input type="checkbox" name="checkbox" value="checkbox" DISABLED>用户已经收到货
<%case "5"%>
<input name="checkbox" type="checkbox" DISABLED id="checkbox" value="checkbox" checked>未作任何处理<span style='font-family:Wingdings;'>à</span> 
<%if rs("zhifufangshi")<>4 then %>
<input name="checkbox" type="checkbox" id="checkbox" value="2" checked DISABLED>用户已经划出款<span style='font-family:Wingdings;'>à</span> 
<input type="checkbox" name="checkbox2" value="checkbox" checked DISABLED>服务商已经收到款<span style='font-family:Wingdings;'>à</span> 
<input type="checkbox" name="checkbox3" value="checkbox" checked DISABLED>服务商已经发货<span style='font-family:Wingdings;'>à</span> 
<input type="checkbox" name="checkbox4" value="checkbox" checked DISABLED>用户已经收到货
<%else%>
<input name="zhuangtai" type="checkbox" DISABLED id="checkbox" value="checkbox" checked>订单已完成<span style='font-family:Wingdings;'>à</span> 
<input type="checkbox" name="checkbox4" value="checkbox" checked DISABLED>订单已完成 
<%end if%>
<%end select
end sub%>