| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 460 人关注过本帖
标题:各位大侠,浪费点你们的时间帮帮忙。
取消只看楼主 加入收藏
javaxingxing
Rank: 2
等 级:论坛游民
帖 子:78
专家分:82
注 册:2009-11-6
结帖率:93.33%
收藏
已结贴  问题点数:20 回复次数:1 
各位大侠,浪费点你们的时间帮帮忙。
首先我讲一下问题,
(1)testlist页面没什么东西,就是如下这样显示:
订货人: lucy2 订货人电话 45345353and paymentid=3
订货人: try 订货人电话 123and paymentid=6
(2)点击try到testedit页面,如下显示:
发货方式  下拉列表框(EMS,平邮)
付款方式  下拉列表框(财付通,支付宝)
    提交  重置
(3)提交以后到testeditok页面,就是把在下拉列表框中选择的数据保存到表中.
重定向到testlist页面,

此时,问题还没出现,修改成功了,我打开数据库中的表看了看,确实修改了,
但是当我再点击try到testedit页面时,下拉列表框中显示的不是我选中的支付宝状态,而是默认的第一个财付通
同样的代码放在别的页面好使,在这就不好使了???郁闷啊。

  
这是testlist.asp页面的代码


<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="../Connections/conn.asp" -->

<%
Set cn=Nothing
set cn =server.createobject("adodb.connection")
cn.open MM_gb_data_STRINGdb
Set rs=Nothing
set rs =server.createobject("adodb.recordset")
strsql="SELECT * FROM orderaaa ORDER BY id desc"
rs.cursortype=1
rs.LockType = 1
rs.open strsql,cn         
%>
<%
    do while not rs.EOF
%>
              <table>
                <tr>
                <td>订货人:</td>
    <td><a href="testedit.asp?id=<%=rs("id")%>&payment=<%=rs("payment")%>"><%=rs("order_user")%></a></td>
    <td>订货人电话</td>
    <td><%=rs("order_tel")%>and paymentid=<%=rs("payment")%></td>
                </tr>
              </table>
    <%
    rs.movenext
    loop
    %>
    <%
    rs.close
    set rs=Nothing
    cn.close
    set cn=nothing
    %>
这是testeidt得页面
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="../Connections/conn.asp" -->
<% If session("login")=1 Then %>
<%
set rs_login = Server.CreateObject("ADODB.Recordset")
rs_login.ActiveConnection = MM_gb_data_STRINGdb
id=request.queryString("id")
rs_login.Source = "SELECT  * FROM orderaaa where id="&id
rs_login.CursorType = 1
rs_login.LockType = 1  
rs_login.Open()
%>

<html>
 <center> <body>
  <form name="editform" method="post" action="testeditok.asp?id=<%=rs_login("id")%>">
      
<!--发货方式-->
 <%
   set rs_login1 = Server.CreateObject("ADODB.Recordset")
   rs_login1.ActiveConnection = MM_gb_data_STRINGdb
   sql = "select * from consignment"
   rs_login1.cursorType = 1
   rs_login1.LockType = 1
   rs_login1.open sql
 %>      
        
      发货方式
            <SELECT NAME="consignment">
            <% do while not rs_login1.eof%>
                <%if rs_login1("id")=rs_login("consignment") then%>
                <OPTION VALUE=<%=rs_login1("id")%> selected><%=rs_login1("way")%></option>
                <%else%>
                <OPTION VALUE=<%=rs_login1("id")%>><%=rs_login1("way")%></option>
                <%end if%>
                <%
                rs_login1.movenext
                loop
                rs_login1.close
                %>                    
        </SELECT>   
      <br>                                   
<!--付款方式-->               
 <%
    set rs_logintest= Server.CreateObject("ADODB.Recordset")
    rs_logintest.ActiveConnection = MM_gb_data_STRINGdb
    sql = "select * from payment"
    rs_logintest.cursorType = 1
    rs_logintest.LockType = 1
    rs_logintest.open sql
 %>      
      
      付款方式
            <SELECT NAME="payment">
                 <%
                do while not rs_logintest.eof
                 %>
                <%if rs_logintest("id")=rs_login("payment") then%>
                <OPTION VALUE=<%=rs_logintest("id")%> selected><%=rs_logintest("way")%></option>
                <%else%>
                <OPTION VALUE=<%=rs_logintest("id")%>><%=rs_logintest("way")%></option>
                <%end if%>
                <%
                rs_logintest.movenext
                loop
                rs_logintest.close
                %>                    
            </SELECT>   
      <br>                                    
                 <input type="submit" name="button1" value="提交" />
                <input type="reset" name="button2" value="重置" />
  </form>
  </body></center>
</html>
<%
rs_login.close
Set rs_login=nothing
%>
<%
else
response.redirect "../index.asp"
end if
%>
这是testeditok.asp的页面
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="../Connections/conn.asp" -->
<%
set rs_login = Server.CreateObject("ADODB.Recordset")
rs_login.ActiveConnection = MM_gb_data_STRINGdb
sql="select * from orderaaa where id="&request.QueryString("id")
rs_login.cursorType = 1
rs_login.LockType = 3
rs_login.open sql

rs_login("consignment")=request.Form("consignment")
rs_login("payment")=request.Form("payment")

rs_login.update
rs_login.close
Set rs_login=Nothing
response.redirect("testlist.asp")
%>


[ 本帖最后由 javaxingxing 于 2009-11-6 10:04 编辑 ]
搜索更多相关主题的帖子: 时间 
2009-11-06 10:02
javaxingxing
Rank: 2
等 级:论坛游民
帖 子:78
专家分:82
注 册:2009-11-6
收藏
得分:0 
回复 2楼 gdk2006
恩,我说简单点,估计大家不明白我具体问什么……
这个问题应该是小细节问题,其他模块都能用,到了这就不好使了,基本上没怎么变化,我自己再仔细看看吧。
2009-11-07 13:15
快速回复:各位大侠,浪费点你们的时间帮帮忙。
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.031119 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved