F
Frank Dulk
As I avoid the selection box here:
' It travels all the fields
For i = 0 To .Fields.Count - 1
If Not .Fields(i) .Type = 11 Then ' it Polishes object
OLE
strLine = strLine & .Fields(i) & Separador
End If
Next i
' It travels all the fields
For i = 0 To .Fields.Count - 1
If Not .Fields(i) .Type = 11 Then ' it Polishes object
OLE
strLine = strLine & .Fields(i) & Separador
End If
Next i