🚀 go-pugleaf

Witam,

Po raz pierwszy zaobserwowałem ten problem. Jest to ograniczenie do 128 
znaków łącznie. Błąd występuje tylko przy zapisie.

Oto przykładowy fragment kodu:

Type Klienci
    NazwaFirmy As String
    SiedzibaFirmy As String
    Kraj As String
    Wojew As String
    NIP As String
    Osoba As String
    Stanowisko As String
    Telefon As String
    Mail As String
    Notatka As String
End Type
Global BazaKlientow(1 To 1000) As Klienci

' kod zapisujący
Dim a As Integer
Open App.Path & "\klienci" For Random As #1
For a = 1 To 1000
Put #1, , BazaKlientow(a) ' w tej linii występuje błąd jeżeli suma długości 
wszystkich pól przekroczy 128 znaków....
Next a
Close

'Dane uzupełniam z textboxów:
BazaKlientow(WybranyKlient).Notatka = txtNotatka.Text
itd...

Czy muszę zmienić sposób zapisu z Random na inny?

Pozdrawiam,
Mariusz