تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] تحويل الاسماء العربية الى انجليزية
#1
بسم الله الرحمن الرحيم

السلام عليكم

الاخوة الاحباء بحث عن كود لتحويل الاسماء من اللغة العربية الى الانجليزية فتوصلت الى كود يحول ولكن ليس دقيق 100%100 لذلك ساوضع الكود لكي يتم التعديل عليه من الاخوة في المنتدى لنصل الى طريقة صحيحة حتى الجميع يستفيد منها تحياتي للجميع



PHP كود :
Function TransA2E(As String) As String
        Try
            Dim p 
As Integer
            Dim AL
(), EL()
 
           AL = (New String() {" ال""َا""ا""أ""آ""ى""إ""ؤ""ئ""ب""ت""ث""ج""ح""خ""د""ذ""ر""ز""س""ش""ص""ض""ط""ظ""ع""غ""ف""ق""ك""ل""م""ن""ه""ة""ُوْ""و""ِيْ""ي""َ""ً""ُ""ٌ""ِ""ٍ""ء"})
 
           EL = (New String() {" al-""a""a""a""a""a""i""u""i""b""t""th""j""ha""kh""d""th""r""z""s""sh""s""sh""t""th""a""g""f""q""k""l""m""n""h""h""u""ou""i""y""a""tn""u""un""i""in""'a"})
 
           Do
                p 
InStr(1W"ّ")
 
               If p 0 Then W Left(W1) & Mid(W11) & Mid(W1)
 
           Loop While 0
            For R 
LBound(ALTo UBound(AL)
 
               W Replace(WAL(R), EL(R))
 
           Next
            TransA2E 
W
        Catch ex 
As Exception

        End 
Try
 
   End Function 
الله المستعان
الرد }}}}
تم الشكر بواسطة:
#2
السلام عليكم ،،،

لا اعلم عن مدى صحة الطريقة التي تقدمها و لكن اجعلها اخر حل من وجهة نظري لانها لا تعطي نتائج صحيحه بالنسبه لي فانا اعتمدت طريقه اخرى وهي اني جمعت اغلب الاسماء و الاكثر شيوعا بالمنطقه التي اعيش فيها و كان مشروعي لانشاء برنامج ارشيف لوحدة صحيه و من المشاكل التي واجهتها هي تحويل الحروف العربيه الى الانجليزيه بالمناسبه يطلق على هذه العمليه (رومنة الأسماء) اذا اردت البحث عنها بقوقل و ستجد مقالات و خوارزميات كثيره تتحدث بهذا الشأن على العموم كانت طريقتي اني دخلت احد اشهر مواقع الاسماء العربيه (بالمناسبه كان موقع لاختيار اسم مولودك الجديد هههههه ) و التي مكتوبه بالعربيه و ما يقابل الاسم بالانجليزي و كونت لي قاعدة بيانات (قاموس) تحوي الاسم بالعربي و الاسم بالانجليزي و حقل اضافي - وهوالاسم العربي مجرد من التشكيل و موحد الحروف- فمثلا قد تجد من يكتب اسم فاطمه بحرف الهاء و من منهم يكتبها بتاء مربوطه فاطمة فهنا الاسم المجرد ان تكتب فاطمه حيث ان المستخدم عندما يدخل اسم فاطمة بتاء مربوطه استبدله بالهاء و ابحث بكلتا الكلمتين فاطمه او فاطمة ، ايضا ضع بالاعتبار الهمزه أحدهم سيكتب أحمد و الاخر احمد و هكذا ،، نأتي للـ Function التي قمت بكتابتها و فائدتها عندما لا يجد البرنامج اي مقابل للاسم فانه يضطر لرومنة الاسم بالطريقة التي استخدمتها انت ، و لكن مع الاتاحه للمستخدم بان يقوم بتحرير الاسم ثانيا اجعل برنامجك ذو ذكاء و مرونه اي انه في حالة تعديل الاسم المرومن من قبل مستخدم النظام العادي فان البرنامج يضيف الاسم الجديد و ما يقابله في قاعدة بياناتك مع عدم اعتماده و من فتره لفتره تدخل على النظام و تقوم بتحقق من صحة الادخال و اعتماد استخدامها بعد ذلك في النظام ، علما ان بعض الاخوه استخدم مترجم قوقل في الرومنة و لكن الشيء المضحك بالرغم من فائدته الا انه ليس دقيقا حيث انك لو ادخلت اسم محمد سيعيدها Mohammed و لكن قم بكتابة سعيد فسيعيدها لك Happy ^_^ ،،،

