通过选择下拉列表的值来取数据库的值并填写一个表格

这里：http://topic.csdn.net/u/20080620/22/374fc067-2253-421e-8811-0246b223a16e.html?1387879136

<%

    Dim name1,name2        

    idValue=Trim(Request.From("id"))  '接受select传过来的字段值

    If idValue<>"" then

        sql="select * from [Table表] where id="&idValue

        Set rs=Server.CreateObject("Adodb.RecordSet")

        rs.Open sql,conn,1,1    'conn为连接数据库

        name1=rs("name1")

        name2=rs("name2")

        rs.Close

        Set rs=Nothing

    End if

%>

<table align='center'>

<form name='showpages' method='Post' action='a.asp'>

<tr>

<td colspan='2'>

<select name='id' size='1' οnchange='javascript:submit()'>

    <option value='id1'>id1</option>    

<option value='id2'>id2</option>    

<option value='id3'>id3</option>    

</select>

</td>

</tr>

<tr>

    <td><input name="name1" value="<%=name1%>"></td>

    <td><input name="name2" value="<%=name2%>"></td>

</tr>

</form>

</table>