一段修改数据库中某字段的代码(asp)

这是昨天写的一段asp代码,功能就是用来替换数据库里某字段中的某些匹配内容
如果数据库中行数很多的话,程序运行会有很长时间,所以如果程序运行超时的话还得修改下,把脚本超时的时间改长些,也可以修改程序输出一些成功信息

< ! -- #include file = " conn.asp " -->
2

< % dim rs,sql,aa,i,bb
3

set rs = server.createobject( " adodb.recordset " )
4

sql = " select musicid,testfilename from music where testfilename like '%.ra%' "
5

rs.open sql,conn, 1 , 1
6

If Not Rs.Eof And Not Rs.Bof Then aa = Rs.GetRows() '获取数据集,存入数组
7

rs.close
8

If IsArray (aa) Then '判断是否取到
10

for i = 0 to Ubound (aa, 2 ) '循环替换
12

bb = replace (aa( 1 ,i), " .ra " , " .mp3 " )
13

sql = " select testfilename from music where musicid= " & aa( 0 ,i)
14

rs.open sql,conn, 1 , 3
15

rs( " testfilename " ) = bb
16

rs.update
17

rs.close
18

next
19

end if
21

% >

posted on 2006-02-03 14:15 Aween's Blog 阅读( ...) 评论( ...) 编辑收藏

转载于:https://www.cnblogs.com/aween/archive/2006/02/03/325002.html