Visual Basic - ayuda con delimitador

Life is soft - evento anual de software empresarial
   
Vista:

ayuda con delimitador

Publicado por alejandra (11 intervenciones) el 25/09/2008 20:22:50
hola soy nueva en esto y tengo que hacer un pequeño programa que me lea un archivo de texto en el cual vana ver delimitadores que pueden ser guiones o comas etc y necesito que el programa me analice el archi de texto cortandolo deonde encuentre un delimitador que se debera especificar.

porfa si alguien me puede ayudar estare muy agradecida de verdad o si alguien tiene algun programita que haga algo paresido que me sirva para orientarme porfa me lo podrian mandara (inoxsa99@gmail.com ) de verdad estare muy agradecida si alguien me puede ayudar de ante mano gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:ayuda con delimitador

Publicado por alejandra (6 intervenciones) el 25/09/2008 22:30:20
lo que pasa que que son alrededor de 6000 registros no puedo ingresar registro por registro al codigo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:QUE NO!

Publicado por alejandra (11 intervenciones) el 25/09/2008 23:28:06
queeeeeeeeeeee onda jajaj
bueno yo lo unico que quiero un codigo que habla un archivo de texto y lo separe cuando encuentre un delimitador que se le especifique
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:QUE NO!

Publicado por igor (633 intervenciones) el 26/09/2008 16:27:47
Alejandra, para que te puedan ayudar debes explicarlo para quien no conoce el proyecto.

Yo lo que entiendo es que tienes un archivo de texto (txt) que contiene datos. Esos datos son registros (como en una DB), y los registros están delimitados entre ellos por algún caracter pongamos que es un guión (-).

No se que quieres que separe cuando detecte el caracter, según la explicación parece que quieres partir el archivo en 2 archivos, pero no tiene sentido, así que te pondré lo que yo creo que estás intentando explicar.

Quieres leer los registros, de manera que cuando llegue al final de cada registro y detecte el caracter de fin de registro (-) se detenga la lectura para majear el registro en memoria.

Dim Buffer as string
Dim Caracter as byte

Open archivo For read As #1

do
Get #1, 1, Caracter
Buffer = Buffer & chr$(Caracter)
loop while Caracter = 45 ' Guión o caracter de separación

Después de esto tendrás en la variable Buffer el primer registro.

Espero haberte servido de algo.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Foros de verdad !

Publicado por Semper (1 intervención) el 26/09/2008 19:21:19
Si estuvieras en un foro de verdad, ya habrias resuelto tu consulta ...
A ver ... prueba esto ...
Si no quieres que el deimitador aparezca en el nuevo archivo generado, simplemente modifica la variable sReplace quitando el delimitador ...

Private Sub Command1_Click()
Dim nEntrada As Integer, nSalida As Integer
Dim sDelim As String, sReplace As String
Dim sArchivo As String
Dim sSalida As String

sDelim = "-"
sReplace = "-" & vbCrLf
sArchivo = "S:Temparchivo.txt"
sSalida = "S:Tempsalida.txt"

nEntrada = FreeFile()
Open sArchivo For Input As #nEntrada
nSalida = FreeFile()
Open sSalida For Output As #nSalida

Print #nSalida, Replace(Input(LOF(nEntrada), nEntrada), sDelim, sReplace)

Close #nEntrada
Close #nSalida
End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Foros de verdad !

Publicado por Otro (9 intervenciones) el 27/09/2008 01:00:20
¿Pero funciona o no? :)
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar