Sub Process_Globals
Dim sax As SaxParser
Dim tid As Tidy
End Sub
Sub Activity_Create(FirstTime As Boolean)
tid.Initialize
'parse the Html page and create a new xml document.
tid.Parse(File.OpenInput(File.DirAssets, "index.html"), File.DirRootExternal, "1.xml")
sax.Initialize
sax.Parse(File.OpenInput(File.DirRootExternal, "1.xml"), "sax")
End Sub