UC知道ASP最初级的编辑数据库的代码
来源：百度知道 编辑：UC知道 时间：2024/05/16 14:34:12
数据库名：db.mdb
表名：mood
字段：mood1（其他的字段我自己加）
编号：id
帮我写个编辑这个表里面字段的代码，谢谢了
<%
dim conn
connStr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=db.mdb"
set conn=Server.CreateObject("ADODB.Connection")
conn.Open connStr
%>
<%
sql="select * from mood where id="&id
rs.open sql,3,3
if not(rs.bof and rs.eof) then
rs("mood1")="值"
rs.update
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
<form name="form1" method="post" action="<%=MM_editAction%>">
名字:<input type="text" name="mood1" size="25" value="<%=rs("mood1")%>">
<input type="submit" name="Submit" value="确定修改" class="button">
<input type="reset" name="Re
表名：mood
字段：mood1（其他的字段我自己加）
编号：id
帮我写个编辑这个表里面字段的代码，谢谢了
<%
dim conn
connStr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=db.mdb"
set conn=Server.CreateObject("ADODB.Connection")
conn.Open connStr
%>
<%
sql="select * from mood where id="&id
rs.open sql,3,3
if not(rs.bof and rs.eof) then
rs("mood1")="值"
rs.update
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
<form name="form1" method="post" action="<%=MM_editAction%>">
名字:<input type="text" name="mood1" size="25" value="<%=rs("mood1")%>">
<input type="submit" name="Submit" value="确定修改" class="button">
<input type="reset" name="Re
动态网页文件名为baidu.asp,数据库名为db.mdb,与baidu.asp放在同一目录,其中baidu.asp代码如下:
<%id=request("id")
v=request("mood1")
if id="" then id=1
%>
<%
dim conn
connStr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&server.mappath("db.mdb")
set conn=Server.CreateObject("ADODB.Connection")
conn.Open connStr
%>
<%
sql="select * from mood where id="&id
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,3,3
if not(rs.bof and rs.eof) then
if v<>"" Then
rs("mood1")=v
rs.update
end if
%>
<form name="form1" method="post" action="<%=MM_editAction%>">
名字:<input type="text" name="mood1" size="25" value="<%=rs("mood1")%>">
<input type="submit&qu