7,732
社区成员
发帖
与我相关
我的任务
分享Access怎样修改很多条记录某个字段中的部分内容
比如我要将access 2000数据库中news表中
content字段中的内容
<IMG border=0 src="/news/admin/eWebEditor/UploadFile/201332410493644.jpg">
修改成
<IMG border=0 src="/admin/eWebEditor/UploadFile/201332410493644.jpg">
就是把很多条记录中的/news/替换成/
有些文章中说可以用replace函数，但Access 2000不支持，有篇文章说可以自定义个replace函数，
Public Function Rep(RepInThis As String, RepThis As String, RepWithThis As String) As String
Rep = Replace(RepInThis, RepThis, RepWithThis)
End Function
可我不知道这个自定义函数要写在哪里啊，难道写在sql视图里吗？有谁能帮帮我吗
content字段中的内容
<IMG border=0 src="/news/admin/eWebEditor/UploadFile/201332410493644.jpg">
修改成
<IMG border=0 src="/admin/eWebEditor/UploadFile/201332410493644.jpg">
就是把很多条记录中的/news/替换成/
有些文章中说可以用replace函数，但Access 2000不支持，有篇文章说可以自定义个replace函数，
Public Function Rep(RepInThis As String, RepThis As String, RepWithThis As String) As String
Rep = Replace(RepInThis, RepThis, RepWithThis)
End Function
可我不知道这个自定义函数要写在哪里啊，难道写在sql视图里吗？有谁能帮帮我吗
...全文
请发表友善的回复…
发表回复
专注VB编程开发20年 2013-08-18
- 打赏
- 举报
你这个就算是写个自定义函数，那也只是用于查询时显示内容出来，要是想修改保存的话，你得一条一条读出来，RS.MOVENEXT RS.UPDATE都少不了
wwwwb 2013-08-12
- 打赏
- 举报
UDF只能在ACCESS中运行
被遗忘的城市 2013-08-11
- 打赏
- 举报
导出成excel替换掉，再导进去
关工 2013-08-09
- 打赏
- 举报
你把news表中的content字段取出来，然后用substr等将要替换的内容取出来，然后再覆盖回去就行了。
update news set content = subsstr(conteng,1,4)+"111.jpg" where 1=1;
此SQL仅供参考，具体要靠自己修正一下。
ACMAIN_CHM 2013-08-08
- 打赏
- 举报
自定义函数写在模块中。 在VBA环境中，创建一个新模块。
wuxia2118 2013-08-08
- 打赏
- 举报
有没有人知道啊
