الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

ادخال كل الحقول النصية بضغطة زر واحدة

بدأه FinF في 4 مارس 2014 · 5 رد · 876 مشاهدة · في ADO.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم ورحمة الله وبركاته

 

اخواني انا عندي قاعدة البيانات بهذي الطريقة

 

اسم قاعدة البيانات = FinfSys

 

الجداول كالتالي :

 

الاول : للمكاين machine

id , name , num

 

الثاني : الاوقات time

id , time

 

الثالث : التسجيل Record ( مرتبط بجدول المكاين وجدول الاوقات )

id , id_machine , id_time , record1 , record2 , date

 

 

===========

الفكرة :

 

انا استخدم طريقة الادخال لحقلين نصيين وفقاً للوقت في الـ Lable

بطريقة الكود التالي

        str = "INSERT INTO record(id_machine,id_time,record1,record2,date) VALUES('" + DropDownList1.SelectedValue + "','" + Label1.Text + "','" + TextBox1.Text + "','" + TextBox2.Text + "','" + Date.Today + "')"
        con.Open()
        com = New SqlCommand(str, con)
        com.ExecuteNonQuery()
        con.Close()

في صفحة الادخال يوجد 48 حقل نصي (( TextBox))

 

كل الحقول موزعة على 24 ساعة بمعنى الحقلين الاولين للساعة الاولى والحقلين الثانين للساعة الثانية وهكذا

 

المطلوب :

هو ادخال الحقول النصية كل حقلين في صف بضغطة زر واحدة

 

انا فكرت استخدم for لكن ما وضحت لي كيف اخليه يمشي على الحقول النصية الموجودة

 

 

في انتظار الافادة ولكم جزيل الشكر

تم تعديل هذه المشاركة بواسطة FinF في 4 مارس 2014 في 14:11

#2

لما لاتقوم بعمل datagrid بها المطلوب اسهل واسرع

#3

اعتذر عزيزي كريم لتاخري بالرد وذلك لظروف الانتداب

 

بالنسبة لفكرة datagrid المعروف انها على windows form

 

وماعندي فكرة لطريقة عملها بشاشة الـ Website Application

#4

المضوع بسيط ابحث في قسمASP.NET يوجد الكثير من الحلول لمشكلتك

#5

السلام عليكم ورحمة الله وبركاته

على حسب ما فهمت أنك تريد تنفيذ 24 عملية إدخال فى قواعد البيانات بضغطة زر واحدة، إذا كان كذلك فيمكنك عمله بطريقتين

الأولى: التكرار عن طريق عمل حلقة تكرارية وفى كل مرة تنفذ عملية الإدخال المناسبة وتقرأ البيانات من مربعات النص المناسبة وأعتقد أن لديك مشكلة فى هذه الطريقة لذلك ربما تفيدك الطريقة الثانية

 

الثانية: تخزين كل عبارات الإدخال فى فى سلسلة حرفية وإرسالها جميعاً مرة واحدة إلى قواعد البيانات لتنفيذها فيكون الكود مشابهاً لذلك بإذن الله

str = "INSERT INTO record(id_machine,id_time,record1,record2,date) VALUES('" + DropDownList1.SelectedValue + "','" + Label1.Text + "','" + TextBox1.Text + "','" + TextBox2.Text + "','" + Date.Today + "');"

str = str +  "INSERT INTO record(id_machine,id_time,record1,record2,date) VALUES('" + DropDownList1.SelectedValue + "','" + Label1.Text + "','" + TextBox3.Text + "','" + TextBox4.Text + "','" + Date.Today + "');"


str = str +  "INSERT INTO record(id_machine,id_time,record1,record2,date) VALUES('" + DropDownList1.SelectedValue + "','" + Label1.Text + "','" + TextBox5.Text + "','" + TextBox6.Text + "','" + Date.Today + "');"

ويتم الاستكمال بنفس الطريقة فيتكون سلسلة حرفية تحتوى على 24 جملة insesrt يتم إرسالهم جميعاً مرة واحدة

 

أسأل التوفيق

أدعو الله أن يجعل أعمالنا خالصة لوجهه الكريم --- وأن ينفعنا بما علمنا

Dr Sayed Tohamy

Programming Instructor

مدرب برمجة

---------------

EmaSoft2000

-------------------

#6

اشكر لك اخوي ema2000 اهتمامك وتفاعلك

 

وابشرك حبيبي تم حلها بطريقة StoredProcedure مع نظام Do While 

 

وهذا الكود المرفق

            Using cmd As SqlCommand = conn.CreateCommand
                cmd.CommandType = Data.CommandType.StoredProcedure
                cmd.CommandText = "insertRoomLogo"

                Dim i As Integer = 0
                Do While i < 4
                    Select Case i
                        Case 0
                            cmd.Parameters.Add("@id_machine", SqlDbType.NVarChar).Value = DropDownList1.Text
                            cmd.Parameters.Add("@mw", SqlDbType.NVarChar).Value = TextBox1.Text
                            cmd.Parameters.Add("@mvar", SqlDbType.NVarChar).Value = TextBox2.Text
                            cmd.Parameters.Add("@intime", SqlDbType.DateTime).Value = DateTime.Now
                            cmd.ExecuteNonQuery()
                            cmd.Parameters.Clear()

                        Case 1
                            cmd.Parameters.Add("@id_machine", SqlDbType.NVarChar).Value = DropDownList1.Text
                            cmd.Parameters.Add("@mw", TextBox3.Text)
                            cmd.Parameters.Add("dateSubmitted", SqlDbType.NVarChar).Value = TextBox4.Text
                            cmd.Parameters.Add("@intime", SqlDbType.DateTime).Value = DateTime.Now
                            cmd.ExecuteNonQuery()
                            cmd.Parameters.Clear()

                    End Select
                    i = i + 1
                Loop

                conn.Close()

            End Using

مواضيع مشابهة