05/08/2005, 14:26
|
| | | Fecha de Ingreso: julio-2005
Mensajes: 128
Antigüedad: 19 años, 10 meses Puntos: 0 | |
| no los imprime, por el momento tengo comentado el update
Esto es lo unico que esta haciendo y desde aqui se queda en el limbo
sqlr= "SELECT Articulo FROM FacturaP WHERE Bandera='" & 0 & "'"
rs.Open sqlr, MM_ConFactura_STRING
dim miTabla
miTabla = rs.GetRows
rs.Close
set rs = nothing
MM_ConFactura_STRING.Close
set MM_ConFactura_STRING = nothing
for I = 0 to UBound(miTabla,2)
response.write(mitabla(0,I)&"<br>")
next'While (NOT rs.EOF) |