jicastro
17/03/2006, 19:28
Tengo esto:
"Open Ruta & "\Material.txt" For Append As 1
rs1.Open "Select * From Accesorios", Conexion, adOpenStatic
Cadena =rs1! ";" & rs1!Marca & ";" & rs1!Modelo & ";" & rs1!Cinemometro & ";" & rs1!Antena
rs1.Close
Close #1"
y lo graba en ANSII y yo lo necesito en UTF-8. SOCORRO
Perdon si me he equivocado de foro. GRACIAS
"Open Ruta & "\Material.txt" For Append As 1
rs1.Open "Select * From Accesorios", Conexion, adOpenStatic
Cadena =rs1! ";" & rs1!Marca & ";" & rs1!Modelo & ";" & rs1!Cinemometro & ";" & rs1!Antena
rs1.Close
Close #1"
y lo graba en ANSII y yo lo necesito en UTF-8. SOCORRO
Perdon si me he equivocado de foro. GRACIAS