How to read VB's udt files?

Shannara · Post by **Shannara** » Wed Jul 26, 2006 8:27 pm

In VB you can write a whole UDT into a file. Have anybody have experience in reading the udt files in purebasic?

KarLKoX · Post by **KarLKoX** » Thu Jul 27, 2006 9:25 am

WriteData(FIO, my_udt, sizeof(my_udt)
ReadData(FIO, @my_udt, sizeof(my_udt)

Shannara · Post by **Shannara** » Thu Jul 27, 2006 4:33 pm

Ah, thanks for the information!

I didnt know Fred cloned the VB's UDT writing and reading exactly.

I'll check that out as soon as I get home.

KarLKoX · Post by **KarLKoX** » Thu Jul 27, 2006 4:49 pm

UDT PB equivalent is the Structure, whatever language you use, writing structure is always done this way

Shannara · Post by **Shannara** » Thu Jul 27, 2006 7:02 pm

Okay then .. I'll give it a shot to read a vb udt file. If it doesnt work, I'll post both the code for vb and pb

ts-soft · Post by **ts-soft** » Thu Jul 27, 2006 7:31 pm

This doesn't work for Strings! Only the useless Pointer is written

Shannara · Post by **Shannara** » Thu Jul 27, 2006 8:23 pm

Hehe, well er... Cant be entirely useless as vb must be able to read the string somehow.

ts-soft · Post by **ts-soft** » Thu Jul 27, 2006 8:33 pm

You can use FixStrings for that

Code: Select all

Structure test
  text.s{255}
EndStructure

test.test
test\text = "Holla, purebasic rulez"

File = CreateFile(#PB_Any, "C:\test.dat")
If File
  WriteData(File, @test, SizeOf(test))
  CloseFile(File)
EndIf

Shannara · Post by **Shannara** » Thu Jul 27, 2006 9:27 pm

Yes, but that wasnt my question that started the thread. I am trying to read a udt file that was created in VB.

ts-soft · Post by **ts-soft** » Thu Jul 27, 2006 11:21 pm

Is more the answer to that:

KarLKoX wrote:UDT PB equivalent is the Structure, whatever language you use, writing structure is always done this way

I haven't VB to test it