vb.net调用存储过程并传递到水晶报表中
偶的存储过程是带时间参数地,想实现在vb.net输入时间点提交执行存储过程然后传递到水晶报表中 问题点数:30、回复次数:2Top
1 楼yumingxiu(罗纳尔多)回复于 2006-03-31 09:45:05 得分 30
Dim dtcount As New DataTable
Try
dsQuery = CType(e.obj, DataSet)
If dsQuery.Tables(0).Rows.Count >= 2 Then
m_ds.Clear()
mm_bo.pz_SC_Person_CA_infoPrint(dsQuery.Tables(0).Rows(dsQuery.Tables(0).Rows.Count - 2).Item("FindData"), dsQuery.Tables(0).Rows(dsQuery.Tables(0).Rows.Count - 1).Item("FindData"), , m_ds.Tables(0))
bindData(Me.fg, m_ds)
Else
MsgBox("请输入查询的起止时间!", MsgBoxStyle.Information, UnitForm.UI_MDIText)
End If
Catch ex As Exception
MessageBox.Show("查询出错!", g_SDTitle)
Exit Sub
End Try
End Sub
存储过程:
Top
2 楼leonnet(里奥下的天空)回复于 2006-03-31 10:37:40 得分 0
偶现在在建立了存储过程,在vb.net中也可以调用,但就是不知道如何传递到水晶报表中。
偶的存储最后产生一个临时表,请问如何把这张临时表传递到水晶报表中,下面是偶用DataGrid的测试可以得到,如何改才能实现传递到水晶报表中,谢谢。
Dim cn As String = "uid=sa;pwd=cdit328;server=10.145.65.59;database=cdit"
Dim sql As String = "exec xin '" & DateTimePicker1.Text & "','" & DateTimePicker2.Text & "'"
Dim da As New SqlClient.SqlDataAdapter(sql, cn)
Dim ds As New DataSet
da.Fill(ds)
Me.DataGrid1.DataSource = ds.Tables(0)Top




