<li><a title="FCKEditor高亮代碼插件測試"><span class="article-date">[09/11]</span>FCKEditor高亮代碼插件測試</a></li>

string strHTML = "<li><a /"href=http://www.abcxyz.com/something/article/143.htm/" title=/"FCKEditor高亮代碼插件測試/"><span class=/"article-date/">[09/11]</span>FCKEditor高亮代碼插件測試</a></li>";
string pattern = "http://([^//s]+)/".+?span.+?//[(.+?)//].+?>(.+?)<";
Regex reg = new Regex( pattern, RegexOptions.IgnoreCase );
MatchCollection mc = reg.Matches( strHTML );
if (mc.Count > 0)
{
foreach (Match m in mc)
{
Console.WriteLine( m.Groups[1].Value );
Console.WriteLine( m.Groups[2].Value );
Console.WriteLine( m.Groups[3].Value );
}
}

<%
Dim str, reg, objMatches
str = "<li><a href=""http://localhost/Z-Blog18/article/143.htm"" title=""FCKEditor高亮代碼插件測試""><span class=""article-date"">[09/11]</span>FCKEditor高亮代碼插件測試</a></li>"
Set reg = new RegExp
reg.IgnoreCase = True
reg.Global = True
reg.Pattern = "http://([^/s]+)"".+?span.+?/[(.+?)/].+?>(.+?)<"
Set objMatches = reg.Execute(str)
If objMatches.Count > 0 Then
Response.Write("網址：")
Response.Write(objMatches(0).SubMatches(0))
Response.Write("<br>")
Response.Write("日期：")
Response.Write(objMatches(0).SubMatches(1))
Response.Write("<br>")
Response.Write("標題：")
Response.Write(objMatches(0).SubMatches(2))
End If
%>

<script type="text/javascript">
var str = '<li><a href="http://localhost/Z-Blog18/article/143.htm" title="FCKEditor高亮代碼插件測試"><span class="article-date">[09/11]</span>FCKEditor高亮代碼插件測試</a></li>';
var pattern = /http:////([^/s]+)".+?span.+?/[(.+?)/].+?>(.+?)</gi;
var mts = pattern.exec(str);
if (mts != null)
{
alert(mts[1]);
alert(mts[2]);
alert(mts[3]);
alert(mts[4]);
}
</script>