Titulo
Publicado por ReyLui (2 intervenciones) el 21/10/2004 15:02:14
Tengo el siguiente bucle para escribir llevar a un fichero TXT el valor de un registro, el caso es que no me pone el valor del campo sino Campo01, Campo02, etc, como podria hacer esto. Muchas Gracias.
For cont = 1 To 15
If cont < 10 Then
NomCampo = \"Campo0\" & cont
NomEtiq = \"Label50\" & cont & \":\"
Else
NomCampo = \"Campo\" & cont
NomEtiq = \"Label5\" & cont & \":\"
End If
a.writeline (NomEtiq)
If NomCampo <> \" \" Then a.writeline (NomCampo)
a.writeline (LineaEnBlanco)
Next cont
For cont = 1 To 15
If cont < 10 Then
NomCampo = \"Campo0\" & cont
NomEtiq = \"Label50\" & cont & \":\"
Else
NomCampo = \"Campo\" & cont
NomEtiq = \"Label5\" & cont & \":\"
End If
a.writeline (NomEtiq)
If NomCampo <> \" \" Then a.writeline (NomCampo)
a.writeline (LineaEnBlanco)
Next cont
Valora esta pregunta
0