请问asp 程序中使用ckeditor上传图片后,现在要重新读取上传的图片到指定显示的区域,如何写读取图片的代
答案:2 悬赏:70 手机版
解决时间 2021-02-19 07:31
- 提问者网友:沉默菋噵
- 2021-02-18 18:10
请问asp 程序中使用ckeditor上传图片后,现在要重新读取上传的图片到指定显示的区域,如何写读取图片的代码呢?因为这个编辑员上传后找不到数据库相应的地址,只能找到图片存放的物理地址,我现在要把这些图片从数据库读取出来
最佳答案
- 五星知识达人网友:一秋
- 2021-02-18 18:38
FCK编辑器吗,你的意思是说把内容当中的图片取出来.单独显示到某个位置?
dim strMain
strMain=Rs("Content")
Dim obRegExp,RetStr,splitStr
Set obRegExp = New Regexp
strFilter="<img.+?>"
obRegExp.IgnoreCase = True
obRegExp.Global = True
obRegExp.Pattern = strFilter
Set Matches = obRegExp.Execute(LCase(strMain))
For Each Match in Matches
RetStr = RetStr & Match.Value & "|"
Next
splitStr = split(RetStr,"|")
For N=0 to Ubound(splitStr)-1
splitFilter = replace(splitStr(N),"<img","<img width=520 height=390")
response.write "<div class='page'>"&splitFilter &"</div>"
Next
Set obRegExp = Nothing
dim strMain
strMain=Rs("Content")
Dim obRegExp,RetStr,splitStr
Set obRegExp = New Regexp
strFilter="<img.+?>"
obRegExp.IgnoreCase = True
obRegExp.Global = True
obRegExp.Pattern = strFilter
Set Matches = obRegExp.Execute(LCase(strMain))
For Each Match in Matches
RetStr = RetStr & Match.Value & "|"
Next
splitStr = split(RetStr,"|")
For N=0 to Ubound(splitStr)-1
splitFilter = replace(splitStr(N),"<img","<img width=520 height=390")
response.write "<div class='page'>"&splitFilter &"</div>"
Next
Set obRegExp = Nothing
全部回答
- 1楼网友:西风乍起
- 2021-02-18 19:17
打开数据库查看一下不就可以 了?
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