How can I write to a a disk using put and allign a text

ivax · Jul 31, 2000

I like to allignt a text on a file

MikeLacey · Jul 31, 2000

Ivax, Could we have a bit more detail please? Mike <a href=mailto:michael.j.lacey@ntlworld.com>michael.j.lacey@ntlworld.com</a> <a href=

http://www.cargill.com/>

Cargill's Corporate Web Site</a>

ivax · Jul 31, 2000

I have a type like this type client codbar as string(13) client as string(6) name as string(40) endtype and when i write it to disk using Put it makes something like: 13    1029837493827Mike and i like write     131029837493827                  Mike

MikeLacey · Jul 31, 2000

Could you do something like this? .name = "Mike" while(length(.name) < 40)     .name = " " & .name wend Yuk, not very elegant, can someone else do better? <grin> Mike <a href=mailto:michael.j.lacey@ntlworld.com>michael.j.lacey@ntlworld.com</a> <a href=

http://www.cargill.com/>

Cargill's Corporate Web Site</a>

Alt255 · Jul 31, 2000

Hmmm, maybe. Private Type MyClient     codbar As String * 13     client As String * 6     name As String * 40 End Type Dim Client As MyClient RSet Client.name = "Mike" Rset right-aligns one string in another string. Visual Basic documentation claims that you can't use it with a user defined type like "Client". Funny, you know, it just worked for me.

<a href=mailto: > </a> <a href=

http://www.vorpalcom.com>A

plain black box</a>

DSJ1967 · Jul 31, 2000

Ivax, Not sure... tried it at home and it seems to work.  Like you, defined a UDT in a module then created a new variable based on the UDT in my form ie. Option Explicit Public Type client     codbar As String * 13     client As String * 20     name As String * 40 End Type Then in the form_load I put Dim myclient As client Open "c:\test.txt" For Random As #1 With myclient     .codbar = 13     .client = "123456789"     .name = "Test" End With Put #1, , myclient opened it in wordpad and in DOS and it looked correct that is to say, that the codbar was 13 bytes, client was 20 bytes and the name was 40.

MikeLacey · Jul 31, 2000

yup - much better - I'll remember that one. Mike <a href=mailto:michael.j.lacey@ntlworld.com>michael.j.lacey@ntlworld.com</a> <a href=

http://www.cargill.com/>

Cargill's Corporate Web Site</a>

dpaulson · Jul 31, 2000

I have used this many times. name = space$(40-len(name)) & name David Paulson <a href=mailto: > </a> <a href= > </a>

MichaelRed · Aug 1, 2000

Interesting 'soloutions',  I don't understand the need to do the alignment for the text file written to Disc.  Could someone please explain this part to me?  I am obviously missing some point. Michael

DSJ1967 · Aug 1, 2000

Micheal, Sometimes it is usefull to have a fixed length text file where all the records are consistent in length.  The other option would be to have a variable length file but then you would have to have a delimiter at the end of each field.  Either way works fine.  The delimiter method generally is the better approach when dealing with large text files as it will save tons of space in the long run.  But to each their own.<grin>

bigfoot · Aug 1, 2000

I'm with Micheal.  ivax is using put, therefor is this not a random-access file?  Then why would you want to read it using a text editor.  Whatever class object you write it with will read it. Huh :~*

Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

How can I write to a a disk using put and allign a text

ivax

Programmer

MikeLacey

MIS

ivax

Programmer

MikeLacey

MIS

Alt255

Programmer

DSJ1967

MIS

MikeLacey

MIS

dpaulson

Programmer

MichaelRed

Programmer

DSJ1967

MIS

bigfoot

Programmer

Similar threads

Part and Inventory Search

Sponsor