用数组,成批修改数据,(不错)

1   
2set rs=server.createobject("adodb.recordset")   
3sql="select * from foreign"   
4rs.open sql,conn,1,1   
1<form action="price_ok.asp?action=update" method="POST" name="form1">   

do while not rs.eof

1<input ```"="" id")="" name="id" type="hidden" value="```
2=rs("/>
3<input ```"="" id="name" name="name" name")="" size="17" type="text" value="```
4=rs("/>
5<input ```"="" id="inpr" inpr")="" name="inpr" size="17" type="text" value="```
6=rs("/>
7<input ```"="" id="outpr" name="outpr" outpr")="" size="17" type="text" value="```
8=rs("/>   

rs.movenext
loop

1<input name="Submit" type="submit" value="提交"/>
2<input name="reset" type="reset" value="重置"/> </form>

---------------------------------price_ok.asp---------

1   
2if request("action")="update" then   
3for i=1 to request.form("id").count   
4id=replace(request.form("id")(i),"'","")   
5name=replace(request.form("name")(i),"'","")   
6inpr=replace(request.form("inpr")(i),"'","")   
7outpr=replace(request.form("outpr")(i),"'","")   
8'response.write id&inpr&outpr&name   
9'response.write "

<br/>

1"   
2conn.execute("update foreign set name='"&name&"',inpr="&inpr&",outpr="&outpr&" where id="&id)   
3next   
4conn.close   
5set conn=nothing   
6response.write "

<script language="javascript">alert('字段设置成功!');window.location.href='price.asp';</script>

1"   
2end if   
Published At
Categories with Web编程
Tagged with
comments powered by Disqus