هذا و الله المستعان // بالتوفيق
الرد }}}}
تم الشكر بواسطة: abulayth , HASAN6.0
#3
بصراحة رد رائع من الاخ الغالي myalsailamy ولكن نحن المبرمجين نحتاج الى ان نتعاون مع بعضنا لكي الجميع يستفيد ممكن ان نحل هذه المشكلة التي تواجهنا بتجميع الاسماء وجميع الافكار والطروحات المفيدة في قاعدة بيانات (رومنة الأسماء) حتى نصل الى قاعدة شبهه كاملة بقدر المستطاع وفي النهاية نجمع ما سبق ونضيفه في قسم المشاريع كمشروع للجميع واجرنا عند الله عظيم
الله المستعان
الرد }}}}
تم الشكر بواسطة:
#4
يبدو ان الموضوع  اعقد من ذلك , وله اساسيات وقواعد مختلفة 
إقتباس :الأسماء لا تترجم ولكن يمكن كتابتها بلغة أخرى باستخدام مجموعة الحروف التي تضاهي في صوتها أقرب نطق للاسم أي إعادة بناء الاسم باستخدام النظام الصوتي للغة الثانية وهذه العملية تسمى بالنقل الحرفي (Transliteration) ويجب أن تكون الحروف المستخدمة كلها من حروف اللغة المنقول إليها الاسم (اللغة المستهدفة).

هذا النظام ينقل الأسماء العربية إلى اللغة الإنجليزية أي أن المخرجات تناسب مجموعة الدول الناطقة باللغة الإنجليزية لأن هنالك دول أخرى تستخدم الحروف اللاتينية كلها ولكن الإنجليزية ليست لغتها مثل معظم دول أوروبا، ولمعرفة أهمية ذلك نستدل بالاسم "أحمد" فهو ينقل إلى اللغة الإنجليزية هكذا (Ahmad) وليس (Ahmed) فالطريقة الثانية تناسب الدول التي تنتمي للثقافة الفرانكفونية
المصدر
Shy
لاحظ الملف المرفق
الرد }}}}
تم الشكر بواسطة:
#5
جرب هذه الخدمه قد تعطيك نتائج ربما افضل من استخدام مترجم قوقل ،،،

حتى لو بحث عن الموقع في قوقل لن تجده لاني بحث عنه طويلا حتى اشاركك اياه ولكن بدون جدوى و من حسن حظك اني وجدت أني لازلت أحتفظ برابطه بملف نصي بين ملفاتي القديمه :

http://www.intellaren.com/intellibe


و ايضا هذا رابط الموقع يحوي قاموس لا بأس به من الاسماء العربيه و ما يقابلها بالانجليزي

http://alasmaa.hawaalive.com/

http://muslim-names.us/%D8%A7%D8%B3%D9%8...%84%D9%81/

http://supermama.me/%D8%A3%D8%B3%D9%85%D...All&page=7

و هناك موقع افضل و لكن عندما قمت بتجربته لم يعمل ربما ان صاحبه قام بالغائه

بالتوفيق
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  قاعدة البيانات لا تدعم اللغة العربية ؟؟؟؟؟؟ صبري زينوبي 13 193 03-12-16, 04:47 PM
آخر رد: صبري زينوبي
  [VB.NET] تحويل التاريخ لسلسلة نصية tifagreet 1 88 01-11-16, 01:28 PM
آخر رد: ممدوح
Information [VB.NET] خطاء في الكرستال ريبورت عند تحويل قاعدة البيانات من اكسس إلى ميسكوال 3msoft 2 67 22-10-16, 11:49 PM
آخر رد: 3msoft
  تحويل الحروف الصغيره إلى كبيره hano 4 140 12-10-16, 08:16 PM
آخر رد: hano
  [سؤال] مساعدة في تحويل المشروع من VB6 الى الدونت نت عبدالرحمن المكاوي 8 244 09-10-16, 06:21 PM
آخر رد: أبو عمر
  [كود] اريد كود استخراج سورس موقع تحويل تلقائي sharo.azad 0 69 08-10-16, 03:10 PM
آخر رد: sharo.azad
  كيف تنسق الكتابة العربية في Report Viwer starosta 5 202 29-09-16, 10:55 PM
آخر رد: ابراهيم النعيمي
  [سؤال] تحويل العمله الى نص مكتوب dbahl 4 1,382 22-09-16, 09:09 AM
آخر رد: FreeComp1
  لا يمكن ارسال رسالة باللغة العربية samer_hameed 5 153 15-09-16, 03:50 PM
آخر رد: samer_hameed
  [VB.NET] مساعدة بكتابة كود إظهار عدد الاسماء المتطابقة في الجدول أبووسم 17 535 14-09-16, 05:14 AM
آخر رد: أبووسم

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


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