Access数据库 字段值 字符替换

两种方法:

(一)Access数据库内部使用方法

 

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

    示例:

         假设表为biao、字段为content、原字符为xiazai.jb51.net、替换字符为down1.jb51.net,

         那么相应的SQL语句如下: 
               Update biao SET content=replace(content,"xiazai.jb51.net","down1.jb51.net")

         使用方式:使用Access打开数据库,在查询窗口输入以上代码,感叹号“!”运行,结果出来。

(二) VB编码实现方法

          代码如下:
           ' 这里省略数据库连接代码 
          'Dim rs,sql,text     'ASP代码

          'Set rs=Server.CreateObject("ADODB.Recordset")  

          Dim rsAs ADODB.Recordset
          Set rs= New ADODB.Recordset
          sql="Select content From biao" 
          ' rs.Open sql,conn,1,3

          rs.Open strSql, adoConn, adOpenKeyset, adLockOptimistic, adCmdText
          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

详细出处参考:http://www.jb51.net/article/23770.htm

 

转载于:https://www.cnblogs.com/liwenqiang/archive/2010/07/29/1787712.html

Visual Basic是一种基于事件驱动的编程语言,它可以借助OleDb技术与Microsoft Access数据库系统交互。如果你想通过SQL语句连续修改Access数据库中的多个字段数据,可以按照以下步骤操作: 1. 首先,你需要引用OleDb命名空间,这是连接到Access数据库的关键。可以在VBA项目中添加 `Imports System.Data.OleDb`。 2. 创建一个OleDbConnection对象,提供数据库的连接信息,例如:`Dim conn As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=<your_database.accdb>;Mode=ReadWrite")` 其中 `<your_database.accdb>` 替换为你实际的数据库文件路径。 3. 打开连接: ```vbnet conn.Open() ``` 4. 编写一个包含你要更新的SQL语句的字符串,例如,假设你想同时更新字段A、B和C,你可以这样构建: ```sql Dim sql As String = "UPDATE YourTable SET FieldA = @NewValueA, FieldB = @NewValueB, FieldC = @NewValueC WHERE SomeCondition" ``` 将`YourTable`替换为你的表名,`FieldA`, `FieldB`, 和 `FieldC`替换为你要更新的字段名,`@NewValueA`, `@NewValueB`, 和 `@NewValueC`是占位符,表示新的,`SomeCondition`是你筛选记录的条件。 5. 创建命令对象,并设置其CommandText属性: ```vbnet Dim cmd As New OleDbCommand(sql, conn) ``` 6. 设置参数: ```vbnet cmd.Parameters.AddWithValue("@NewValueA", newValueA) cmd.Parameters.AddWithValue("@NewValueB", newValueB) cmd.Parameters.AddWithValue("@NewValueC", newValueC) ``` 7. 执行SQL语句: ```vbnet cmd.ExecuteNonQuery() ``` 这将执行SQL并更新所有符合条件的记录。 8. 最后别忘了关闭连接: ```vbnet conn.Close() ``` 完成上述步骤后,你就可以通过循环或其他逻辑控制结构多次执行更新,每次改变`newValueA`, `newValueB`, 和 `newValueC`的,来连续更新多个字段了。
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值