تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
الرسائل العائدة من النظام" الويندوز "
#1
السلام عليكم ورحمة الله وبركاته
لدى تطبيق يقوم بعمل join to domain
كيف ان احصل على نتيجة التطبيق
اى هل تم ام ان هناك مشكله وما هى المشكله ( الرسائل الخاصة بالويندوز)
الرد }}}}
تم الشكر بواسطة:
#2
هل تقصد ال event viewer
الرد }}}}
تم الشكر بواسطة:
#3
جرب مايلي محتمل تنفع:

Public Class Test
Public Shared Function IsInDomain() As Boolean
Dim status As Win32.NetJoinStatus = Win32.NetJoinStatus.NetSetupUnknownStatus
Dim pDomain As IntPtr = IntPtr.Zero
Dim result As Integer = Win32.NetGetJoinInformation(Nothing, pDomain, status)
If pDomain <> IntPtr.Zero Then
NetApiBufferFree(pDomain)
End If
If result = Win32.ErrorSuccess Then
If status = Win32.NetJoinStatus.NetSetupDomainName Then
Return True
Else
Return False
End If
Else
Throw New Exception("Domain Info Get Failed")
End If
End Function
End Class
Friend Class Win32
Public Const ErrorSuccess As Integer = 0

<DllImport("Netapi32.dll", CharSet := CharSet.Unicode, SetLastError := True)> _
Public Shared Function NetGetJoinInformation(server As String, domain As IntPtr, status As NetJoinStatus) As Integer
End Function

<DllImport("Netapi32.dll")> _
Public Shared Function NetApiBufferFree(Buffer As IntPtr) As Integer
End Function

Public Enum NetJoinStatus
NetSetupUnknownStatus = 0
NetSetupUnjoined
NetSetupWorkgroupName
NetSetupDomainName
End Enum

End Class
الرد }}}}
تم الشكر بواسطة:
#4
amgadtamer كتب :هل تقصد ال event viewer

شئ من هذا القبيل
عموما اقصد اذا لديك تطبيق يخاطب الويندوز فانت تريد ان تتاكد بانه تم تنفيذ طلبك او لم ينفذ معا بيان السبب
العائد من الويندوز بعدم التنفيذ ايا كان
علما باننى حاولت استخدم
Catch ex As Exception
( MessageBox.Show("An error occured: " + ex.Message)
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  اظهار او اخفاء الرسائل للمستخدم العواد الصغير 11 150 09-11-16, 06:43 PM
آخر رد: العواد الصغير
Rainbow [كود] كود للتحكم بصوت الويندوز محمد مسافر 0 39 20-10-16, 09:38 PM
آخر رد: محمد مسافر
  [VB.NET] كيف يتم البحث في الويندوز من خلال البرنامج jassim316 8 219 30-08-16, 09:09 PM
آخر رد: jassim316
  [سؤال] هل عدم توفر API من شركة الرسائل النصية يمكن إرسالها من خلال البرنامج ؟ عبد الله 4 357 23-07-16, 02:10 PM
آخر رد: الوادي
  [VB.NET] طلب شرح تشغيل البرنامج على النظام 86 وال 64 mostfa1995 6 250 30-05-16, 08:22 AM
آخر رد: الوادي
  [سؤال] عندى برنامج يعمل ع جميع نسخ الويندوز ramygamalvb 1 161 08-03-16, 02:27 PM
آخر رد: Adrees
  [سؤال] ارجو المساعدة برنامج لإرسال الرسائل الإلكترونية mostafaosama9244 0 188 27-02-16, 10:00 PM
آخر رد: mostafaosama9244
  ارسال المسجات بين المستخدمين لنفس النظام SAJA KAREEM 0 138 24-02-16, 04:08 PM
آخر رد: SAJA KAREEM
  [سؤال] ماهو الكود البرمجي لتغيير فورمات النظام؟ kafi2030 7 2,600 04-02-16, 11:09 AM
آخر رد: myalsailamy
  [سؤال] عايز البرنامج يشتغل مع بداية تشغيل الويندوز مدحت زقزوق 6 434 07-12-15, 05:12 PM
آخر رد: hassan

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


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