XPost: comp.lang.basic.visual, comp.lang.basic.visual.misc   
   From: mynamehere@comcast.net   
      
   "Stefanie"  wrote in message   
   news:37e66$41b8391c$513b4d44$10299@news1.zonnet.nl...   
   | Steve,   
   |   
   | > As far as I can tell, Put will write a 2 byte length before writing   
   a   
   | > variable length string to a file opened Random (UDT or not), which   
   | > allows Get to retrieve it correctly. The total record length would   
   have   
   | > to be long enough for that. I don't believe you actually have to pad   
   out   
   | > the string length unless you want to.   
   |   
   | Yes i read that too, but i don't understand how to do this:   
   |   
   | This are the variables declared in my module.   
   |   
   |     Type Record   
   |         vDateTime As String * 19   
   |         vFileName As String   
   |     End Type   
   |   
   |     Public RecVar As Record   
   |   
   | Using vFileName As String * 255 gives my enough for een full path, but   
   most   
   | of the time it's wasting space.   
   |   
   | I use this for opening my file:   
   |   
   |     Open strFileName For Random As #Dnr Len = Len(RecVar)   
   |   
   | But it's gives an error. "Bad record lenght"   
   |   
   | Maybe somebody can offer me an example how to use the aforesaid.   
   |   
   | Stefanie   
   |   
      
   Len(RecVar) will not include any space for the vFileName string if it is   
   declared as variable length, hence the bad record length error. You   
   would have to make the Len in the Open statement equal to the longest   
   length you expect: approx. Len(RecVar)+255.   
      
   If you don't want to reserve 255 for every vFileName, you can't really   
   use a fixed record length, which means working in Binary rather than   
   Random. It gets a little more complicated, but Jerry French can help you   
   out if you need it. Me, I would just waste some disk space, it seems   
   cheap enough, and go with a fixed length record. 512 sounds like a nice   
   size.   
      
   --- SoupGate-Win32 v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)