التنبيهات التالية ظهرت :
Warning [2] count(): Parameter must be an array or an object that implements Countable - Line: 864 - File: showthread.php PHP 7.4.33 (Linux)
File Line Function
/showthread.php 864 errorHandler->error



تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
خلل فى إحضار البيانات من قاعدة أكسس
#1
السلام عليكم ورحمة الله
باختصار أعمل على برنامج قاموس يترجم المصطلحات والجمل

فمثلاً عندما أكتب فى التيكست بوكس الخاص باللغة الإنجليزية هذه الجملة:


يطبق البرنامج الخانة الموجودة فى قاعدة البيانات وهى:


فيظهر النص فى التيكست بوكس الخاص باللغة العربية كالتالى:


ولكنه يظهر كالتالى:


وذلك بسبب إحدى خانات قاعدة البيانات التى تحتوى على كلمة okay وهى


ومن الواضح أن كلمة okay كانت فى النص المترجم ولم تكتب فى تيكست بوكس اللغة الإنجليزية
ورغم ذلك ترجمها البرنامج أيضاً عندما وجدها فى قاعدة البيانات
وهذا هو الكود الخاص بالـ function التى تتحكم بالأمر:

كود :
Function getidom(ByVal content As String) As String
        Try
            Dim count As Integer = 0
            Using adp As New OleDb.OleDbDataAdapter("SELECT * FROM [Idoms]", connectionString)
                Using tbl As New DataTable
                    If adp.Fill(tbl) > 0 Then
                        For Each row As DataRow In tbl.Rows
                            Dim en As String = row.Item("English").Replace("?", "\?")
                            Dim ar As String = row.Item("Arabic")
                            count += Regex.Matches(content, en, RegexOptions.IgnoreCase).Count
                            content = Regex.Replace(content, en, ar, RegexOptions.IgnoreCase)
                        Next
                    End If
                End Using
            End Using
            Return content
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
        getidom = ""
    End Function

وعند الضغط على زر الترجمة تطبق الـ function كالتالى:
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
TextBox2.Text = getidom(TextBox1.Text)

أرجو أن أكون قد أوضحت فكرتى وأنا موجود لأى استفسار
الرد }}}
تم الشكر بواسطة:


الردود في هذا الموضوع
خلل فى إحضار البيانات من قاعدة أكسس - بواسطة Doctor GME - 11-06-15, 01:57 AM

المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  هل من الممكن العمل على قاعدة بيانات اكسل على الفيجوال بيسك خالد كامل1 4 83 24-03-24, 02:00 AM
آخر رد: خالد كامل1
  [VB.NET] حل مشكلة الاتصال بقواعد البيانات access loay775 2 158 25-02-24, 06:29 AM
آخر رد: loay775
  انشاء قاعدة بيانات من ملف سكربت strongriseman 5 500 17-02-24, 02:57 PM
آخر رد: strongriseman
  سؤال عن عملية حذف سجل من قاعدة البيانات assuhimi 3 249 11-02-24, 08:43 PM
آخر رد: assuhimi
  فلترة datagridview بدون قاعدة بيانات صالح عبدالله 3 295 02-02-24, 04:07 PM
آخر رد: صالح عبدالله
  [VB.NET] منع تكرار البيانات في عند الادخال مبرمج صغير 1 2 255 24-01-24, 05:18 PM
آخر رد: مبرمج صغير 1
Photo [كود] مطلوب كود يستخدم الأوامر فقط لتحديث قاعدة بيانات بـ vb.net AhmedEissa 4 638 18-01-24, 11:40 PM
آخر رد: العتيق
  [VB.NET] مساعدة في استدعاء البيانات معينه من form الأول إلى form 2 بدون التعديل loay775 2 275 18-01-24, 05:04 PM
آخر رد: loay775
  [VB.NET] إعادة استدعاء البيانات من قاعدة بيانات اكسس والاهم الصورة مبرمج صغير 1 1 273 13-01-24, 01:17 PM
آخر رد: مبرمج صغير 1
  [VB.NET] إضافة أو حذف حقل فى قاعدة بيانات باستخدام كود VB.net AmeenRashed 21 1,198 30-12-23, 03:47 PM
آخر رد: Taha Okla

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


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