asp.net 如何在页面上输出html代码

[jasonM2008]

比如这段文字，我要在Label控件上输出！
“
"抓取的网页代码中我怎么写这程序让他只把网页中我要的html代码存进数据库。比如我只要<img src=""photo/1.jpg"" />我只要photo/1.jpg

我想这是网上所说的图片小偷吧。我怎么把这个网页中的像<img src=""photo/1.jpg"" />的代码依次存入数据中..找到一个这样的代码就存一个进数据库?诚请赐教//"
”
其中<img 这类似的标签会被解释成一个图片标签，我想要他输出代码，不是输出代码执行的效果，改如何做？？
高手指点！

[周公]

用WebRequest打开指定的URL，然后用WebResponse获取相应文本，利用正则对<img>标签进行处理。

[pt1314917]

Server.HtmlEncode("<img src=.../>");
使用html编码即可。。

[yangqidong]

Label1.Text = HttpUtility.HtmlEncode("<img src=..........");

[「已注销」]

顶下！有点意思

[wuyq11]

webrequest获取数据，用正则获取图片
参考
参考

[jasonM2008]

[Quote=引用 3 楼 yangqidong 的回复:]
Label1.Text = HttpUtility.HtmlEncode(" <img src=..........");
[/Quote]

我用了，一样啊！
lbTittle.Text = "(" + nDesignCount.ToString() + ")" + HttpUtility.HtmlEncode(strTittle);//strTittle保存的那段文本！


那段文本是存放在数据中的，我改怎么用正则表达式？
我新手，高手们指点下？
最好有代码！！

[yangqidong]

再试一下，一定可以的

[yangqidong]

lbTittle.Text = HttpUtility.HtmlEncode(@"<img src='http://www.baidu.com/img/baidu_logo.gif'/>");
你用上面这个先试试，是不是输出代码

[xiao_fan85]

学习一下

[震我一下巧克力]

学习了

[陌上花花]

学习，帮顶了

[Kation]

'将Html代码给Html
Dim Html, Imgs As String
Html = ....
Do While InStr(Html, "<img") <> 0       '如果Html里面还有<Img标签
  Imgs = GetImg(Html)      '获得Img标签的src值
  '=============
  '你的代码，把得出的图片地址处理
  '=============
  Html = Mid(Html, Imgs)   '处理Html，逐个获得Img
Loop

Function GetImg(Html As String) As String
  Dim Img As Integer = InStr(Html, "<img")       '获得<img标签位置
  If Img <>0 Then                '如果有<Img则
    Html = Mid(Html, Img + 4)    '把<img标签之前的Html代码删掉
    Html = Mid(Html, InStr(Html, "src='") + 5)      '把src='和之前的html代码删掉
    GetImg = Left(Html, InStr(Html, "'"))           '把删掉后的代码，在"之前的就是图片地址
  Else
    GetImg = ""
  End If
End Function

[Kation]

'将Html代码给Html 
Dim   Html,   Imgs   As   String 
Html   =   LCase(....)
Do   While   InStr(Html,   " <img ")   <>   0               '如果Html里面还有 <Img标签 
    Imgs   =   GetImg(Html)             '获得Img标签的src值 
    '============= 
    '你的代码，把得出的图片地址处理 
    '============= 
    Html   =   Mid(Html,   Imgs)       '处理Html，逐个获得Img 
Loop 

Function   GetImg(Html   As   String)   As   String 
    Dim   Img   As   Integer   =   InStr(Html,   " <img ")               '获得 <img标签位置 
    If   Img   <> 0   Then                                 '如果有 <Img则 
        Html   =   Mid(Html,   Img   +   4)         '把 <img标签之前的Html代码删掉 
        Html   =   Mid(Html,   InStr(Html,   "src= ' ")   +   5)             '把src= '和之前的html代码删掉 
        GetImg   =   Left(Html,   InStr(Html,   " ' "))                       '把删掉后的代码，在 "之前的就是图片地址 
    Else 
        GetImg   =   " " 
    End   If 
End   Function

[请叫我低调]

看着毛有意思的 继续关注