Wenas es largo esto lo expongo
el crystal report lo creo generando un xml y me muestra los datos perfecto pero cuando busco otra factura me muestra el que seleccione primero
mi codigo
Código vb:
Ver originalIf BuscarRegPrint(query, "facturas1", "facturasdetalles", "factu_ci", "facturas", True) = True Then
If ds.Tables("facturas").Rows.Count = 0 Then
MsgBox("No hay ningun Registro")
Else
My.Computer.FileSystem.CreateDirectory("C:\XML")
Dim url As String = "C:\XML\factu_ci.xml"
ds.WriteXml(url, XmlWriteMode.WriteSchema)
factrepci.ShowDialog()
My.Computer.FileSystem.DeleteFile("C:\XML\factu_ci.xml")
conec2.Close()
End If
End If
es decir creo el factu_ci.xml y luego lo muestro en el reporte y luego lo borro para q no quede el mismo
la funcion
BuscarRegPrint es la siguiente
Código vb:
Ver originalPublic Function BuscarRegPrint(ByVal query As String, ByVal tm1 As String, ByVal tm2 As String, ByVal dsn As String, ByVal dfn As String, ByVal tm As Boolean)
Try
da = New MySql.Data.MySqlClient.MySqlDataAdapter(query, conec2)
If tm = True Then
da.TableMappings.Add(tm1, tm2)
End If
ds = New DataSet(dsn)
da.Fill(ds, dfn)
Return True
Catch ex As Exception
MsgBox("Error function BuscarRegPrint ")
Return False
End Try
End Function
pero como expuse antes calculo que el problema esta en que queda el reporte que e echo y tendría que borrarlo pero es una suposición
alguna idea ?
Desde ya muchas gracias como siempre
Saludos