#12005/1/12 15:16:27
从以下表单传递:<select name="type" size="1" class="smallSel" id="type">
<%
dim rs,sql,sel
set rs=server.createobject("adodb.recordset")
sql="select * from type"
rs.open sql,conn,1,1
do while not rs.eof
sel="selected"
response.write "<option " & sel & " value='"+CStr(rs("typeid"))+"' name=typeid>"+rs("type")+"</option>"+chr(13)+chr(10)
rs.movenext
loop
rs.close
%>
</select>
然后添加到ACCESS数据库中相应的字段中,要从上面传递过来的信息同时添加进两个字段。我写的添加程序如下:<%
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("db.mdb")
title=request.form("title")
content=request.form("content")
type=request.form("type")
images=request.Form("images")
exec="insert into learning(title,content,images)values('"+title+"','"+content+"','"+images+"')"
conn.execute exec
conn.close
set conn=nothing
%>
但是好象这样写的话,我并没有同时向两个字段中添加记录。而且添加不进去。
想请各位帮个忙,看看我哪里需要改进的!~
先谢谢了!~~