factura electronica
Publicado por atilio (10 intervenciones) el 03/07/2017 13:30:51
Buen dia ,el tema es asì , en mi intento de implementar factura electronica para argentina , me encuentro en la necesidad de enviar x correo la factura en pdf en forma automatizada y me encuentro con que el codigo utilizado no me trae los registros de la factura:
Tengo un generador propio de pdf que es un ocx. No voy a usar una impresora de pdf.
Estoy conectandome al dbf para leer los articulos . Al hacer la quiery filtrando por una condicion desde el codigo me trae 0 registros. la condicion esta bien.
En el codigo NUMCURR= 0. No deberia ser asi, deberia ser 3.
Sin la condicion trae todos los registros, cuando la añado sin embargo
no. Existen registros que cumplen la condicion.
Gracias
Saludos , Atilio
Tengo un generador propio de pdf que es un ocx. No voy a usar una impresora de pdf.
Estoy conectandome al dbf para leer los articulos . Al hacer la quiery filtrando por una condicion desde el codigo me trae 0 registros. la condicion esta bien.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Dim con As New Connection
Dim qry As New Query
Dim rs As New ResultSet
If (con.connectto ("dbase IV")<>False) Then
Set qry.connection = con
qry.tablename = "h:\ventasde.dbf"
Qry.SQL="SELECT * FROM"""& qry.tablename &""" WHERE ID=81500"
Set rs.query = qry
If ((rs.execute)<>False) Then
NUMCURR = (rs.numrows) 'number of records in current with
the same action reference
End If
End If
con.disconnectEn el codigo NUMCURR= 0. No deberia ser asi, deberia ser 3.
Sin la condicion trae todos los registros, cuando la añado sin embargo
no. Existen registros que cumplen la condicion.
Gracias
Saludos , Atilio
Valora esta pregunta
0