如何在输出的文本里嵌入图片,就像网上的图片新闻一样!!??在线等待答案!!

Iris 2002-07-23 11:17:14
如何在输出的文本里嵌入图片,就像网上的图片新闻一样!!??
谢谢!!
...全文
67 点赞 收藏 26
写回复
26 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
Iris 2002-07-23
up!!紧急
回复
Iris 2002-07-23
对呀!!就是直接写的!!!文字<img src="*.gif">文字,我还试过用html格式转换,还是不行!!!
回复
manmanchong 2002-07-23
直接写啊。
文字<img src="*.gif">文字
回复
Iris 2002-07-23
试过了!!可它将<img src=**.gif align=left | right>这段完全输出
回复
meizz 2002-07-23
你设置一个属性:
<img src=**.gif align=left | right>
回复
Iris 2002-07-23
不好意思!!分比较少!!
回复
Iris 2002-07-23
嗯!!非常感谢各位!!问题结了!!^_^
回复
meizz 2002-07-23
再看看你的图片连接地址是否正确,我这边测试是正确的。
如果你还是不行的话,将图片的链接改成本地的图片链接。
回复
meizz 2002-07-23
再看看你的图片连接地址是否正确,我这边测试是正确的。
如果你还是不行的话,将图片的链接改成本地的图片链接。
回复
meizz 2002-07-23
看看图片的连接地址,如果还不行的话,你换一个本地的图片试试。
回复
Iris 2002-07-23
可是图片框已经出来了,就是打个叉的那种不能正常显示图片的图框,说明它已识别<img src=http://www.csdn.net/images/csdn.gif align=left>形式了,可我的地址并没有写错,我核对再三,那么究竟错在哪呢???不好意思,继续CALL HELP!!!
回复
Iris 2002-07-23
可是图片框已经出来了,就是打个叉的那种不能正常显示图片的图框,说明它已识别<img src=http://www.csdn.net/images/csdn.gif align=left>形式了,可我的地址并没有写错,我核对再三,那么究竟错在哪呢???不好意思,继续CALL HELP!!!
回复
meizz 2002-07-23
你的那个替换语句是将所有HTML标记替换掉,也包括<img ...>,所以不可能会有图片出来的
你若是不能改到后台程序的话,现唯一的办法是将这个标记自重新替换回去。
<%
dim ss
ss = "aslkj&cxkjlt;l<img src=http://www.csdn.net/images/csdn.gif align=left>sdf;fsd>kdskjl"

function rr(ss)
dim a,b,c,d,e
a = instr(ss,"img") 'img标签出现的第一个位置
b = left(ss,a-5) 'b为img标签前的字符串
c = right(ss,len(ss)-len(b)) 'c为ss字符串除去b后的剩下的字符串
a = instr(c,">") '在c里找到img标签结束的位置
d = left(c,a+3) 'd为整个img标签的字符串
e = right(c,len(c)-len(d)) 'e为c字串除去d后的字符串
d = replace(replace(replace(replace(d,"<","<"),">",">"),"<br>",chr(13))," "," ")
'将img标签的字符串重新替换回去
rr = b&d&e '函数返回已经替换好的字符串
end function

Response.write rr(ss)
%>
写这种程序的感觉很怪怪的,累呀!
回复
meizz 2002-07-23
你的那个替换语句是将所有HTML标记替换掉,也包括<img ...>,所以不可能会有图片出来的
你若是不能改到后台程序的话,现唯一的办法是将这个标记自重新替换回去。
<%
dim ss
ss = "aslkj&cxkjlt;l<img src=http://www.csdn.net/images/csdn.gif align=left>sdf;fsd>kdskjl"

function rr(ss)
dim a,b,c,d,e
a = instr(ss,"img") 'img标签出现的第一个位置
b = left(ss,a-5) 'b为img标签前的字符串
c = right(ss,len(ss)-len(b)) 'c为ss字符串除去b后的剩下的字符串
a = instr(c,">") '在c里找到img标签结束的位置
d = left(c,a+3) 'd为整个img标签的字符串
e = right(c,len(c)-len(d)) 'e为c字串除去d后的字符串
d = replace(replace(replace(replace(d,"<","<"),">",">"),"<br>",chr(13))," "," ")
'将img标签的字符串重新替换回去
rr = b&d&e '函数返回已经替换好的字符串
end function

Response.write rr(ss)
%>
写这种程序的感觉很怪怪的,累呀!
回复
meizz 2002-07-23
你的那个替换语句是将所有HTML标记替换掉,也包括<img ...>,所以不可能会有图片出来的
你若是不能改到后台程序的话,现唯一的办法是将这个标记自重新替换回去。
<%
dim ss
ss = "aslkj&cxkjlt;l<img src=http://www.csdn.net/images/csdn.gif align=left>sdf;fsd>kdskjl"

function rr(ss)
dim a,b,c,d,e
a = instr(ss,"img") 'img标签出现的第一个位置
b = left(ss,a-5) 'b为img标签前的字符串
c = right(ss,len(ss)-len(b)) 'c为ss字符串除去b后的剩下的字符串
a = instr(c,">") '在c里找到img标签结束的位置
d = left(c,a+3) 'd为整个img标签的字符串
e = right(c,len(c)-len(d)) 'e为c字串除去d后的字符串
d = replace(replace(replace(replace(d,"<","<"),">",">"),"<br>",chr(13))," "," ")
'将img标签的字符串重新替换回去
rr = b&d&e '函数返回已经替换好的字符串
end function

Response.write rr(ss)
%>
写这种程序的感觉很怪怪的,累呀!
回复
Iris 2002-07-23
不行◎!现在的情况是,用ssm1226(雨中人-№☆精华区☆) 的方法,哪么图片显示不出,就像我先前一样!!还需要求助~!~~~~~~~~~~~~~~~~~~!~~~~~
回复
Iris 2002-07-23
不行◎!现在的情况是,用ssm1226(雨中人-№☆精华区☆) 的方法,哪么图片显示不出,就像我先前一样!!还需要求助~!~~~~~~~~~~~~~~~~~~!~~~~~
回复
ssm1226 2002-07-23
写入库时,不能替换<或>
读出来时,只需<%=rs("NewsContent")%>
回复
Iris 2002-07-23
我试过将信息内容print出来:
是文字<img src=http://www.csdn.net/images/csdn.gif align=left>文字的形式,为什么不能识别html代码呢????用了Content =Server.HTMLEncode("Contend")也不好使!!好不容易有一点意思了,可图片显示不出来,地址是对的!!!!烦死了!!求助!!!!!!!!!!
回复
Iris 2002-07-23
可是现在后台页面结构已经固定,目前改不了程序,原先的页面没有发布嵌图片的信息,如今加了这么一个功能,所以就想了一个暂且的办法,起一文件夹放需要发布的图片,在发布的内容里嵌入图片的地址!!按理刚才那样说应该可以实现这样的功能,可是撞邪了,它就是不出来!!头都大了!!
回复
发动态
发帖子
ASP
创建于2007-09-28

2.8w+

社区成员

ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
申请成为版主
社区公告
暂无公告