1. 怎麼寫易語言軟體的收費源碼
可以的,這就是關繫到軟體的驗證問題,驗證方式通常有2種:
1:本地驗證模式
通過提取用戶電腦的特徵碼,然後加密一下,然後要求用戶在購買時提供相關加密後的特徵碼!
然後在給用戶軟體時,重新把特徵辯塌梁碼寫到程序中去,在程序運行時判斷特徵碼是否相符!
當然,你需要自己寫一個提取特徵碼並加密後輸出的小工具給用戶!
工具代碼例:
.版本 2
.支持庫攜運 dp1
.局部變數 i
i = 取硬碟特徵字 ()
.如果真 (i = 0)
編輯框1.內容 = 「提取機器碼失敗」
返回 ()
.如果真結束
編輯框1.內容 = 取數據摘要 (加密數據 (到位元組集 (i), 「自定義加密鑰匙」, ))
上面的代碼採用硬碟的特徵字來作為前提,然後再將內容加密,然後再將加密後的內容轉為MD5,並顯示到編輯框中,要求用戶把編輯的內容發給你!
然後就是在軟體中去效驗一下了!較為安全的做法例子:
.版本 2
.支持庫 dp1
.子程序 __啟動窗口_創建完畢
.局部變數 i
.局部變數 用戶提供的特徵, 文本型
.局部變數 當前提取的特徵, 文本型
用戶提供的特徵 = 「在程序中應該將用戶提供的特徵再次MD5來避免破解者使用內存工具來破解驗證部分」
' 用戶提供的特徵 =取數據摘要(到位元組集 (用戶提供的特徵))'這是2次MD5的方式,但要另外做好,然後再在程序中直接賦值
' 當然了,你可以多次MD5,更加安全一些
i = 取硬碟特徵字 ()
.如果真 (i = 0)
信息框 (「驗證失敗!」, 0, ) ' 編輯框1.內容 = 「提取機器碼失敗」
返回 ()
.如果真結束
' 然後用同樣的方法,將提取到的特徵加密後,然後再根據你事先MD5的次數來處理
當前提取的特徵 = 取數據摘要 (加密數據 (到位元組集 (i), 「自定義加密鑰匙」, ))
.如果真 (當前提取的特徵 ≠ 用戶提供的特徵)
時鍾1.時鍾周期 = 5000 ' 不直接結束程序,而是使用一個5秒的時鍾
.如果真結束
'正常處理代碼
.子程序 _時鍾1_周期事件
結束 () ' 這樣的處理方式,能做一些小欺騙,避免被輕易破解!
以上是一些驗證方面的代碼以及一些商業軟體應具備一些防破解的意識!
當然了,要想真正做到防破解並不容易,這里的代碼只能起到一些很小的作用,對於大鳥來說,這是沒用的!防破解的技術比較復雜這里就不再說這個問題先!
2:c/s驗證模式
即客戶端和伺服器通訊方式進行驗證,這里的做法就好比QQ登陸一樣,
提供一個用戶注冊的界面,而且為應用程序製作一個伺服器,E語言可以使用客戶端和伺服器控制項
進行TCP通訊,伺服器部分需要有資料庫,把用戶的注冊數據記錄在資料庫中!
客戶端部分在用戶操作注冊的同時,把用戶電腦的特徵字也一並發送到伺服器,
客戶端再提供一個用戶登陸界面,這樣,用戶輸入賬號和密碼進行登陸,客戶端把登陸的信息和當前登陸的用戶的電腦的特徵字發給伺服器,伺服器進行用戶信息的驗證和處理,伺服器部分就可以根據這些信息進行處理!伺服器處理後,再將結果發送給客戶端,就好比QQ登陸時,當你的密碼輸入錯誤,伺服器會發送一個密碼輸入錯誤的信息給客戶端,然後客戶端收到這個數據包後,就彈出一個窗口提醒用戶,密碼不正確,登陸失敗的提示!代碼太多,這就不寫出來了!大致上需要掌握就是E的伺服器和客戶端控制項的應用!
當然了,一般伺服器比分,如果自己架設不適合的話,就需要去租伺服器!
但是成本較大,租網頁形式的,就需要會學ASP.net
並且有伺服器的情況下,還可以考慮製作自動更新,每次客戶端登陸的時候都把當前客戶端的版本發給伺服器,伺服器進行版本驗證,檢查是否有更新的版本,然後通知衫輪客戶端有新版本是否立即更新!
這里涉及更多的技術知識,我就不一一陳述了!
以上回答都是純手工回答,貼出的代碼均為實時在E中編寫並貼出!
轉載請註明出處...謝謝
2. 易語言 源碼
.版本 2
.支持庫 shellEx
.支持庫 eAPI
.程序集 窗口程序集1
.子程序 __啟動窗口_創建完畢
注冊熱鍵 (_啟動窗口.取窗口句柄 (), 標簽1.取窗口句柄 (), 0, #Q鍵)
.子程序 _標簽1_反饋事件, 整數型
.參數 參數一, 整數型
.參數 參數二, 整數型
模擬按鍵 (#鍵2, , )
延時 (100)
模擬按鍵 (#鍵1, , )
延時 (100)
模擬按鍵 (#鍵3, , )
只需要在窗口中加一個標簽組件就可以實現你要的功能了!!!
3. 易語言源碼
哦 哦 ,那我給你個記事本的源碼吧 如下
.版本 2
.支持庫 iext2
.支持庫 iext
.支持庫 eAPI
.程序集 窗口程序集1
.程序集變數 文件路徑, 文本型
.程序集變數 當前是否正在打字, 邏輯型
.子程序 _超級編輯框1_內容被改變, , , 更改超級編輯框的顏色
.局部變數 顏色, 字元格式
顏色.文本顏色 = 取顏色值 (取隨機數 (0, 255), 取隨機數 (0, 255), 取隨機數 (0, 255))
超級編輯框1.置選擇區字元格式 (顏色)
狀態條1.置文本 (0, 「行 」 + 到文本 (超級編輯框1.取行數 ()) + 「 文本長度 」 + 到文本 (超級編輯框1.取文本長度 ()))
.子程序 __啟動窗口_創建完畢, , , 設置通用對話框
通用對話框1.過濾器 = 「txt|*.txt」
通用對話框1.默認文件後綴 = 「txt」
通用對話框1.標題 = 「傳說記事本保存對話框...」
_時間日期_被選擇 ()
_炫銀皮膚_被選擇 ()
備忘錄提醒 ()
.子程序 __啟動窗口_位置被改變, , , 位置被改變後超級編輯框也跟著改變(按鈕1也跟著改變)
.如果真 (_啟動窗口.位置 = 3)
超級編輯框1.寬度 = 取屏幕寬度 () - 3
超級編輯框1.高度 = 取屏幕高度 () - 80 - 按鈕1.高度 - 10
按鈕1.頂邊 = 取屏幕高度 () - 狀態條1.高度 - 100
按鈕1.寬度 = 取屏幕寬度 () - 5
按鈕1.高度 = 狀態條1.高度 + 10
.如果真結束
.如果真 (_啟動窗口.位置 = 0)
超級編輯框1.寬度 = _啟動窗口.寬度 - 10
超級編輯框1.高度 = _啟動窗口.高度 - 55 - 按鈕1.高度 - 10
按鈕1.頂邊 = 200
按鈕1.寬度 = 560
.如果真結束
.子程序 _新建_被選擇, , , New文件
.如果真 (超級編輯框1.內容 ≠ 「」)
.如果真 (信息框 (「您還沒保存!請問您要進行保存嗎?」, 4, ) = #是鈕)
通用對話框1.類型 = 1
通用對話框1.打開 ()
寫到文件 (通用對話框1.文件名, 到位元組集 (超級編輯框1.內容))
.如果真結束
.如果真結束
.子程序 _打開_被選擇, , , Open文件
通用對話框1.類型 = 0
通用對話框1.打開 ()
.如果真 (通用對話框1.文件名 ≠ 「」)
超級編輯框1.內容 = 到文本 (讀入文件 (通用對話框1.文件名))
文件路徑 = 通用對話框1.文件名
.如果真結束
.子程序 _保存_被選擇, , , Save文件
.如果真 (文件路徑 = 「」)
通用對話框1.類型 = 1
通用對話框1.打開 ()
寫到文件 (通用對話框1.文件名, 到位元組集 (超級編輯框1.內容))
.如果真結束
.如果真 (文件路徑 ≠ 「」)
寫到文件 (文件路徑, 到位元組集 (超級編輯框1.內容))
.如果真結束
.子程序 _保存到_被選擇, , , Save As文件
通用對話框1.類型 = 1
通用對話框1.打開 ()
.如果真 (通用對話框1.文件名 ≠ 「」)
寫到文件 (通用對話框1.文件名, 到位元組集 (超級編輯框1.內容))
.如果真結束
.子程序 _撤銷_被選擇, , , Undo 文本
超級編輯框1.撤消 ()
.子程序 _剪切_被選擇, , , Cut 文本
超級編輯框1.剪切 ()
.子程序 _復制_被選擇, , , Copy 文本
超級編輯框1.復制 ()
.子程序 _粘連_被選擇, , , Paste文本
超級編輯框1.粘貼 ()
.子程序 _刪除_被選擇, , , Delete文本
超級編輯框1.刪除 ()
超級編輯框1.內容 = 取文本左邊 (超級編輯框1.內容, 取文本長度 (超級編輯框1.內容) - 1)
.子程序 _尋找_被選擇, , , Find文本
載入 (Find窗口, , 真)
.子程序 _尋找下一個_被選擇, , , 還沒解決好
.子程序 _文本替換_被選擇, , , 文本替換
載入 (文本替換窗口, , 真)
.子程序 _跳到_被選擇, , , 還沒解決好
載入 (跳到窗口, , 真)
.子程序 _全選_被選擇, , , Select All文本
超級編輯框1.被選擇字元數 = 取文本長度 (超級編輯框1.內容)
.子程序 _時間日期_被選擇, , , Time-Date
.局部變數 小時, 文本型
.局部變數 分鍾, 文本型
.局部變數 日期, 文本型
.局部變數 年份, 文本型
.局部變數 月份, 文本型
.局部變數 日份, 文本型
小時 = 到文本 (取小時 (取現行時間 ()))
分鍾 = 到文本 (取分鍾 (取現行時間 ()))
年份 = 到文本 (取年份 (取現行時間 ()))
月份 = 到文本 (取月份 (取現行時間 ()))
日份 = 到文本 (取日 (取現行時間 ()))
狀態條1.置文本 (1, 小時 + 「:」 + 分鍾 + 「 」 + 年份 + 「-」 + 月份 + 「-」 + 日份)
.子程序 _傳說記事本v13_被選擇, , , About Notepad
信息框 (「軟體作者:古老的傳說」 + #換行符 + 「QQ:1041750677」 + #換行符 + 「MSN:[email protected]」 + #換行符 + 「編寫工具:易語言」 + #換行符 + 「軟體版本:1.3」 + #換行符, 0, )
.子程序 _密碼保管_被選擇, , , Password Protect
載入 (密碼窗口, , 真)
.子程序 _備忘錄_被選擇, , , 載入備忘錄窗口
載入 (備忘錄窗口, , 真)
.子程序 備忘錄提醒, , , 備忘錄提醒
.局部變數 分割文本, 文本型, , "0"
.局部變數 今天日期, 文本型
.局部變數 分割今天日期, 文本型, , "0"
分割文本 = 分割文本 (讀配置項 (取運行目錄 () + 「\備忘錄.ini」, 「備忘錄」, 「提示日期」, ), 「日」, )
今天日期 = 到文本 (取日期 (取現行時間 ()))
分割今天日期 = 分割文本 (今天日期, 「日」, )
.如果真 (取數組成員數 (分割文本) = 1 或 取數組成員數 (分割文本) > 1)
.如果真 (分割文本 [1] = 分割今天日期 [1])
狀態條1.置文本 (2, 「您今天有一份備忘錄噢^_^」)
.如果真結束
.如果真結束
.子程序 _銀白皮膚_被選擇, , , 銀白皮膚
更換新皮膚 (1)
.子程序 _淺白皮膚_被選擇, , , 淺白皮膚
更換新皮膚 (10)
.子程序 _淺灰皮膚_被選擇, , , 淺灰皮膚
更換新皮膚 (13)
.子程序 _淺藍皮膚_被選擇, , , 淺藍皮膚
更換新皮膚 (19)
.子程序 _淺黑皮膚_被選擇, , , 淺黑皮膚
更換新皮膚 (5)
.子程序 _炫銀皮膚_被選擇, , , 炫銀皮膚
更換新皮膚 (2)
.子程序 _炫白皮膚_被選擇, , , 炫白皮膚
更換新皮膚 (15)
.子程序 _炫藍皮膚_被選擇, , , 炫藍皮膚
更換新皮膚 (18)
.子程序 _深黑皮膚_被選擇, , , 深黑皮膚
更換新皮膚 (14)
.子程序 __啟動窗口_可否被關閉, 邏輯型, , 透明顯示最小化運行
.局部變數 變數1, 整數型
變數1 = 255
.計次循環首 (255, )
設置窗口透明度 (_啟動窗口.取窗口句柄 (), 變數1)
變數1 = 變數1 - 1
.如果真 (變數1 = 1)
置托盤圖標 (#程序圖標, 「古老的傳說記事本v1.2」)
_啟動窗口.可視 = 假
.如果真結束
.計次循環尾 ()
返回 (假)
.子程序 __啟動窗口_托盤事件, , , 透明顯示_啟動窗口
.參數 操作類型, 整數型
.局部變數 變數1, 整數型
.如果真 (操作類型 = 1)
_啟動窗口.可視 = 真
.計次循環首 (255, 變數1)
設置窗口透明度 (_啟動窗口.取窗口句柄 (), 變數1)
.計次循環尾 ()
.如果真結束
.如果真 (操作類型 = 3)
彈出菜單 (圖標菜單, 取滑鼠水平位置 (), 取滑鼠垂直位置 ())
.如果真結束
.子程序 __啟動窗口_將被銷毀, , , 銷毀任務欄圖標
置托盤圖標 ({ }, )
.子程序 _打開傳說記事本_被選擇, , , _啟動窗口.可視=真
__啟動窗口_托盤事件 (1)
.子程序 _銷毀_被選擇, , , 銷毀軟體
銷毀 ()
.子程序 _超級編輯框1_按下某鍵, 邏輯型, , 正在打字中...
.參數 鍵代碼, 整數型
.參數 功能鍵狀態, 整數型
當前是否正在打字 = 真
按鈕1.標題 = 「正在打字中...」
時鍾1.時鍾周期 = 800
返回 (真)
.子程序 _超級編輯框1_放開某鍵, 邏輯型, , 暫停打字中...
.參數 鍵代碼, 整數型
.參數 功能鍵狀態, 整數型
當前是否正在打字 = 假
返回 (真)
.子程序 _時鍾1_周期事件, , , 暫停打字中...
.如果真 (當前是否正在打字 = 假)
按鈕1.標題 = 「暫停打字中...」
.如果真結束
.子程序 _超級編輯框1_選擇區被改變, , , 超級編輯框1.滾動
超級編輯框1.滾動 (1)
4. 易語言默認的保存源碼的途徑是哪裡 求大神給我 剛寫的源碼忘了另存了哎
你所說的默認路徑是對話框最後一次保存的路徑,並沒有固定的默認路徑
1、你可以點擊「程序」菜單-->>下面有一些近期使用過的源碼文件!
2、新建一個源碼文件,點保存,彈出的對話框路徑就是這前保存的路徑了
如下圖:
5. 易語言源碼是什麼
就是 文件名.e的文件 用這個文件 可以修改程序的功能 界面等 把它改寫成你自己的程序 如果你想學習易語言推薦去赤血學院 學習一下 哪裡成套的視頻教程 可以讓你快速入門。
6. 易語言源碼工具箱源碼
製作方案:
准備一個要載入工具箱的exe
新建個易語言程序,進入易語言-插入-資源-圖片或圖片組
將圖片1改為exe
雙擊內容
導入新圖片
然後載入exe
回到啟動窗口,新建個按鈕,按鈕輸入代碼:
寫到文件("D:\臨時調試文件.exe",#exe)
運行("D:\臨時調試文件.exe")
刪除文件("D:\臨時調試文件.exe")
然後調試程序,點擊那個按鈕,你會發現剛才載入的exe運行了!