| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 504 人关注过本帖
标题:求下拉列表框的问题
只看楼主 加入收藏
theend12
Rank: 2
来 自:ASP|PHP菜鸟
等 级:论坛游民
帖 子:83
专家分:42
注 册:2009-10-8
结帖率:72%
收藏
已结贴  问题点数:10 回复次数:2 
求下拉列表框的问题
添加页面代码:
  <tr>
    <td height="24" align="right">软件语言</td>
    <td>
    <select name="Down_yy" id="Down_yy">
      <option value="1" selected="selected">简体中文</option>
      <option value="2">English</option>
      <option value="3">其它</option>
    </select>
    </td>
  </tr>
添加到数据库:
oRs("Down_yy")=Request.Form("Down_yy")
修改页面代码:
<%
fyy=oRs("Down_yy")
%>
 <tr>
    <td height="24" align="right">软件语言</td>
    <td>
    <%
    Call DBConnBegin()
    Sql="select * from down Where Down_ID="&Request("ID")
    oRs.open Sql,oConn,1,1
    %>
    <select name="Down_yy" id="Down_yy">
    <%Do while Not oRs.Eof%>
                        <option value="<%=oRs("down_yy")%>"
                        <%
                            '如果你传过来的ID中的yy和修改中循环的yy一致的话,那么就selected
                            if oRs("down_yy") = fyy then
                                response.write "selected='selected'"
                            end if
                        %>><% Select Case oRs("down_yy")
                            Case "1"
                            response.write "简体中文"
                            Case "2"
                            response.write "English"
                            case Else
                            response.write "其他"
                            End Select
                        %></option>
    <%
    oRs.movenext
    loop
    Call DBConnEnd()
    %>
       </select>
    </td>
  </tr>
修改页面我想表达的意思是默认选中软件本来属于的那种语言,然后再输出其他另两个。
因为"简体中文"、"English"、"其他"不是在数据库中的。所以输出不出来,只输出了一个它本属于的那种语言。
请前辈们帮忙修改,怎么能输出3种语言,并默认选中了本来属于的那种语言


[ 本帖最后由 theend12 于 2010-11-9 15:38 编辑 ]
搜索更多相关主题的帖子: 列表 
2010-11-09 15:37
dzt0001
Rank: 13Rank: 13Rank: 13Rank: 13
等 级:蒙面侠
威 望:5
帖 子:1281
专家分:4998
注 册:2005-10-12
收藏
得分:10 
会写添加页面就会写修改的代码,两个差不多的
程序代码:
    <select name="Down_yy" id="Down_yy">
      <option value="1"<%if oRs("down_yy")="1" then Response.Write(" selected")%>>简体中文</option>
      <option value="2"<%if oRs("down_yy")="2" then Response.Write(" selected")%>>English</option>
      <option value="3"<%if oRs("down_yy")="3" then Response.Write(" selected")%>>其它</option>
    </select>

----我怎能在别人的苦难面前转过脸去----
2010-11-09 16:56
theend12
Rank: 2
来 自:ASP|PHP菜鸟
等 级:论坛游民
帖 子:83
专家分:42
注 册:2009-10-8
收藏
得分:0 
回复 2楼 dzt0001
前辈,能指点我一下么?
现在一般的代码90%我都能读懂,80%的功能我也会套用,比如这个网站没有的功能我能从其他网站挪过来用。
可就是没有自己独立思考解决问题的能力。就比如这个问题,你给我写出来,我看一眼就很明白了,但自己就想不出来。
我该怎么办啊?

我是一个初学者.学每门知识都会经历一段菜鸟阶段,希望大家多帮忙
2010-11-09 17:00
快速回复:求下拉列表框的问题
数据加载中...
 
   



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

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