版本 2
.支持庫 dp1
.支持庫 internet
.支持庫 eAPI
.程序集 窗口程序集1
.子程序 __啟動窗口_創建完畢
.判斷開始 (文件是否存在 (取運行目錄 () + “/帳號.ini”))
編輯框2.內容 = 到文本 (讀入文件 (取運行目錄 () + “/密碼.ini”))
編輯框2.內容 = 到文本 (解密數據 (到字節集 (編輯框2.內容), “52cenziyu”, 2))
編輯框1.內容 = 到文本 (讀入文件 (取運行目錄 () + “/帳號.ini”))
編輯框1.內容 = 到文本 (解密數據 (到字節集 (編輯框1.內容), “52cenziyu”, 2))
.默認
返回 ()
.判斷結束
.子程序 _按鈕2_被單擊
銷毀 ()
.子程序 _按鈕1_被單擊
撥號 (“@0”, 編輯框1.內容, 編輯框2.內容, , )
標題 = “正在連接中”
延時 (3000)
.判斷開始 (是否與互聯網連接 ())
' 信息框 (“連接成功”, 0, )
' 信息框 (“您的計算機已經成功連接到了互聯網”, 0, )
寫到文件 (取運行目錄 () + “/帳號.ini”, 到字節集 (加密數據 (到字節集 (編輯框1.內容), “52cenziyu”, 2)))
寫到文件 (取運行目錄 () + “/密碼.ini”, 到字節集 (加密數據 (到字節集 (編輯框2.內容), “52cenziyu”, 2)))
' 信息框 (“您的IP為:” + 取IP地址 (), 0, )
銷毀 ()
.默認
信息框 (“連接失敗,請檢查帳號密碼是否正確”, 0, )
返回 ()
.判斷結束
.子程序 _按鈕3_被單擊
掛斷 ()