إخواني الكرام
عندي كود بالشكل التالي
If Conn_SqL.State = ConnectionState.Open Then Conn_SqL.Close() Conn_SqL.Open() Command_Sql.CommandText = "select sum(madeen) as [M] , sum(daen) as [D] , date_Journal as [F] from a_sub_journal where
= '" & MDIParent1.All_Account_Comp.ComboBox.SelectedValue & "' and
= '" &
Val(TreeView1.SelectedNode.Tag) & "' and [Fiscal_year] = '" &
MDIParent1.All_F_Year.ComboBox.SelectedValue & "' group by
[date_Journal]"
Command_Sql.Connection = Conn_SqL
Datareader_Sql = Command_Sql.ExecuteReader
ListView2.Items.Clear()
ListView2.Columns.Clear()
' Create the column headers.
ListView2.Columns.Add("مدين", 70, HorizontalAlignment.Left)
ListView2.Columns.Add("دائن", 70, HorizontalAlignment.Left)
ListView2.Columns.Add("رصيد", 70, HorizontalAlignment.Left)
ListView2.Columns.Add("الفترة", 70, HorizontalAlignment.Left)
Do While Datareader_Sql.Read()
Dim new_item As New ListViewItem(Datareader_Sql.Item("M").ToString)
new_item.SubItems.Add(Datareader_Sql.Item("D").ToString)
new_item.SubItems.Add(Datareader_Sql.Item("d").ToString)
new_item.SubItems.Add(Datareader_Sql.Item("f").ToString)
ListView2.Items.Add(new_item)
Loop
Datareader_Sql.Close()
Command_Sql.Dispose()
Conn_SqL.Close()
End Sub
الكود لا يعطي خطأ ولا يعطي أيضا نتيجة
جربت كود الاستعلام في sql queryبيعطي نتائج
عدلت جملة commandtext للسطر التاليselect sum(madeen) as [M] , sum(daen) as [D] , date_Journal as [F] from a_sub_journal where
= '1' and
= '1101000' and [Fiscal_year] = '2012' group by [date_Journal]
وأيضا لم يعطي نتيجة
أرجوا المساعدة في معرفة مكان المشكلة وشكرا


