国产精品爱啪在线线免费观看_97视频精品_欧美精品一区二区在线播放_国产欧美久久一区二区三区

新秀網絡驗證系統

標題: 第六節:易語言開發實例【登錄初始化】 [打印本頁]

作者: admin    時間: 2018-12-27 14:14
標題: 第六節:易語言開發實例【登錄初始化】
安裝支持庫:彗星HTTP支持庫1.6版本(內附實例及安裝方法)
(, 下載次數: 1504)
(, 下載次數: 3030)
第一步:新建自定義數據類

[ecode].版本 2

.數據類型 新秀用戶信息, 公開
    .成員 uid, 文本型, , , 用戶uid
    .成員 name, 文本型, , , 用戶名
    .成員 groupid, 文本型, , , 會員組id
    .成員 adminid, 文本型, , , 管理組id
    .成員 token, 文本型, , , token令牌
    .成員 sgin, 文本型, , , 卡號
    .成員 datetime, 文本型, , , 計時用戶到期時間
    .成員 grouptime, 文本型, , , 用戶組到期時間

.數據類型 新秀網絡驗證設置, 公開
    .成員 域名, 文本型, , , 網站域名帶http://
    .成員 key, 文本型, , , 傳輸密鑰
    .成員 adminkey, 文本型, , , 管理密鑰
[/ecode]

第二步:新建自定義數據類型

[ecode].版本 2
.支持庫 CometHttp

.全局變量 用戶, 新秀用戶信息
.全局變量 設置, 新秀網絡驗證設置
.全局變量 類_json, 彗星JSON
.全局變量 返回數據, 文本型
.全局變量 API接口拼接, 文本型
[/ecode]
第三步:寫登錄接口代碼

(, 下載次數: 1493)
[ecode].版本 2
.支持庫 CometHttp

.程序集 窗口程序集_啟動窗口

.子程序 __啟動窗口_創建完畢

加載網站設置 ()

.子程序 _按鈕_登陸_被單擊
.局部變量 json, 彗星JSON

API接口拼接 = 設置.域名 + “login&key=” + 設置.key + “&action=login_user&username=” + 用戶名_輸入框.內容 + “&password=” + 密碼_輸入框.內容
返回數據 = 彗星HTTP讀文本 (API接口拼接, , , , , , , , )
類_json.解析 (返回數據, 真)  ' 解析json格式數據
.如果 (類_json.取文本屬性 (“code”) = “200”)  ' 判斷是否成功:200成功,400是失敗
    json = 類_json.查詢 (“data”)  ' 查詢成功返回數據數組
    用戶.uid = json.取文本屬性 (“uid”)  ' 賦值全局變量用戶類值
    用戶.name = json.取文本屬性 (“username”)  ' 賦值全局變量用戶類值
    用戶.groupid = json.取文本屬性 (“groupid”)  ' 賦值全局變量用戶類值
    用戶.adminid = json.取文本屬性 (“adminid”)  ' 賦值全局變量用戶類值
    用戶.token = json.取文本屬性 (“token”)  ' 賦值全局變量用戶類值
    用戶.sgin = json.取文本屬性 (“sgin”)  ' 賦值全局變量用戶類值
    用戶.datetime = json.取文本屬性 (“dateline”)  ' 賦值全局變量用戶類值
    載入 (用戶信息, , 真)
.否則
    信息框 (類_json.取文本屬性 (“result”), 48, “錯誤提示碼:”, )
.如果結束


.子程序 加載網站設置

設置.域名 = “http://demo.xinxiuvip.com/plugin.php?id=xinxiu_network:”  ' 設置網站域名頭
設置.key = “123456”  ' 設置傳輸密鑰
設置.adminkey = “8888888”  ' 設置管理密鑰
[/ecode]
第四步:登錄成功返回用戶信息
(, 下載次數: 1475)
[ecode].版本 2

.程序集 窗口程序集_功能面板

.子程序 _功能面板_創建完畢

讀取登錄信息 ()

.子程序 讀取登錄信息

標簽_uid.標題 = 用戶.uid
標簽_name.標題 = 用戶.name
標簽_groupid.標題 = 用戶.groupid
標簽_adminid.標題 = 用戶.adminid
標簽_token.標題 = 用戶.token
標簽_sgin.標題 = 用戶.sgin
標簽_datetime.標題 = 用戶.datetime

[/ecode]
(, 下載次數: 4260)








作者: wuyujia2    時間: 2021-5-30 00:53
為什么看不到內容




歡迎光臨 新秀網絡驗證系統 (http://www.5566wy.com/) Powered by Discuz! X3.5