以文本方式查看主题

-  生物百花园社区  (http://biobox.hk11.ntnet.cn/bbs0000/index.asp)
--  【万花筒】  (http://biobox.hk11.ntnet.cn/bbs0000/list.asp?boardid=14)
----  批量替换Access数据库中内容的方法  (http://biobox.hk11.ntnet.cn/bbs0000/dispbbs.asp?boardid=14&id=7427)

--  作者:hyichun1997
--  发布时间:2011/7/3 1:16:36
--  批量替换Access数据库中内容的方法

方法一:通过Access数据库中的查询分析器来修改(这里我使用的是Access 2003)

1、打开需要修改的Access数据库

2、在数据库“对象”中点击“查询”

3、点击“在设计视图中创建查询”

4、在出现的界面中关闭“显示表”小窗口

5、点击“视图”菜单,选择“SQL视图”,此时将出现查询窗口,您可以在此输入SQL语句了

6、直接输入以下SQL语句:

Update 表 SET 字段=replace(字段,"原字符","替换字符")

 

您可根据实际情况,将上面红字换掉即可,这里举个例子,假设表为biao、字段为content、原字符为xiazai.jb51.net、替换字符为down1.jb51.net,那么相应的SQL语句如下:

复制代码 代码如下:

Update biao SET content=replace(content,"xiazai.jb51.net","down1.jb51.net")

 

7、点击工具栏中的感叹号,运行即可。

方法二:用ASP程序来批量替换字符,上面的代码有字符长度限制的问题。这个没有限制。

下面直接给出ASP程序代码,大家一看即知道了:
复制代码 代码如下:
\'这里省略数据库连接代码
Dim rs,sql,text
Set rs=Server.CreateObject("ADODB.Recordset")
sql="Select content From biao"
rs.Open sql,conn,1,3
Do While Not rs.Eof
text=Replace(rs("content"),"xiazai.jb51.net","down1.jb51.net")
rs("content")=text
rs.Update
rs.MoveNext
Loop
rs.Close
Set rs=Nothing