登录密码错误

yqzlh520

一个获取的源码失效了提示 "密码错误，请重新登录"}”
网页登录成功，易语言登录不上去好像是加密了，能解决么

欣少

  

子程序名	返回值类型	公开	备 注
登陆
参数名	类 型	参考	可空	数组	备 注
用户名	文本型
密码	文本型

变量名	类 型	静态	数组	备 注
url	文本型
data	文本型
t	文本型
ret	文本型
pwd	文本型

url ＝ “http://112.132.249.141:12380/index/users/chklogin”
t ＝ 时间_取现行时间戳 ()
pwd ＝ 取数据摘要 (到字节集 (用户名 ＋ 取数据摘要 (到字节集 (密码)) ＋ t))
data ＝ “username=” ＋ 用户名 ＋ “&password=” ＋ pwd ＋ “&time=” ＋ t
ret ＝ 到文本 (编码_编码转换对象 (网页_访问_对象 (url, 1, data, , , , , , , , , , , , , , , , ), , , ))
调试输出 (编码_usc2到ansi (ret))

i支持库列表	支持库注释
dp1	数据操作支持库一
spec	特殊功能支持库

.版本 2<br /> .支持库 dp1<br /> .支持库 spec<br /> <br /> .子程序 登陆<br /> .参数 用户名, 文本型<br /> .参数 密码, 文本型<br /> .局部变量 url, 文本型<br /> .局部变量 data, 文本型<br /> .局部变量 t, 文本型<br /> .局部变量 ret, 文本型<br /> .局部变量 pwd, 文本型<br /> <br /> url ＝ “http://112.132.249.141:12380/index/users/chklogin”<br /> t ＝ 时间_取现行时间戳 ()<br /> pwd ＝ 取数据摘要 (到字节集 (用户名 ＋ 取数据摘要 (到字节集 (密码)) ＋ t))<br /> data ＝ “username=” ＋ 用户名 ＋ “&password=” ＋ pwd ＋ “&time=” ＋ t<br /> ret ＝ 到文本 (编码_编码转换对象 (网页_访问_对象 (url, 1, data, , , , , , , , , , , , , , , , ), , , ))<br /> 调试输出 (编码_usc2到ansi (ret))

欣少

写的很清楚了。 password = md5(username+md5(password)+timestamp)

yqzlh520

欣少 发表于 2023-12-25 08:54
[e=0].版本 2
.支持库 dp1
.支持库 spec

.版本 2
.支持库 spec
.支持库 EThread

.子程序 登陆账号
.局部变量 登陆结果, 文本型
.局部变量 cookie1, 文本型
.局部变量 cookie2, 文本型

登陆结果 ＝ 编码_usc2到ansi (网页访问u (“http://112.132.249.141:8088/index/users/chklogin”, 1, “username=” ＋ 编辑框_账号.内容 ＋ “&password=” ＋ 编辑框_密码.内容, , cookie1, , #常量1))
程序_延时 (1000)
调试输出 (登陆结果, cookie1)
.如果 (寻找文本 (登陆结果, “成功”, , 假) ≠ -1)
    编辑框1.加入文本 (登陆结果 ＋ #换行符)
    程序_延时 (1000)
    网页访问u (“http://112.132.249.141:8088/index”, 0, “username=” ＋ 编辑框_账号.内容 ＋ “&password=” ＋ 编辑框_密码.内容, , cookie2, , #常量2)
    cookie ＝ cookie2 ＋ “;” ＋ cookie1
    编辑框_cookie.内容 ＝ cookie
    调试输出 (cookie2, cookie)
    启动线程 (&cha询上次闯关, , )
.否则
    编辑框1.加入文本 (登陆结果 ＋ #换行符)
.如果结束

可以帮我修改一下这个么

a3055389

稍微改一下就行了，看图

yqzlh520

a3055389 发表于 2023-12-25 09:22
稍微改一下就行了，看图

和我的源码不一致不会修改 容我修改看看

欣少

yqzlh520 发表于 2023-12-25 09:15
.版本 2
.支持库 spec
.支持库 EThread

545901162 q   , 我帮给你改