主题：生成网页，表格网址的超链接消失了

请问狐爸表格存在一列网址，生成SaveHtm网页，打开网页无法链接网址？

SaveHtm网页，是纯文本的，没有任何格式。

这样处理一下

 

Tables("表b").SaveHTM("d:\test.htm")

Dim str As String = FileSys.ReadAllText("d:\test.htm")
str = System.Text.RegularExpressions.Regex.Replace(str, "((http|www){1}.+?)(?=\<)", "<a href='$1'>$1</a>")
FileSys.WriteAllText("d:\test.htm", str, False)

谢谢！