8_11.asp

来自「《asp网页设计》作者沈才梁源代码,共十章」· ASP 代码 · 共 14 行

<%'修改记录内容
Set Conn = Server.CreateObject("ADODB.Connection") 
Conn.open "txl"	  '打开数据库
Set Rs = Server.CreateObject("ADODB.Recordset")	
SQL = "Select * from userlist" 
Rs.Open SQL,Conn,0,2   '打开记录集Rs，最后一个参数（锁定类型）应为2或3，这样才能更新记录
Do While Not Rs.Eof 
Rs("地址")="浙江"  	'给字段赋值
  Rs.MoveNext		'移动记录指针，更新到数据库
Loop  
Rs.Close
Set Rs=Nothing
%>