□ Scripts for TClock □

NikkanTVが変わったので対応部分ｶｷｺ

progname = FindFromText(progpos, progtext, vbTab & vbTab, vbLf, "")
If Right(progtime, 1) = ">" Then

の間に
progname = FindFromText(1, progname, ">", "</A>", "")
を挿入。
('A`)ﾉ以上