تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
عاجل لو سمحتم
#1
السلام عليكم ورحمة الله تعالى وبركاته
هذه صورة لجدول بقاعدة بيانات أكسس 
   
القاعدة مصصممة من طرف هيئة تعويض الموضفين العموميين ولا يمكن تغير أسماء الحقول أو التعديل عليها 
لما أعمل أنسرت لبيانات داخل هذا الجدول تطلع لي رسالة خطا مفادها Syntax Error وسبب هذه الرسالة بعض أسماء الحقول التي لها اسم مكون من كلمتين 
فالرجاء هل هناك طريقة لتفادي هذه الرسالة منذ أسبوع وأنا أحاول دون جدوى فالرجاء المساعدة
ألف شكر لكم مسبقا
الرد }}}
تم الشكر بواسطة:
#2
اسماء الجداول والأعمدة التي تحتوي مسافة أو تشابه كلمة محجوزة يتم وضعها بين قوسين [ ]
ويفضل أن تعتمد الأقواس دائما فهو ينظم اللاستعلام ويميز اسماء الجداول والأعمدة عن كلمات اوامر SQL
الرد }}}
تم الشكر بواسطة: جميل علي , جميل علي
#3

.txt   ayant droit.txt (الحجم : 130 بايت / التحميلات : 24)

ألف شكر لكم أساتذتنا الكرام على سرعة الرد وهذا ما كنت أتنظره من هذا المنتدي الكريم
هذا ملف txt بداخله إجراء الحفظ الذي قمت به
أرجوا الإطلاع عليه
شكرا لكم مرة أخرى
الرد }}}
تم الشكر بواسطة: عبـدالله
#4
عفوا أخي الكريم أخطأت في الملف

.txt   save access.txt (الحجم : 1.86 ك ب / التحميلات : 22)
الرد }}}
تم الشكر بواسطة: عبـدالله
#5
الخطأ الأول في كلمة value والصحيح VALUES (كان ينقصها حرف s)
الخطأ الثاني وجود فاصلة عند نهاية قوس أسماء الأعمدة.
الخطأ الثالث وجود مسافات في اسماء البارامترات والصحيح تستبدلها بالشرطة السفلية ( _ )
وهناك رمز (�) في الاسم (N�fact) لا أدري هل سيؤثر أم لا.
تفضل التعديل
PHP كود :
Private Sub Btn_Save_Click(sender As ObjectAs EventArgsHandles Btn_Save.Click
    If conn
.State ConnectionState.Open Then
        conn
.Close()
 
   End If
 
   Try
        Dim sql_As 
As String =
 
           "INSERT INTO [ayant droit] ([nss], [benif], [nom benif], [prenom benif], [date nais benif], [date de soin], [montant], [cabinet medic], [N�fact}, [mois], [Code pharm] ) " _
            
"VALIES                    (@nss,  @benif,  @nom_benif,  @prenom_benif,  @date_nais_benif,  @date_de_soin,  @montant,  @cabinet_medic,  @N�fact,  @mois,  @Code_pharm  ) "


 
       Dim save_AYD As New OleDb.OleDbCommand(sql_Asconn)

 
       save_AYD.Parameters.AddWithValue("@nss"Me.txt_Nass.Text)
 
       save_AYD.Parameters.AddWithValue("@benif"Me.Cbo_Type.Text)
 
       save_AYD.Parameters.AddWithValue("@nom_benif"Me.txt_Nom_Benif.Text)
 
       save_AYD.Parameters.AddWithValue("@prenom_benif"Me.CBo_Prenom.Text)
 
       save_AYD.Parameters.AddWithValue("@date_nais_benif"CDate(Me.txt_DN_Benif.Text))
 
       save_AYD.Parameters.AddWithValue("@date_de_soin"CDate(Me.txt_Date_Soin.Text))
 
       save_AYD.Parameters.AddWithValue("@montant"CInt(Lab_Pay.Text))
 
       save_AYD.Parameters.AddWithValue("@cabinet_medic"Me.txt_Cabinet.Text)
 
       save_AYD.Parameters.AddWithValue("@N�fact"Me.txt_NFact_Mil.Text)
 
       save_AYD.Parameters.AddWithValue("@mois"Me.txt_Mois.Text)
 
       save_AYD.Parameters.AddWithValue("@Code_pharm"Me.txt_Code_Pharm.Text)
 
       'save_AYD.Parameters.AddWithValue("@date_sys", Date.Now)
        conn.Open()
        save_AYD.ExecuteNonQuery()
        MsgBox("Enregistrement fait avec Succ�e", vbMsgBoxRight, "Confirmation")
        conn.Close()
    Catch ex As Exception
        MsgBox(ex.Message)
    End Try
End Sub 
الرد }}}
تم الشكر بواسطة:
#6
هذه الكلمة � تعني ° التي توضع بعد حرف N عند الترقيم أي N°
الرد }}}
تم الشكر بواسطة:
#7
لم يظهر لدي الرمز ° لأنه يبدو أنك حفظت ملف txt بترميز ANSI والأفضل دائما تحفظ ملفات txt بترميز UTF-8
قم بتصحيح الرمز بعد نسخ الكود
الرد }}}
تم الشكر بواسطة:
#8
أوكي ألف شكر راح أجرب الكود وأخبرك ممكن ؟
ألف شكر لإهتمامكم
الرد }}}
تم الشكر بواسطة:
#9
السلام عليكم ورحمة الله تعالى وبركاته
أخي الكريم جربت الكود كما أرسلته لكن دائما رسالة الخطأ تطلع

الحمد لله تم حل المشكلة ألف شكر لله ثم لكم يا أعضاء المنتدى الرائع
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  طلب المساعدة عاجلة لو سمحتم djelloul 8 2,740 05-04-17, 12:48 AM
آخر رد: Abu Ehab
Sad [Acces2007] عاجل ارجو المساعدة لدي مشكلة مع برمجة زر البحث في الاكسس saimon 4 3,591 24-10-16, 07:54 PM
آخر رد: saimon
Lightbulb [SQL] لو سمحتم ممكن فكرة عمل جرد الاصناف #A-H.c 1 1,961 13-03-16, 11:44 AM
آخر رد: khodor1985
  [سؤال] ارجو المساعدة فى هذا الكود عاجل abdala 5 3,387 07-12-14, 03:48 AM
آخر رد: الوليد ☺
Rainbow [VB.NET] طلب عاجل الله يرضى عنكم essabar 0 1,815 30-12-13, 01:10 AM
آخر رد: essabar

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


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