Question

ASP下拉菜单值的引用

关于ASP下拉菜单中选中number，怎么在新的TextBox中显示其他的信息如name,price(数据库的表中含有number，name,price)

Answer 1

<%

'连接OLEDB
Set Conn = Server.CreateObject("ADODB.CONNECTION")
Conn.Open
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &
server.mappath("data/xxx.mdb")                     
'这边是conn，你最好放到另外的公用文件，提供调用的。。。

    Action = request("action")
    if Action = "tj" then
        sel_num = request("sel_num")               '获取下拉框的值
        'response.write(sel_num)
        'zl = sel_num                                           ‘这两句话是测试，有没有获取到值
        set rrs = server.CreateObject("adodb.recordset")       '建立记录集对象
        strSQL = "select * from [main] where id = " & sel_num         ’建立sql查询语句
        rrs.open strSQL ,conn ,1 ,1                                         ‘打开记录集，conn是建立关联access库的对象，
        if not rrs.eof then                                                        ’查找到值，打开
            zl = rrs("name") & rrs("price") & rrs("number")       ‘付给变量~~~
        end if
        rrs.close
        set rrs = nothing
          
    end if
%>
<form name="ziliao" action="?action=tj" method="post">
<select name="sel_num" class="sel">
    <option value="num01">num01</option>
    <option value="num02">num02</option>
    <option value="num03">num03</option>
</select>
<textarea name="all_zl"><% =zl %><!--把从数据库选取的资料打印出来，放在文本框里--></textarea>
<input type="submit" name="submit" value="提交" />
</form>

这边我讲下思路，

1、先建立select下拉框，value就是你数据库id的值，然后选中了，

2、我们在提交表单的时候获取到这个val，给变量sel_num，

3、然后在去关联数据库，查找到所有要显示的数据在给另外的变量zl

4、最后在textarea里面显示出来

下面是我测试的结果~~~你自己放到本地站点测试看看

初始化。。。。

选中，num02下拉框，打印和文本框都显示出对应的值来。。。