12-12-15, 09:42 PM
السلام عليكم
اريد مساعدة لانشاء داتاقريد فيو واحد به تسلسل تواريخ في عمود و جلب معطيات قاعدة البيانات في عمود اخر، المشكل لا استطيع جمع العمودين في نفس داتاقريد فيو فهل من مساعدة؟.
'للربط بقاعدة البيانات
con.Open()
Dim DataAdapter1 As New OleDbDataAdapter(sql, con)
DataAdapter1.Fill(DS, "tabel")
con.Close()
DataGridView1.DataSource = DS
DataGridView1.DataMember = " tabel"
'لانشاء تسلسل تواريخ
Dim dt As New DataTable
dt.TableName = "table1"
' add coloums dates
Dim dates As DataColumn = New DataColumn("dates")
dates.DataType = System.Type.GetType("System.String")
dt.Columns.Add(dates)
Dim dr As DataRow
For i = 0 To 5
dr = dt.Rows.Add
dr.Item("dates") = DateTime.Now.AddMonths(i)
Next i
Dim ds As New DataSet
ds.Clear()
ds.Tables.Add(dt)
DataGridView1.DataSource = ds
DataGridView1.DataMember = "table1"
اريد مساعدة لانشاء داتاقريد فيو واحد به تسلسل تواريخ في عمود و جلب معطيات قاعدة البيانات في عمود اخر، المشكل لا استطيع جمع العمودين في نفس داتاقريد فيو فهل من مساعدة؟.
'للربط بقاعدة البيانات
con.Open()
Dim DataAdapter1 As New OleDbDataAdapter(sql, con)
DataAdapter1.Fill(DS, "tabel")
con.Close()
DataGridView1.DataSource = DS
DataGridView1.DataMember = " tabel"
'لانشاء تسلسل تواريخ
Dim dt As New DataTable
dt.TableName = "table1"
' add coloums dates
Dim dates As DataColumn = New DataColumn("dates")
dates.DataType = System.Type.GetType("System.String")
dt.Columns.Add(dates)
Dim dr As DataRow
For i = 0 To 5
dr = dt.Rows.Add
dr.Item("dates") = DateTime.Now.AddMonths(i)
Next i
Dim ds As New DataSet
ds.Clear()
ds.Tables.Add(dt)
DataGridView1.DataSource = ds
DataGridView1.DataMember = "table1"