UC知道asp: 关于上传保存数据问题！！ 好人请进.........
来源：百度知道 编辑：UC知道 时间：2024/09/22 07:51:20
在一个 ACCESS 数据库中有个 "company" 表,
在 "company" 表中有: "id" "user" "tel" "Email" ……几个字段，
在以下这个程序中...
<select name="user" size="1" id="select" ">
<option value=" "> 请选择 </option>
<%set rs = server.createobject("adodb.recordset")
sql = "select * from company"
rs.open sql,conn,1,1
do while not rs.eof%>
<option value="<%=rs("user")%>"> <%=rs("user")%></option>
<%
rs.movenext
loop
rs.close
在 "company" 表中有: "id" "user" "tel" "Email" ……几个字段，
在以下这个程序中...
<select name="user" size="1" id="select" ">
<option value=" "> 请选择 </option>
<%set rs = server.createobject("adodb.recordset")
sql = "select * from company"
rs.open sql,conn,1,1
do while not rs.eof%>
<option value="<%=rs("user")%>"> <%=rs("user")%></option>
<%
rs.movenext
loop
rs.close
<option value=" "> 请选择 </option>
<%set rs = server.createobject("adodb.recordset")
sql = "select * from company"
rs.open sql,conn,1,1
do while not rs.eof
'--------------关键部分---------------
'之所以用$$分割，是为了不合email以及user中的内容重复
%>
<option value="<%=rs("id")%>$$<%=rs("email")%>$$<%=rs("user")%>"> <%=rs("user")%></option>
<%
'-------------------------------------
rs.movenext
loop
rs.close
set rs = nothing
%>
</select>
'-------------接收部分--------------
info = Trim(Request.From("user"))
infoArr = Split(info,"$$")
userID = infoArr(0)
userEmail = infoArr(1)
user = Server.HtmlEncode(infoArr(2))
回答完毕！！
这样,建一个FORM，提交form的时候，把值代过去，然后再写入：
<%
if Request("user&qu