看看我下面这段代码,能运行 用sql语句查出几十条数据花了3秒时间 这太慢了 我不知道问题出在什么地方了 请高手帮忙找找
Dim tp1 As WinForm.DateTimePicker = Forms("小计").Controls("DateTimePicker1")
Dim tp2 As WinForm.DateTimePicker = Forms("小计").Controls("DateTimePicker2")
Dim box As WinForm.TextBox = Forms("小计").Controls("TextBox1")
box.Value = Nothing
Dim sc As new SQLCommand
sc.C
sc.CommandText = "select 规格名称 ,sum(入库数) as 合计 from rk where 入库时间 between '" & tp1.Value & " ' and '" & tp2.Value & "' group by 规格名称"
DataTables("入库小计").DeleteFor(True)
Dim dt As DataTable = sc.ExecuteReader
If dt.DataRows.Count > 0 Then
For i As Integer = 0 To dt.DataRows.Count - 1
DataTables("入库小计").AddNew
Tables("入库小计").Rows(i)("规格名称") = dt.DataRows(i)("规格名称")
Tables("入库小计").Rows(i)("合计") = dt.DataRows(i)("合计")
Next
End If
[此贴子已经被作者于2011-7-14 15:53:22编辑过]
加好友 
发短信
Post By：2011/7/14 15:49:00 [只看该作者]
