[vb.net] HtmlAgilityPack, Jurassic 을 활용한 JavaScript 활용 > vb.net | program1472

기타 [vb.net] HtmlAgilityPack, Jurassic 을 활용한 JavaScript 활용

작성자 하나를하더라도최선을
댓글 0건 조회 9,417회 작성일 22-07-13 13:34

Dim html = "https://myanimelist.net/character/214"

Dim web As HtmlWeb = New HtmlWeb()

Dim htmlDoc = web.Load(html)

Dim htmlNodes = htmlDoc.DocumentNode.SelectNodes("//body")

Dim doc As HtmlAgilityPack.HtmlDocument = New HtmlAgilityPack.HtmlDocument()

Dim script = htmlDoc.DocumentNode.Descendants().Where(Function(n) n.Name = "tr/td/a/img").First().InnerText

Dim engine = New Jurassic.ScriptEngine()

Dim result = engine.Evaluate("(function() { " & script & " return src; })()")

Dim json = JSONObject.Stringify(engine, result)

Console.WriteLine(json)

Console.ReadKey()

html = "<html>

             // Some HTML

             <script>

               var spect = [['temper', 'init', []],

               ['fw\/lib', 'init', [{staticRoot: '//site.com/js/'}]],

               [""cap"",""dm"",[{""tackmod"":""profile"",""xMod"":""timed""}]]];

             </script>

             // More HTML

             </html>"

Dim doc As HtmlAgilityPack.HtmlDocument = New HtmlAgilityPack.HtmlDocument()

doc.LoadHtml(html)

Dim script = doc.DocumentNode.Descendants().Where(Function(n) n.Name = "script").First().InnerText

Dim engine = New Jurassic.ScriptEngine()

Dim result = engine.Evaluate("(function() { " & script & " return spect; })()")

Dim json = JSONObject.Stringify(engine, result)

Console.WriteLine(json)

Console.ReadKey()

'// Grab the content of the first script element

HtmlAgilityPack.HtmlDocument doc = new HtmlAgilityPack.HtmlDocument();

doc.LoadHtml(html);

var script = doc.DocumentNode.Descendants()

                             .Where(n => n.Name == "script")

                             .First().InnerText;

'// Return the data of spect and stringify it into a proper JSON object

var engine = new Jurassic.ScriptEngine();

var result = engine.Evaluate("(function() { " + script + " return spect; })()");

var json = JSONObject.Stringify(engine, result);

Console.WriteLine(json);

Console.ReadKey();

등록된 댓글이 없습니다.