求asp代码,根据不同用户名输入数据的不同序号段。
要这种效果 展开
输入页index.asp
<form method="POST" action="save.asp">
<p>姓名<input type="text" name="name" size="20">
<input type="submit" value="提交" name="B1"></p>
</form>
执行页save.asp
<%
db="db.mdb"
StrSQL="DBQ="+server.mappath(db)+";DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open StrSQL
name=Request.Form("name")
set rs=server.createobject("adodb.recordset")
sql="select * from table1 order by sequence_ desc"
rs.open sql,conn,1,1
if rs.eof then
sequence=1
else
sequence=rs("sequence_")-right(rs("sequence_"),2)+101
end if
rs.close
sql="select * from table1 where name_='"&name&"' order by sequence_ desc"
rs.open sql,conn,1,3
if rs.eof then
rs.addnew
rs("name_")=name
rs("sequence_")=sequence
else
sequence1=rs("sequence_")+1
rs.addnew
rs("name_")=name
rs("sequence_")=sequence1
end if
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
response.redirect("index.asp")
%>
数据库效果
这里没考虑一人超过100条记录。因为你没要求,根据你的问题来看,可能不会超过100。