如何让网易相册的图片显示在论坛中

mswhy

昨天我在霏凡看到一个帖子。是通过说怎么通过1个网址能在论坛链接 网易的相册
我自己试过。可以。但我更想知道是怎么1回事。。搜索整理了1下 得出以下代码
可能有人发过，以下内容只适合菜鸟观看，老鸟请原谅 耽误您的时间
CODE:
"" Then
xml.Open "GET",GetImg,False
xml.Send
End if
Dim ImgType,ImgSize
ImgType = Mid(GetImg,InStrRev(GetImg,".",-1,1)+1) '获得扩展名，这里我很不明白。如果用Right取出来的是。。
Response.ContentType = "image/" & ImgType
'Response.AddHeader "Content-Length", Clnt(len(xml.responseBody))
'Response.AddHeader "Content-Disposition","FileName=VCC5." & ImgType
Response.BinaryWrite xml.responseBody
Set xml = Nothing
If Err 0 Then
Call GetErr
Response.End
End if
Sub GetErr
Response.ContentType = "text/plain"
Response.Write "图片加载失败！"
Response.Write GetImg & chr(13)
Response.Write Err.description
End Sub
%>
[Copy to clipboard]
我很郁闷，我发现没有多少人仔细看完就灌水了，
使用方法如下
http://home.goofar.com/afay/pic.asp?url=
＋你的相册图片地址
我贴的代码是
http://home.goofar.com/afay/pic.asp
的源代码！！
例如我网易相册的图片地址是
http://img47.photo.163.com/kkf002/7377495/147690598.jpg
直接连到论坛是出现红叉叉的！。但我们可以这样引用
http://home.goofar.com/afay/pic.asp?url=http://img47.photo.163.com/kkf002/7377495/147690598.jpg
效果 如下
不明白的请右键查看图片的地址！假如你看到以下是一个红叉叉，请刷新本页！

crack123

学习了！
3Q

bigsea1001

多谢了,学习了