.
دورة صناعة برنامج مولد أكواد السيكوال والأكسس بالدوت نت
Programming Languages
-
Comment -
هل وجدت حل استاذي لهذه المشكله العويصه جزاك الله خير
Comment -
هل اغير نسخ visual studio واشغل بنفس النسخه الانت شغال بيها وكم هو اصدار النسخه الانت شغال بيهاComment -
لا استطيع افادتك بشيء اطلاقا لان الكود عندك سليم
نسخة الفيجوال المطبق يها الشرح 2015 وما في مشكلة اطلاقا بنوع نسخة الفيجوالComment -
جزاك الله خير استاذي مافصرت ساحاول انشاء الله حتي اجد الحلComment -
اجمل انسان في الكون اشكرك علي مساعتدك الي شخص ولك جزيل الشكر والامتنانComment -
اخي ابو فهمي الحمد لله حليت المشكله وججدت الخطا في حرف T في عند الجلب الجدوال طلبت جلبها تحت اسم table _Name في الحقول طلبها بيTable _Name يعني فقط حرف t لكنOriginally posted by Abufahmi View Post
اواجه مشكله بالدرس التاسع فعند طلبinsert الcption يعني فشل وlabبيعطي شويه وبختفي وعندتنفيذ الجمله التي تحتوي علي abufami مع اسم table تظهر عند اضافه بقيه الاجراءت الا يظهر ولا شي ارجو الافاد وشكرا لك مقدماComment -
اخي وكذلك update ايضا لا تاتي بنتجه عليtexqurey وstatus بيعطي فشل ماهو المشكل جزاك الله كل الخيرComment -
ارجو الافادهComment -
بارك الله فيك أخي العزيزComment -
افديني جزاك الله خيرComment -
يا اساتذي ارجو التفاعل لانو والله مالنا حدا غيرك ووفي ميزان حساناتك اوجه مشكله في الانسريت والابديت والسبب ان هذه العبار 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 من دون رقم ارجو الافاده اجيرنا اجارنا الله من حر جهنم جزاك الله خيرComment -
-
ياخي جمله insert والابديت الاتطلع معي بقيمه tex qure مع نو قيمهconstrin سليملهconnct sql يعني عندم اضغط insert اوupdat في cptionبيعطي فشل والا تظهر اي شي اي خلاصه الامر المشكله فيهي الجمله For Each field As Column In ser.Databases(db).Tables(strTable).ColumnsOriginally posted by Abufahmi View Post
الاتاتي بقيمه مثلا هنا
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 اظن هيك وضح اجيرنا اجراك الله من حر جهنم وجزاك الله الف خيرComment -
ارجو الرد استاذي اذا في حلComment
