php+mysql中间件开源 开始研究php写的

戒卜掉思恋

回家过年了，发一点东西吧，希望可以帮助还在找这方面资料的易友（大家新年快乐哦）
无模块   纯源码      
易语言：

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
集_密钥	文本型
集_链接地址	文本型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

集_密钥 ＝ “ffsdfsdfsdgfghfeer”
集_链接地址 ＝ “http://127.0.0.1/mysql.php”
' 调试输出 (SQL_查询数据 (“open”, “elec * from ssid3”))‘不能发sql语句   删除前面字母s   后面t
' 调试输出 (SQL_执行语句 (“open”, “elec * from ssid3”))’不能发sql语句   删除字母s 后面t
' 调试输出 (SQL_取记录数 (“open”, “elec * from ssid3”))‘不能发sql语句   删除字母s  后面t
’仔细检查一下语句哦

子程序名	返回值类型	公开	备 注
SQL_取记录数	整数型
参数名	类 型	参考	可空	数组	备 注
参数_数据库	文本型
参数_查询条件	文本型

变量名	类 型	静态	数组	备 注
局部_返回数据	文本型

局部_返回数据 ＝ 数据加解密 (POST提交数据 (集_链接地址, “ML=” ＋ #常量_数量命令 ＋ “&SJK=” ＋ 参数_数据库 ＋ “&SQL=” ＋ 参数_查询条件 ＋ “&DATM=” ＋ 集_密钥), 集_密钥)
调试输出 (“查询数量:” ＋ 局部_返回数据)
如果真 (取文本左边 (局部_返回数据, 1) ＝ “[”)
局部_返回数据 ＝ 子文本替换 (局部_返回数据, “[”, , , , 真)
局部_返回数据 ＝ 子文本替换 (局部_返回数据, “]”, , , , 真)
返回 (到整数 (局部_返回数据))
返回 (0)

子程序名	返回值类型	公开	备 注
SQL_执行语句	文本型
参数名	类 型	参考	可空	数组	备 注
参数_数据库	文本型
参数_SQL语句	文本型

变量名	类 型	静态	数组	备 注
局部_返回数据	文本型

局部_返回数据 ＝ 数据加解密 (POST提交数据 (集_链接地址, “ML=” ＋ #常量_执行命令 ＋ “&SJK=” ＋ 参数_数据库 ＋ “&SQL=” ＋ 参数_SQL语句 ＋ “&DATM=” ＋ 集_密钥), 集_密钥)
如果真 (取文本左边 (局部_返回数据, 3) ＝ “SQL”)
返回 (局部_返回数据)
调试输出 (数据加解密 (到字节集 (局部_返回数据), 集_密钥))
返回 (“错误的数据”)

子程序名	返回值类型	公开	备 注
SQL_查询数据	文本型
参数名	类 型	参考	可空	数组	备 注
参数_数据库	文本型
参数_查询语句	文本型

变量名	类 型	静态	数组	备 注
局部_返回数据	文本型

局部_返回数据 ＝ 数据加解密 (POST提交数据 (集_链接地址, “ML=” ＋ #常量_查询命令 ＋ “&SJK=” ＋ 参数_数据库 ＋ “&SQL=” ＋ 参数_查询语句 ＋ “&DATM=” ＋ 集_密钥), 集_密钥)
如果真 (局部_返回数据 ＝ “非法访问，请确定你的权限”)
返回 (“非法访问，请确定你的权限”)
如果真 (局部_返回数据 ＝ “[]”)
返回 (“查询数据为空”)
如果真 (取文本左边 (局部_返回数据, 1) ＝ “[”)
返回 (局部_返回数据)
调试输出 (数据加解密 (到字节集 (局部_返回数据), 集_密钥))
返回 (“查询数据失败”)

子程序名	返回值类型	公开	备 注
数据加解密	文本型
参数名	类 型	参考	可空	数组	备 注
参数_数据	字节集
参数_密钥	文本型

返回 (到文本 (RC4数据 (参数_数据, 参数_密钥)))

子程序名	返回值类型	公开	备 注
RC4数据	字节集
参数名	类 型	参考	可空	数组	备 注
字节集数据	字节集
密码文本	文本型

变量名	类 型	静态	数组	备 注
S	字节型		256
K	字节型		256
i	整数型
j	整数型
temp	字节型			交换字节用
Y	整数型
Outp	字节集
x	整数型
t	整数型
密码长度	整数型

计次循环首 (256, i)
S [i]＝ i － 1
计次循环尾 ()
j ＝ 1
密码长度 ＝ 取文本长度 (密码文本)
计次循环首 (256, i)
如果真 (j ＞ 密码长度)
j ＝ 1
K [i]＝ 取代码 (取文本中间 (密码文本, j, 1), 1)
j ＝ j ＋ 1
计次循环尾 ()
j ＝ 0
计次循环首 (256, i)
j ＝ (j ＋ S [i]＋ K [i]) ％ 256
temp ＝ S [i] ' 交换字节
S [i]＝ S [j ＋ 1]
S [j ＋ 1] ＝ temp
计次循环尾 ()
i ＝ 0
j ＝ 0
计次循环首 (取字节集长度 (字节集数据), x)
i ＝ (i ＋ 1) ％ 256
j ＝ (j ＋ S [i ＋ 1]) ％ 256
temp ＝ S [i ＋ 1] ' 交换字节
S [i ＋ 1] ＝ S [j ＋ 1]
S [j ＋ 1] ＝ temp
t ＝ (S [i ＋ 1] ＋ S [j ＋ 1] ％ 256) ％ 256
Y ＝ S [t ＋ 1] ' 注意要+1
Outp ＝ Outp ＋ 到字节集 (到字节 (位异或 (字节集数据 [x], Y)))
计次循环尾 ()
返回 (Outp)

子程序名	返回值类型	公开	备 注
POST提交数据	字节集
参数名	类 型	参考	可空	数组	备 注
参数_网址	文本型
参数_数据	文本型

变量名	类 型	静态	数组	备 注
http	对象
return	字节集

加载 (0)
http.创建 (“Microsoft.XMLHTTP”, )
http.方法 (“Open”, “POST”, 参数_网址, 假)
http.方法 (“SetRequestHeader”, “Accept”, “*/*”)
http.方法 (“SetRequestHeader”, “Accept-Language”, “zh-CN”)
http.方法 (“SetRequestHeader”, “User-Agent”, “Mozilla/5.0 (compatible; MSIE 9.0; Windows NT 6.1; WOW64; Trident/5.0)”)
http.方法 (“SetRequestHeader”, “Content-Type”, “application/x-www-form-urlencoded”)
http.方法 (“SetRequestHeader”, “Accept-Encoding”, “deflate”)
http.方法 (“SetRequestHeader”, “Connection”, “Keep-Alive”)
http.方法 (“SetRequestHeader”, “Cache-Control”, “no-cache”)
http.方法 (“Send”, 参数_数据)
return ＝ http.读属性 (“ResponseBody”, ).取字节集 ()
卸载 ()
返回 (return)[/i][/i][/i][/i][/i][/i][/size]
[size=3][i][i][i][i][i][i]

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 集_密钥, 文本型<br /> .程序集变量 集_链接地址, 文本型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> 集_密钥 ＝ “ffsdfsdfsdgfghfeer”<br /> 集_链接地址 ＝ “<a href="http://127.0.0.1/mysql.php" rel="nofollow" rel="nofollow" target="_blank">http://127.0.0.1/mysql.php</a>”<br /> ' 调试输出 (SQL_查询数据 (“open”, “elec * from ssid3”))‘不能发sql语句   删除前面字母s   后面t<br /> <br /> ' 调试输出 (SQL_执行语句 (“open”, “elec * from ssid3”))’不能发sql语句   删除字母s 后面t<br /> <br /> ' 调试输出 (SQL_取记录数 (“open”, “elec * from ssid3”))‘不能发sql语句   删除字母s  后面t<br /> ’仔细检查一下语句哦<br /> <br /> .子程序 SQL_取记录数, 整数型<br /> .参数 参数_数据库, 文本型<br /> .参数 参数_查询条件, 文本型<br /> .局部变量 局部_返回数据, 文本型<br /> <br /> 局部_返回数据 ＝ 数据加解密 (POST提交数据 (集_链接地址, “ML=” ＋ #常量_数量命令 ＋ “&SJK=” ＋ 参数_数据库 ＋ “&SQL=” ＋ 参数_查询条件 ＋ “&DATM=” ＋ 集_密钥), 集_密钥)<br /> 调试输出 (“查询数量:” ＋ 局部_返回数据)<br /> .如果真 (取文本左边 (局部_返回数据, 1) ＝ “[”)<br /> 局部_返回数据 ＝ 子文本替换 (局部_返回数据, “[”, , , , 真)<br /> 局部_返回数据 ＝ 子文本替换 (局部_返回数据, “]”, , , , 真)<br /> 返回 (到整数 (局部_返回数据))<br /> .如果真结束<br /> 返回 (0)<br /> <br /> .子程序 SQL_执行语句, 文本型<br /> .参数 参数_数据库, 文本型<br /> .参数 参数_SQL语句, 文本型<br /> .局部变量 局部_返回数据, 文本型<br /> <br /> 局部_返回数据 ＝ 数据加解密 (POST提交数据 (集_链接地址, “ML=” ＋ #常量_执行命令 ＋ “&SJK=” ＋ 参数_数据库 ＋ “&SQL=” ＋ 参数_SQL语句 ＋ “&DATM=” ＋ 集_密钥), 集_密钥)<br /> .如果真 (取文本左边 (局部_返回数据, 3) ＝ “SQL”)<br /> 返回 (局部_返回数据)<br /> .如果真结束<br /> 调试输出 (数据加解密 (到字节集 (局部_返回数据), 集_密钥))<br /> 返回 (“错误的数据”)<br /> <br /> .子程序 SQL_查询数据, 文本型<br /> .参数 参数_数据库, 文本型<br /> .参数 参数_查询语句, 文本型<br /> .局部变量 局部_返回数据, 文本型<br /> <br /> 局部_返回数据 ＝ 数据加解密 (POST提交数据 (集_链接地址, “ML=” ＋ #常量_查询命令 ＋ “&SJK=” ＋ 参数_数据库 ＋ “&SQL=” ＋ 参数_查询语句 ＋ “&DATM=” ＋ 集_密钥), 集_密钥)<br /> .如果真 (局部_返回数据 ＝ “非法访问，请确定你的权限”)<br /> 返回 (“非法访问，请确定你的权限”)<br /> .如果真结束<br /> .如果真 (局部_返回数据 ＝ “[]”)<br /> 返回 (“查询数据为空”)<br /> .如果真结束<br /> .如果真 (取文本左边 (局部_返回数据, 1) ＝ “[”)<br /> 返回 (局部_返回数据)<br /> .如果真结束<br /> 调试输出 (数据加解密 (到字节集 (局部_返回数据), 集_密钥))<br /> 返回 (“查询数据失败”)<br /> <br /> .子程序 数据加解密, 文本型<br /> .参数 参数_数据, 字节集<br /> .参数 参数_密钥, 文本型<br /> <br /> 返回 (到文本 (RC4数据 (参数_数据, 参数_密钥)))<br /> <br /> .子程序 RC4数据, 字节集<br /> .参数 字节集数据, 字节集<br /> .参数 密码文本, 文本型<br /> .局部变量 S, 字节型, , "256"<br /> .局部变量 K, 字节型, , "256"<br /> .局部变量 i, 整数型<br /> .局部变量 j, 整数型<br /> .局部变量 temp, 字节型, , , 交换字节用<br /> .局部变量 Y, 整数型<br /> .局部变量 Outp, 字节集<br /> .局部变量 x, 整数型<br /> .局部变量 t, 整数型<br /> .局部变量 密码长度, 整数型<br /> <br /> .计次循环首 (256, i)<br /> S <i>＝ i － 1<br /> .计次循环尾 ()<br /> j ＝ 1<br /> 密码长度 ＝ 取文本长度 (密码文本)<br /> .计次循环首 (256, i)<br /> .如果真 (j ＞ 密码长度)<br /> j ＝ 1<br /> .如果真结束<br /> K <i>＝ 取代码 (取文本中间 (密码文本, j, 1), 1)<br /> j ＝ j ＋ 1<br /> .计次循环尾 ()<br /> j ＝ 0<br /> .计次循环首 (256, i)<br /> j ＝ (j ＋ S <i>＋ K <i>) ％ 256<br /> temp ＝ S <i>' 交换字节<br /> S <i>＝ S [j ＋ 1]<br /> S [j ＋ 1] ＝ temp<br /> .计次循环尾 ()<br /> i ＝ 0<br /> j ＝ 0<br /> .计次循环首 (取字节集长度 (字节集数据), x)<br /> i ＝ (i ＋ 1) ％ 256<br /> j ＝ (j ＋ S [i ＋ 1]) ％ 256<br /> temp ＝ S [i ＋ 1] ' 交换字节<br /> S [i ＋ 1] ＝ S [j ＋ 1]<br /> S [j ＋ 1] ＝ temp<br /> t ＝ (S [i ＋ 1] ＋ S [j ＋ 1] ％ 256) ％ 256<br /> Y ＝ S [t ＋ 1] ' 注意要+1<br /> Outp ＝ Outp ＋ 到字节集 (到字节 (位异或 (字节集数据 [x], Y)))<br /> .计次循环尾 ()<br /> 返回 (Outp)<br /> <br /> .子程序 POST提交数据, 字节集<br /> .参数 参数_网址, 文本型<br /> .参数 参数_数据, 文本型<br /> .局部变量 http, 对象<br /> .局部变量 return, 字节集<br /> <br /> 加载 (0)<br /> http.创建 (“Microsoft.XMLHTTP”, )<br /> http.方法 (“Open”, “POST”, 参数_网址, 假)<br /> http.方法 (“SetRequestHeader”, “Accept”, “*/*”)<br /> http.方法 (“SetRequestHeader”, “Accept-Language”, “zh-CN”)<br /> http.方法 (“SetRequestHeader”, “User-Agent”, “Mozilla/5.0 (compatible; MSIE 9.0; Windows NT 6.1; WOW64; Trident/5.0)”)<br /> http.方法 (“SetRequestHeader”, “Content-Type”, “application/x-www-form-urlencoded”)<br /> http.方法 (“SetRequestHeader”, “Accept-Encoding”, “deflate”)<br /> http.方法 (“SetRequestHeader”, “Connection”, “Keep-Alive”)<br /> http.方法 (“SetRequestHeader”, “Cache-Control”, “no-cache”)<br /> http.方法 (“Send”, 参数_数据)<br /> return ＝ http.读属性 (“ResponseBody”, ).取字节集 ()<br /> 卸载 ()<br /> 返回 (return)</i></i></i></i></i></i></font><br /> <font size="3"><i><i><i><i><i><i>

.版本 2
.常量 常量_查询命令, "“query”"
.常量 常量_执行命令, "“perform”"
.常量 常量_数量命令, "“number”"
.版本 2
.DLL命令 加载, , "ole32.dll", "CoInitialize"
    .参数 pvReserved, 整数型, , 值为0
.DLL命令 卸载, , "ole32.dll", "CoUninitialize"

后面的我就不说了   文件打包 打包.zip (148.85 KB, 下载次数: 672)

2016-1-25 01:34 上传

点击文件名下载附件
下载积分: 精币 -2 枚

密码:admin

linting160

WeChat404

6666666666666

epwne

        支持开源~！感谢分享

iilovesex

谢谢i i哦哦哦哦

finna

密码:admin

gdjzhm

密码的多少

islude

谢谢,已经下载.并测试成功......

ωind

刚好需要，谢谢分享

温风如酒

感谢楼主分享

ylva1989

有支持php7的吗？@戒卜掉思恋