05-05-16, 01:40 PM
أنا أستخدم بالعادة الإجراء المدرج أدناه لإعادة رسائل الخطأ للمستخدم بعد اعتراضها باستخدام حلقة try..Catch
بس هي الطريقة بتفيدني أنا من أجل حل مشاكل البرنامج وبما أنو البرنامج عاملو للشركة التي أعمل بها إذا لا مشكلة بما أنني متواجد دوما ولكن إذا نفذت برنامج لزبون أعتقد أنه سيواجه بعض الإرباك نتيجة لرسائل الخطأ
برأيكم ما هي الطريقة الأمثل لإظهار رسائل خطأ للمستخدم وبنفس الوقت أفهم ما يجري ضمن الكود مع ملاحظة أن نوعية البرنامج الذي أتعامل معه هو Asp.net مع كود Vb.net وليس Desktop Application فهنا لايمكنني استخدام Windows Event Log لتسجيل الأخطاء وتتبعها
الكود
بس هي الطريقة بتفيدني أنا من أجل حل مشاكل البرنامج وبما أنو البرنامج عاملو للشركة التي أعمل بها إذا لا مشكلة بما أنني متواجد دوما ولكن إذا نفذت برنامج لزبون أعتقد أنه سيواجه بعض الإرباك نتيجة لرسائل الخطأ
برأيكم ما هي الطريقة الأمثل لإظهار رسائل خطأ للمستخدم وبنفس الوقت أفهم ما يجري ضمن الكود مع ملاحظة أن نوعية البرنامج الذي أتعامل معه هو Asp.net مع كود Vb.net وليس Desktop Application فهنا لايمكنني استخدام Windows Event Log لتسجيل الأخطاء وتتبعها
الكود
كود :
Public Shared Function interpret_error_number(ByVal InErrorNumber As Integer) As String
Dim ResponseMessage As String
Select Case InErrorNumber
Case 2627, 2601
ResponseMessage = "خطأ تكرار قيمة موجودة"
Case 102, 207
ResponseMessage = "صيغة أمر خاطئة"
Case 208
ResponseMessage = "اسم عنصر خاطئ"
Case 547
ResponseMessage = "تضارب مع شرط مفتاح مرتبط"
Case 245, 8114
ResponseMessage = "خطأ تحويل بين أنواع البيانات"
Case 4060
ResponseMessage = "لا يمكن فتح قاعدة البيانات أو أن المخدم يرفض الإتصال"
Case 137
ResponseMessage = "متغير غير معرف"
Case 134
ResponseMessage = "المتغير معرف مسبقا"
Case 515
ResponseMessage = "إدراج قيمة فارغة في حقل لا يقبل قيم فارغة"
Case 271
ResponseMessage = "خطأ حماية بيانات. هل تحاول الكتابة إلى حفل حسابي"
Case 241
ResponseMessage = "خطأ تحويل قيمة نصية/رقمية إلى وقت/تاريخ"
Case 209
ResponseMessage = "اسم عمود غامض"
Case 195
ResponseMessage = "صيغة IS خاطئة"
Case 156
ResponseMessage = "صيغة استعلام خاطئة"
Case 402
ResponseMessage = "خطأ حماية بيانات. انواع البيانات غير متوافقة مع المعامل الممرر"
Case 108
ResponseMessage = "رقم الترتيب في قسم الترتيب خارج المجال المقبول"
Case 189
ResponseMessage = "المحددات الممرة للإجرائية ناقصة"
Case 8187
ResponseMessage = "المقبض المطلوب مستخدم من قبل أمر آخر"
Case 8178
ResponseMessage = "الاستعلام يتوقع محدد ولكنه غير ممرر للاستعلام"
Case 4104
ResponseMessage = "لم يتم العثور على المتغير متعدد الأجزاء"
Case 8152
ResponseMessage = "النص المدخل طويل جدا"
Case 105
ResponseMessage = "علامة تنصيص غير مغلقة بعد النص في الاستعلام"
Case Else
ResponseMessage = "خطأ تنفيذ عملية في قاعدة البيانات"
End Select
Return ResponseMessage & ", رقم الخطأ: " & InErrorNumber
End Function