file handling

Comments

• PavlinII

  October 2003

  : i try to open a zip file with
  :
  : open "filename" for input as #1
  :
  : and then save the file into a variable, but when i try to write the file with
  :
  : open "filename" for output as #1
  : write #1, variable
  : close #1
  :
  : the file is rather messy and wont work... can anyone help?
  :
  [red][b]Do not use Write #1, Variable [/b][/red] because Write is "formated output" - it can do some rubbish with text and numbers .... And Write gives quotation marks on beginnig and end of Variable.. So if you use
  Variable = "hello"
  then in your file will appears:
  "hello"
  
  [green][b]Use Print #1, Variable[/b][/green] instead write... It should be enough... If you're sure that your Variable is filled correctly ;-)
  
  PavlinII
  
• Arax

  November 2003

  : : i try to open a zip file with
  : :
  : : open "filename" for input as #1
  : :
  : : and then save the file into a variable, but when i try to write the file with
  : :
  : : open "filename" for output as #1
  : : write #1, variable
  : : close #1
  : :
  : : the file is rather messy and wont work... can anyone help?
  : :
  : [red][b]Do not use Write #1, Variable [/b][/red] because Write is "formated output" - it can do some rubbish with text and numbers .... And Write gives quotation marks on beginnig and end of Variable.. So if you use
  : Variable = "hello"
  : then in your file will appears:
  : "hello"
  :
  : [green][b]Use Print #1, Variable[/b][/green] instead write... It should be enough... If you're sure that your Variable is filled correctly ;-)
  :
  : PavlinII
  :
  it still wont work
  i use this code:
  [code]Dim line
  
  Open "c: est.rar" For Input As #1
  Open "c: est2.rar" For Output As #2
  While Not EOF(1)
  Line Input #1, line
  Print #2, line
  MsgBox line
  Wend
  Close #1
  Close #2
  [/code]
  
• PavlinII

  November 2003

  : : : i try to open a zip file with
  : : :
  : : : open "filename" for input as #1
  : : :
  : : : and then save the file into a variable, but when i try to write the file with
  : : :
  : : : open "filename" for output as #1
  : : : write #1, variable
  : : : close #1
  : : :
  : : : the file is rather messy and wont work... can anyone help?
  : : :
  : : [red][b]Do not use Write #1, Variable [/b][/red] because Write is "formated output" - it can do some rubbish with text and numbers .... And Write gives quotation marks on beginnig and end of Variable.. So if you use
  : : Variable = "hello"
  : : then in your file will appears:
  : : "hello"
  : :
  : : [green][b]Use Print #1, Variable[/b][/green] instead write... It should be enough... If you're sure that your Variable is filled correctly ;-)
  : :
  : : PavlinII
  : :
  : it still wont work
  : i use this code:
  : [code]Dim line
  :
  : Open "c: est.rar" For Input As #1
  : Open "c: est2.rar" For Output As #2
  : While Not EOF(1)
  : Line Input #1, line
  : Print #2, line
  : MsgBox line
  : Wend
  : Close #1
  : Close #2
  : [/code]
  :
  :-) [gray]I said: "If you're sure that your Variable is filled correctly"[/gray] ;-)
  Your code wont work because:
  Line Input reads file and it returns string from actual position to LF [gray](Chr(13))[/gray][blue]OR[/blue] LF-CR [gray](Chr(13) & Chr(10))[/gray] and that OR is your problem, because Print writes LF-CR everytime... You you have some CRs additional... And in binary file (like theese archives) isn't combination LF-CR compulsory...
  So, use this code:
  [code]Dim AllFile As String
  Open "E:_TempTest.rar" For Binary As #1
  AllFile = Space(FileLen("E:_Temp est.rar"))
  Get #1, , AllFile
  Close #1
  
  Open "E:_Temp est2.rar" For Binary As #2
  Put #2, , AllFile
  Close #2[/code]
  Hope, it will help ;-)
  PavlinII