تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
تعديل هذا الكود
#1
كود :
<DllImport("kernel32", EntryPoint:="ReadProcessMemory", CharSet:=CharSet.Ansi, SetLastError:=True, ExactSpelling:=True)> _
    Private Shared Function ReadProcessMemory1(ByVal hProcess As Integer, ByVal lpBaseAddress As Integer, ByRef lpBuffer As Integer, ByVal nSize As Integer, ByRef lpNumberOfBytesWritten As Integer) As Integer
    End Function
كود :
Public Shared Function ReadLong(ByVal ProcessName As String, ByVal Address As Integer, Optional ByVal nsize As Integer = 4) As Long
        Dim num2 As Long
        Dim num3 As Long
        If ProcessName.EndsWith(".exe") Then
            ProcessName = ProcessName.Replace(".exe", "")
        End If
        Dim processesByName As Process() = Process.GetProcessesByName(ProcessName)
        If (processesByName.Length = 0) Then
            MessageBox.Show((ProcessName & " isn't open!"))
            Return num2
        End If
        Dim ptr As IntPtr = DirectCast(ReadWritingMemory.OpenProcess(&H1F0FF, 0, processesByName(0).Id), IntPtr)
        If (ptr = IntPtr.Zero) Then
            MessageBox.Show(("Failed to open " & ProcessName & "!"))
            Return num2
        End If
        Dim lpBaseAddress As Integer = Address
        Dim lpNumberOfBytesWritten As Integer = 0
        ReadWritingMemory.ReadProcessMemory3(CInt(ptr), lpBaseAddress, num3, nsize, lpNumberOfBytesWritten)
        Return num3
    End Function
المشكله فى
كود :
Dim ptr As IntPtr = DirectCast(ReadWritingMemory.OpenProcess(&H1F0FF, 0, processesByName(0).Id), IntPtr)
مع انى دايف
كود :
<DllImport("kernel32", EntryPoint:="ReadProcessMemory", CharSet:=CharSet.Ansi, SetLastError:=True, ExactSpelling:=True)> _
    Private Shared Function ReadProcessMemory3(ByVal hProcess As Integer, ByVal lpBaseAddress As Integer, ByRef lpBuffer As Integer, ByVal nSize As Integer, ByRef lpNumberOfBytesWritten As Integer) As Integer
    End Function
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] برجاء المساعدة فى تعديل هذا الكود (htmlDocument.DocumentNode.SelectNodes) الماجيك مسعد 13 167 منذ 2 ساعة مضت
آخر رد: ابو ليلى
  كيفية تشغيل وإغلاق الادوات الذكية لويندوز 7 عن طريق الكود رمضان محمد 0 47 أمس, 12:22 PM
آخر رد: رمضان محمد
  [VB.NET] كيف اوضع ProgressBar في هذا الكود e-coder 0 51 23-05-17, 07:43 PM
آخر رد: e-coder
  [VB.NET] احتاج تعديل الكود يخص تشغيل Button حسب user domin hglogtd 4 106 22-05-17, 09:25 AM
آخر رد: hglogtd
  [VB.NET] اريد وضع مؤقت بدون تايمر داخل هذا الكود + المشروع بالكامل e-coder 0 50 19-05-17, 04:09 PM
آخر رد: e-coder
  منع تعديل التاريخ والوقت ريم النهاري 7 149 18-05-17, 09:28 AM
آخر رد: ريم النهاري
  [VB.NET] كيف اضع وقت في هذا الكود e-coder 4 130 18-05-17, 08:07 AM
آخر رد: e-coder
  اين الخطا في هذا الكود rabeh.ram 18 466 16-05-17, 10:48 PM
آخر رد: rabeh.ram
  [مشروع] ممكن تعديل علي المشروع دموع الوطن 12 206 15-05-17, 09:29 AM
آخر رد: دموع الوطن
  [كود] طلب الكود للتاريخ الميلادي كتابياُ باسم الشهر الميلادي . محمد مسافر 2 81 11-05-17, 12:42 AM
آخر رد: محمد مسافر

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم