LANGUAGE = "VBScript" '声明使用 VBScript 脚本语言开发(该语句必须在第一行声明)

'##############################################################
' 文件说明
' PHP代码加密工具 Xend 用户定制型加密专用处理脚本
' 文件可用VBS、JS规范编写，用户可根据自身选择开发
' 代码中前缀名为 Xend_xxxxxx 的函数为软件接口函数
'##############################################################

'=================基本的自定型加密脚本示例=====================

function START() '入口主函数START()
    Dim Code, EnCode
    Code = Xend_GetCode() '取得当前文件PHP代码

    EnCode = Xend_Bin_Encode(Code, "密码123") '对代码Code进行加密
    EnCode = Replace(EnCode, "\", "\\") '(参考下句)
    EnCode = Replace(EnCode, "'", "\'") '该结果在下面会以字符形式放进单引号中,因此本身可能的单引号前要加转义符

    '返回可供PHP服务运行的PHP代码
    START = "function phpDecode($s,$k){$str='';$sL=strlen($s);$kL=strlen($k);$kLi=0;for($i=0;$i<$sL;$i++){if($kLi>=$kL)$kLi=0;$str.=$k[$kLi]^$s[$i];$kLi++;}return $str;}" & vbCrLf & _
"$code='" & EnCode & "';" & vbCrLf & _
"$code=phpDecode($code,'密码123');" & vbCrLf & "eval($code);"
end function