Prikazi cijelu temu 14.02.2015 20:22
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Lokacija:Tuzla


Predmet:Re: Struktura na fajl
Uf pa ja ovo nikad nisam radio ovako.
Mozda nije do ovoga ali upis u memorijske mora uvije biti isti.
Treba sabrati max broj karaktera koji se mogu stampati i rasporediti ih na kolone.
Evo ja cu dati primjer pa ti popravi:
Dim Naziv As String *15
Dim Danok As String*10
Dim Cena As String*8
Dim DDV As String*6
Dim Kolicina As String *8
Dim Prazno as string *1
Prazno= " "
Prefix+prazno+naziv+prazno+ddv+prazno+cena+prazno+
kolicina+prazno+mak=Broj karaktera na traci
Lset Naziv = Kirilica(UCase(Left(DLookup("Artikal_Ime", "tblArtikli", "ID_Artikal=" & rs.Fields(2)), 20))) '
Rset Danok = DLookup("Artikal_DDV", "tblArtikli", "ID_Artikal=" & rs.Fields(2)) '
Rset Cena = Format(rs.Fields(4), "0.00") ' Cena
Rset Kolicina = Format(rs.Fields(5), "0.000")

rset i Lset su poravnanja.
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.