none
Como Puedo imprimir un Reporte Crytal Report Llenado de los Datos un un Listview en Visual Basic?????? RRS feed

  • Pregunta

  • Buenas tardes, esoy desarrollando un sistema en visual basic 2010 y estoy llenando un listview de datos de una base de datos sql server 2008 y necesito imprimir los datos del listview en un reporte, pero no se como, el codigo es el siquente:

    Private Sub btnEliminarOficina_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnEliminarOficina.Click
    Dim SQL As String
    Dim errorSQL As String
    Dim estados As Integer
    estados = CBMostrar.SelectedIndex
    Dim cnn As New SqlConnection("server=w7-pc;uid=sa;pwd=mpa;database=alquiler_vehiculos")
    Select Case estados
    Case 0
    SQL = "select * from vehiculos"
    Dim da As New SqlDataAdapter(SQL, cnn)
    Dim ds As New DataSet
    da.Fill(ds, "vehiculos")
    ''''''''''''''''Ágrego los registros al list view''''''''''''''''''''''''''''''''''''''''''''''''''''
    If ds.Tables("vehiculos").Rows.Count > 0 Then
    Dim fila As ListView
    End If
    Case 1
    SQL = "select * from vehiculos where estado = 0"
    Dim da As New SqlDataAdapter(SQL, cnn)
    Dim ds As New DataSet
    da.Fill(ds, "vehiculos")
    Case 2
    SQL = "select * from vehiculos where estado = 1"
    Dim da As New SqlDataAdapter(SQL, cnn)
    Dim ds As New DataSet
    da.Fill(ds, "vehiculos")
    Case 3
    SQL = "select * from vehiculos where estado = 2"
    Dim da As New SqlDataAdapter(SQL, cnn)
    Dim ds As New DataSet
    da.Fill(ds, "vehiculos")
    Case Else
    End Select

    'LVVehiculos.Items.Item(0).SubItems(8)

    End Sub

    • Cambiado Enrique M. Montejo sábado, 7 de junio de 2014 11:37 Pregunta sobre Crystal Reports.
    jueves, 5 de junio de 2014 20:05