هذا الموضوع مثبت لأهميته.
X
X

دورة صناعة برنامج مولد أكواد السيكوال والأكسس بالدوت نت

Collapse
  • تصفية
  • الوقت
  • عرض
مسح الكل
مشاركات جديدة
  • عضو مُشارك
    • Apr 2019
    • 26

    #21
    جزاك الله خير استاذي مافصرت ساحاول انشاء الله حتي اجد الحل
  • عضو مُشارك
    • Apr 2019
    • 26

    #22
    اجمل انسان في الكون اشكرك علي مساعتدك الي شخص ولك جزيل الشكر والامتنان
  • عضو مُشارك
    • Apr 2019
    • 26

    #23
    المشاركة الأصلية بواسطة Abufahmi

    من الصورة الكود سليم وما فيه اي خطأ !!! اسماء الجداول موجود بالقائمة (Table_Name) ابضغط عليها دبل كلك ويبحدث خطأ!!!!!!!!
    اخي ابو فهمي الحمد لله حليت المشكله وججدت الخطا في حرف T في عند الجلب الجدوال طلبت جلبها تحت اسم table _Name في الحقول طلبها بيTable _Name يعني فقط حرف t لكن
    اواجه مشكله بالدرس التاسع فعند طلبinsert الcption يعني فشل وlabبيعطي شويه وبختفي وعندتنفيذ الجمله التي تحتوي علي abufami مع اسم table تظهر عند اضافه بقيه الاجراءت الا يظهر ولا شي ارجو الافاد وشكرا لك مقدما
  • عضو مُشارك
    • Apr 2019
    • 26

    #24
    اخي وكذلك update ايضا لا تاتي بنتجه عليtexqurey وstatus بيعطي فشل ماهو المشكل جزاك الله كل الخير
  • عضو مُشارك
    • Apr 2019
    • 26

    #25
    ارجو الافاده
  • عضو نشيط
    • Oct 2018
    • 114

    #26
    بارك الله فيك أخي العزيز
  • عضو مُشارك
    • Apr 2019
    • 26

    #27
    افديني جزاك الله خير
  • عضو مُشارك
    • Apr 2019
    • 26

    #28
    يا اساتذي ارجو التفاعل لانو والله مالنا حدا غيرك ووفي ميزان حساناتك اوجه مشكله في الانسريت والابديت والسبب ان هذه العبار For Each field As Column In ser.Databases(db).Tables(strTable).Columns

    الاتاتي باي قيمه عندم استعملها في الانسريت والابديت حتي في funtion insert حتي استبدلها بهي الحلقه For i As Integer = 0 To Dg.Rows.Count - 1
    واستبدلتfield.DataType.Name ب ل Dg.Rows(i).Cells("Column_Name").Value.ToString() وستبدلت field.DataType. ب الDg.Rows(i).Cells("Data_Type").Value.ToString())
    لكن هنالك مشكله في اني بهي العباره الاستطيع ارجاع الرقم الذي ياتي مع نوع المتغير يعني يطلع فقط varchar من دون رقم ارجو الافاده اجيرنا اجارنا الله من حر جهنم جزاك الله خير
  • مشرف البرمجة والهندسة العكسية
    • Sep 2018
    • 180

    #29
    المشاركة الأصلية بواسطة Suliman1234
    يا اساتذي ارجو التفاعل لانو والله مالنا حدا غيرك ووفي ميزان حساناتك اوجه مشكله في الانسريت والابديت والسبب ان هذه العبار For Each field As Column In ser.Databases(db).Tables(strTable).Columns

    الاتاتي باي قيمه عندم استعملها في الانسريت والابديت حتي في funtion insert حتي استبدلها بهي الحلقه For i As Integer = 0 To Dg.Rows.Count - 1
    واستبدلتfield.DataType.Name ب ل Dg.Rows(i).Cells("Column_Name").Value.ToString() وستبدلت field.DataType. ب الDg.Rows(i).Cells("Data_Type").Value.ToString())
    لكن هنالك مشكله في اني بهي العباره الاستطيع ارجاع الرقم الذي ياتي مع نوع المتغير يعني يطلع فقط varchar من دون رقم ارجو الافاده اجيرنا اجارنا الله من حر جهنم جزاك الله خير
    ما فهمت شيء والله
  • عضو مُشارك
    • Apr 2019
    • 26

    #30
    المشاركة الأصلية بواسطة Abufahmi

    ما فهمت شيء والله
    ياخي جمله insert والابديت الاتطلع معي بقيمه tex qure مع نو قيمهconstrin سليملهconnct sql يعني عندم اضغط insert اوupdat في cptionبيعطي فشل والا تظهر اي شي اي خلاصه الامر المشكله فيهي الجمله For Each field As Column In ser.Databases(db).Tables(strTable).Columns
    الاتاتي بقيمه مثلا هنا
    Public Sub InsertNoImage_SQL(Dg As DataGridView)
    Try
    conString = My.Settings.str.ToString().Trim()
    Con = New SqlConnection(conString)
    ServerCon = New ServerConnection(Con)
    ser = New Server(ServerCon)
    Dim strTable As String = My.Settings.TableName.ToString().Trim()
    Dim db As String = My.Settings.DbSql.ToString().Trim()
    Tx = "-- Abufahmi *********** Insert ***********" & Environment.NewLine
    Tx += "Create Proc Insert_" & strTable & Environment.NewLine
    يعني عندما انفذ هذا لوحده من دون بقيه الكود ينفذ وبيعطي هيك
    -- Abufahmi *********** Insert ***********
    Create Proc Insert_ مع اسم الجدول
    لكن اضافه ابقيه الكود والذي يبدا من هي الجمله

    Dim count As Integer = -1
    For Each field As Column In ser.Databases(db).Tables(strTable).Columns
    count += 1
    ما بظهر والااي شي فيtextqeruy اظن هيك وضح اجيرنا اجراك الله من حر جهنم وجزاك الله الف خير
Working...
X