ASP.NET RSS Toolkit(RSS工具)
作者：互联网
2009-06-30
ASP.NET教程
还记得以前吗？以前要做页面上写个小组件，调用指定（RSS输出地址的）的内容。最好的办法就是通过XSLT+XML来输出字符 串。让我们还是花了一分钟的时候回忆一下以前的做法吧
曾经的做法：
Protected Overrides Sub OnLoad(ByVal e As System.EventArgs)
Dim CacheKey As String = Url & "-" & Sort
Dim objCache As System.Web.Caching.Cache = HttpRuntime.Cache
If objCache.Item(CacheKey) Is Nothing Then
Dim xpDocument As XPathDocument = New XPathDocument(Url, XmlSpace.Preserve)
Dim XTran As XslTransform = New XslTransform
XTran.Load(Web.HttpRuntime.AppDomainAppPath & "TransForm.xsl") 'TransForm.xsl
Dim sw As StringWriter = New StringWriter
Dim xArgList As XsltArgumentList = New XsltArgumentList
xArgList.AddParam("Sort", "", Sort)
xArgList.AddParam("strlength", "", strLength)
XTran.Transform(xpDocument, xArgList, sw)
objCache.Insert(CacheKey, sw, Nothing, DateTime.Now.AddMinutes(15), TimeSpan.Zero)
End If
MyBase.Text = CType(objCache.Item(CacheKey), StringWriter).ToString
End SubXSLT转换文件
xmlns:xsl=""
xmlns=""
xmlns:msxsl="urn:schemas-microsoft-com:xslt"
xmlns:dc=""
xmlns:slash=""
xmlns:sy=""
xmlns:resuls="urn:StrLength">
Function GetSubString(byval origStr As String, byval endIndex As Integer) As String
Dim bytes As Byte() = System.Text.Encoding.GetEncoding("gb2312").GetBytes(origStr)
If endIndex >= bytes.Length Then
Return origStr
End If
Dim subBytes(endIndex) As Byte
Array.Copy(bytes, 0, subBytes, 0, endIndex)
Return System.Text.Encoding.GetEncoding("gb2312").GetString(subBytes) + ""
End Function 'GetSubString
public function strDate(byval s as string)as string
return CDate(s).Day.ToString & "日"
end function
]]>
根据RSS输出的格式，进行绑定 OK。现在可以浏览一下效果 晚上出去吃晚饭的时候。走出外面，感觉到夏天的来到。呵。我喜欢夏天的这种感觉。带上好的心情，出去走走。也是一种很好的享受。最后。推荐一首歌：夏天的味道。 相关标签: 相关推荐 专题 + 收藏 + 收藏 + 收藏 + 收藏 + 收藏 + 收藏 最新数据 相关文章 详解.NET Core如何构建一个弹性的HTTP请求机制 .NET Core使用Redis实现创建分布式锁 .NET内存管理释放的两种方式 基于.NET8实现WinFrom应用窗口自动缩放功能 浅析如何在 ASP.NET Core中实现速率限制 .NET Core 委托原理解析(最新推荐) .NET 9 new features-Microsoft.ML.Tokenizers 库(文本标记化功能) 如何在 .NET 中使用 Tesseract 识别图片文字 ASP.NET Core Web API之Token验证的实现 asp.net core web api项目添加自定义中间件的实现 AI精选
<%@ Register Assembly="RssToolkit" Namespace="RssToolkit" TagPrefix="RssToolkit" %>
<html>
<head runat="server">
<title>ScottGu Feedtitle>
head>
<body>
<form id="form1" runat="server">
<div>
<h2>ScottGu Blog Feedh2>
<asp:DataList ID="DataList1" runat="server" CellPadding="4" DataSourceID="RssDataSource1" ForeColor="#333333">
<ItemTemplate>
<asp:HyperLink ID="HyperLink1" runat="server" NavigateUrl='<%# Eval("link") %>' Text='<%# Eval("title") %>'>asp:HyperLink>
ItemTemplate>
asp:DataList>
<RssToolkit:rssdatasource id="RssDataSource1" runat="server" url="http://weblogs.*a**sp.net/scottgu/Rss.aspx">
RssToolkit:rssdatasource>
div>
form>
body>
html>
