+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : تكرار البيانات مع كل فتح للنموذج (/showthread.php?tid=39796)
تكرار البيانات مع كل فتح للنموذج - مسلم_١ - 25-10-21
السلام عليكم ورحمة الله وبركاته
كنت أعمل برنامجي بفيجوال ستوديو2013 ومن ثم قمت بنقله على 2019
ظهرت لي مشكلة لم تكن موجودة من قبل وهي كالتالي:
عندما افتح النموذج(أي نموذج) يفتح بشكل طبيعي، وعند فتح النموذج الثاني(تظهر بيانات الأول بالإضافة للثاني في الداتاجرد في الثاني).
، وعند الثالث نظهر بيانات الأول والثاني والثالث وهكذا مع عكس الترتيب!!
حاولت الوصول لحل فلم أفلح، وكأن الخادم يستمر بحمل البيانات محتفظا بها حتى عند غلق النموذج، وعند استدعاء بيانات النموذج الثاني يرفقها مع بيانات الأول!
فلماذا مع أن الاتصال يغلق، وكذلك النموذج؟
هذا الكود المستخدم في النماذج
كود :
Private Sub form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
If Sqlcon.State = ConnectionState.Open Then Sqlcon.Close()
Dim strquery As String = "SELECT * FROM table1"
Sqlcon.Open()
adapter = New SqlDataAdapter(strquery, Sqlcon)
adapter.Fill(Db)
DGVvacationtype.DataSource = Db
'Db.Constraints.Add("primary", Db.Columns("id"), True)
Sqlcon.Close()
end subRE: تكرار البيانات مع كل فتح للنموذج - abubasilIraq - 25-10-21
PHP كود :
Sqlcon.Open()
Dim sqlqry As String = "select * from table1"
Dim adapter As New SqlDataAdapter(sqlqry, Sqlcon)
Dim Db As New DataSet()
adapter.Fill(ds, "table1")
Sqlcon.Close()
DataGridView1.DataSource = Db
DataGridView1.DataMember = "table1"
Dim table As New DataTable
adapter.Fill(table)
RE: تكرار البيانات مع كل فتح للنموذج - أشرف كريم 2 - 25-10-21
(25-10-21, 07:01 PM)مسلم_١ كتب : السلام عليكم ورحمة الله وبركاته
كنت أعمل برنامجي بفيجوال ستوديو2013 ومن ثم قمت بنقله على 2019
ظهرت لي مشكلة لم تكن موجودة من قبل وهي كالتالي:
عندما افتح النموذج(أي نموذج) يفتح بشكل طبيعي، وعند فتح النموذج الثاني(تظهر بيانات الأول بالإضافة للثاني في الداتاجرد في الثاني).
، وعند الثالث نظهر بيانات الأول والثاني والثالث وهكذا مع عكس الترتيب!!
حاولت الوصول لحل فلم أفلح، وكأن الخادم يستمر بحمل البيانات محتفظا بها حتى عند غلق النموذج، وعند استدعاء بيانات النموذج الثاني يرفقها مع بيانات الأول!
فلماذا مع أن الاتصال يغلق، وكذلك النموذج؟
هذا الكود المستخدم في النماذج
كود :
Private Sub form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
If Sqlcon.State = ConnectionState.Open Then Sqlcon.Close()
Dim strquery As String = "SELECT * FROM table1"
Sqlcon.Open()
adapter = New SqlDataAdapter(strquery, Sqlcon)
adapter.Fill(Db)
DGVvacationtype.DataSource = Db
'Db.Constraints.Add("primary", Db.Columns("id"), True)
Sqlcon.Close()
end sub
جرب هذا التعديل
كود :
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim da As New SqlDataAdapter("SELECT * FROM table1", Sqlcon)
Dim dt As New DataTable
da.Fill(dt)
DGVvacationtype.DataSource = dt
End Subاو في الكود بتاعك اعمل clear ال Db قبل ما تعمل fill
RE: تكرار البيانات مع كل فتح للنموذج - مسلم_١ - 25-10-21
شكر الله لك أخي الحبيب، ونفع بك ?