以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  生成网页，表格网址的超链接消失了  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=83459)
--  作者：漂泥
--  发布时间：2016/4/9 15:53:00
--  生成网页，表格网址的超链接消失了
请问狐爸表格存在一列网址，生成SaveHtm网页，打开网页无法链接网址？
--  作者：Hyphen
--  发布时间：2016/4/9 16:57:00
--  
SaveHtm网页，是纯文本的，没有任何格式。
--  作者：大红袍
--  发布时间：2016/4/10 23:26:00
--  

这样处理一下

 

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)
--  作者：漂泥
--  发布时间：2016/4/13 11:51:00
--  
谢谢！