xiyueta.js库 - 入门指南

var $ = require('xiyueta')

$.load("<div>hello world!</div>"); //Parsing HTML
$("div").text("xiyueta.com"); //Set page div
console.log( $.html() )

<script  language="javascript" runat="server" src="./dist/asp.xiyueta.min.js"></script> 
<%
xiyueta.load("<div>hello world!</div>") 'Parsing HTML
xiyueta("div").text("xiyueta.com") 'Set page div
console.log( xiyueta.html() )
%>

<?php 
// 指定要写入的文件路径
$file_path = "debug/test001/example.js";
// 要写入文件的数据
$data= "const xiyueta = require('xiyueta') \n";
$data.="xiyueta.load('
qq:313801120
') \n";
$data.=" console.log( xiyueta('p').text() ) \n";
// 以写入模式打开文件
$file = fopen($file_path, "w") or die("无法打开文件！");
// 将数据写入文件
fwrite($file, $data);
// 关闭文件
fclose($file);


$output=shell_exec("node ".$file_path);
echo($output);

Private Sub Form_Load()
    Dim sc, html, s
    Set sc = CreateObject("ScriptControl")
    sc.language = "Jscript" '设置语言为javascript
    sc.Timeout = -1
    sc.AddCode getFText("asp.xiyueta.min.js")
    sc.AddCode getFText("1.js")
     
    
    s = sc.Eval(" $.load('<div>hello world!</div>');$('div').text('xiyueta.com');$.html()")
    MsgBox (s)   '<div>xiyueta.com</div>
    
    
    
    '两种调用方法
    'Sc.Run("mytestfun", html)
    'Sc.Eval(" xiyueta.load('" & html & "');xiyueta('div').text()")
End Sub

'读文件内容
Function getFText(filePath)
    Dim fso, fText, openFile
    filePath = App.Path & "/" & filePath
    Set fso = CreateObject("Scripting.FileSystemObject")
        If fso.fileExists(filePath) = True Then
            Set fText = fso.OpenTextFile(filePath, 1)
                '加强 读空文件出错
                Set openFile = fso.getFile(filePath)
                    If openFile.Size = 0 Then getFileText = "": Exit Function                       '文件为空则退出
                Set openFile = Nothing
                getFText = fText.ReadAll
                 
            Set fText = Nothing
        End If
    Set fso = Nothing
End Function

Imports MSScriptControl
Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim sc
        sc = CreateObject("ScriptControl")
        sc.language = "Jscript" '设置语言为javascript
        sc.Timeout = -1
        sc.AddCode(getFText("asp.xiyueta.min.js"))
        sc.AddCode(getFText("1.js"))

        Dim txtHtml = "<div>aaa</div><div>bbb</div><div>ccc</div>"


        '两种调用方法
        'Sc.Run("mytestfun", html)
        Dim s = sc.Eval(" xiyueta.load('" & txtHtml & "');;xiyueta('div').text()")
        MsgBox(s)
        s = sc.Eval("xiyueta('div:eq(0)').text()")
        MsgBox(s)

        Call sc.Run("load", txtHtml)

    End Sub


    '读文件内容 (2013,9,27
    Function getFText(ByVal filePath As String)
        Dim fso, fText, openFile
        getFText = ""   '它默认返回的就是空， 这个是多此一举 (2013,9,30)
        filePath = Application.StartupPath() & "/" & filePath
        '获得完整路径
        fso = CreateObject("Scripting.FileSystemObject")
        If fso.fileExists(filePath) = True Then
            fText = fso.openTextFile(filePath, 1)
            '加强 读空文件出错
            openFile = fso.getFile(filePath)
            If openFile.Size = 0 Then getFText = "" : Exit Function '文件为空则退出
            openFile = Nothing
            getFText = fText.readAll
            fText = Nothing
        End If
        fso = Nothing
    End Function


End Class

# 导入执行JS代码模块 <需要安装>
import execjs              #安装 pip install PyExecJS

f=open('6.js', encoding='utf-8').read()
js_code = execjs.compile(f) 

txt = js_code.call('test','
hello world!
','div')
print(txt)

const xiyueta = require('xiyueta')    //安装  npm install xiyueta

function test(html,selector){
    xiyueta.load(html)    
    xiyueta('div').text('xiyueta.com');
    return xiyueta.html();
} 

<div>xiyueta.com</div>