Writing a line in to a file
Hi
I am writing a line (text) from file 1 to file 2. I am reading a line from file 1 and writing in to file 2 using the below code. The line in file 1 is appended with double quotes (") and then written in to file 2. Can anybody suggest me a way to avoide this double quotes. For Ex: If file 1 has the sentance - This is line in file 1 then file 2 will be - "This is line in file 1" Thanks in advance Sridhar P Code ------- Sub SplitFile() Dim InputData Open "C:\inpfile.txt" For Input As #1 Open "C:\outfile.txt" For Output As #2 Line Input #1, InputData Write #2, InputData Close #2 Close #1 End Sub -- Message posted via OfficeKB.com http://www.officekb.com/Uwe/Forums.a...mming/200510/1 |
Writing a line in to a file
Change
Write #2, InputData to Print #2, InputData -- Regards, Tom Ogilvy "Sridhar P via OfficeKB.com" <u2751@uwe wrote in message news:5612d34d9a8a4@uwe... Hi I am writing a line (text) from file 1 to file 2. I am reading a line from file 1 and writing in to file 2 using the below code. The line in file 1 is appended with double quotes (") and then written in to file 2. Can anybody suggest me a way to avoide this double quotes. For Ex: If file 1 has the sentance - This is line in file 1 then file 2 will be - "This is line in file 1" Thanks in advance Sridhar P Code ------- Sub SplitFile() Dim InputData Open "C:\inpfile.txt" For Input As #1 Open "C:\outfile.txt" For Output As #2 Line Input #1, InputData Write #2, InputData Close #2 Close #1 End Sub -- Message posted via OfficeKB.com http://www.officekb.com/Uwe/Forums.a...mming/200510/1 |
Writing a line in to a file
Write # delimits the output with "" and commas; use Print# instead to send
the data to the file exactly as you have specified it in your code. -- - K Dales "Sridhar P via OfficeKB.com" wrote: Hi I am writing a line (text) from file 1 to file 2. I am reading a line from file 1 and writing in to file 2 using the below code. The line in file 1 is appended with double quotes (") and then written in to file 2. Can anybody suggest me a way to avoide this double quotes. For Ex: If file 1 has the sentance - This is line in file 1 then file 2 will be - "This is line in file 1" Thanks in advance Sridhar P Code ------- Sub SplitFile() Dim InputData Open "C:\inpfile.txt" For Input As #1 Open "C:\outfile.txt" For Output As #2 Line Input #1, InputData Write #2, InputData Close #2 Close #1 End Sub -- Message posted via OfficeKB.com http://www.officekb.com/Uwe/Forums.a...mming/200510/1 |
Writing a line in to a file
Hi Friends,
Thanks for the solution.... It serves my purpose... Thanks Sridhar P -- Message posted via OfficeKB.com http://www.officekb.com/Uwe/Forums.a...mming/200510/1 |
All times are GMT +1. The time now is 06:16 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com