BinaryWriter Write adds Carrots

[Travis Llewellyn]

I am writing a program that write out and array that I have stored. It
writes out the whole array but adds a Carrot "^" in front of each
section it writes.

If I do a debug.writeline(hello) it shows the line perfect in the
immediate windows without the carrot.

Any help would be appreciated.

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button2.Click
shrdvars.wflname = Microsoft.VisualBasic.Mid(ofdlg1.FileName,
21, 12)
sfdlg1.FileName = shrdvars.wflname
sfdlg1.InitialDirectory() = "h:\dp\testfolder\out\"
sfdlg1.ShowDialog()
Dim fsw As New FileStream(sfdlg1.FileName, FileMode.CreateNew)
Dim rw As New BinaryWriter(fsw)
'FileOpen(1, sfdlg1.FileName, OpenMode.Binary, OpenAccess.Write,
OpenShare.Default, 94)
Dim three As New shrdvars
Dim hello As String
Dim s As Integer
For s = 0 To shrdvars.al.Count - 1
hello = three.parsrecord(shrdvars.al(s))
rw.Write(hello)
Next
rw.Close()
fsw.Close()
End Sub

[Kerry Moorman]

Travis,

From the .Net online documentation about BinaryWriter's Write (string) method:

"A length-prefixed string represents the string length by prefixing to the
string a single byte or word that contains the length of that string."

Kerry Moorman

"Travis Llewellyn" <travisll"@" wrote:

I am writing a program that write out and array that I have stored. It
writes out the whole array but adds a Carrot "^" in front of each
section it writes.

If I do a debug.writeline(hello) it shows the line perfect in the
immediate windows without the carrot.

Any help would be appreciated.

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button2.Click
shrdvars.wflname = Microsoft.VisualBasic.Mid(ofdlg1.FileName,
21, 12)
sfdlg1.FileName = shrdvars.wflname
sfdlg1.InitialDirectory() = "h:\dp\testfolder\out\"
sfdlg1.ShowDialog()
Dim fsw As New FileStream(sfdlg1.FileName, FileMode.CreateNew)
Dim rw As New BinaryWriter(fsw)
'FileOpen(1, sfdlg1.FileName, OpenMode.Binary, OpenAccess.Write,
OpenShare.Default, 94)
Dim three As New shrdvars
Dim hello As String
Dim s As Integer
For s = 0 To shrdvars.al.Count - 1
hello = three.parsrecord(shrdvars.al(s))
rw.Write(hello)
Next
rw.Close()
fsw.Close()
End Sub

[Travis Llewellyn]

Kerry,

Thanks for the quick reply, Can you give me a quick way to drop that
byte before writing?

Travis

"=?Utf-8?B?S2VycnkgTW9vcm1hbg==?="
<Ke**********@discussions.microsoft.com> wrote in
news:38**********************************@microsof t.com:

Travis,

From the .Net online documentation about BinaryWriter's Write (string)
method:

"A length-prefixed string represents the string length by prefixing to
the string a single byte or word that contains the length of that
string."

Kerry Moorman

"Travis Llewellyn" <travisll"@" wrote:

I am writing a program that write out and array that I have stored.
It writes out the whole array but adds a Carrot "^" in front of each
section it writes.

If I do a debug.writeline(hello) it shows the line perfect in the
immediate windows without the carrot.

Any help would be appreciated.

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e
As
System.EventArgs) Handles Button2.Click
shrdvars.wflname = Microsoft.VisualBasic.Mid(ofdlg1.FileName,
21, 12)
sfdlg1.FileName = shrdvars.wflname
sfdlg1.InitialDirectory() = "h:\dp\testfolder\out\"
sfdlg1.ShowDialog()
Dim fsw As New FileStream(sfdlg1.FileName,
FileMode.CreateNew) Dim rw As New BinaryWriter(fsw)
'FileOpen(1, sfdlg1.FileName, OpenMode.Binary,
OpenAccess.Write,
OpenShare.Default, 94)
Dim three As New shrdvars
Dim hello As String
Dim s As Integer
For s = 0 To shrdvars.al.Count - 1
hello = three.parsrecord(shrdvars.al(s))
rw.Write(hello)
Next
rw.Close()
fsw.Close()
End Sub

[Kerry Moorman]

Travis,

The binarywriter has to add that length byte so the binaryreader can
correctly read the file.

Perhaps you need to use some other output technique, instead of binary.

Kerry Moorman

"Travis Llewellyn" <travisll"@" wrote:

Kerry,

Thanks for the quick reply, Can you give me a quick way to drop that
byte before writing?

Travis

"=?Utf-8?B?S2VycnkgTW9vcm1hbg==?="
<Ke**********@discussions.microsoft.com> wrote in
news:38**********************************@microsof t.com:

Travis,

From the .Net online documentation about BinaryWriter's Write (string)
method:

"A length-prefixed string represents the string length by prefixing to
the string a single byte or word that contains the length of that
string."

Kerry Moorman

"Travis Llewellyn" <travisll"@" wrote:

I am writing a program that write out and array that I have stored.
It writes out the whole array but adds a Carrot "^" in front of each
section it writes.

If I do a debug.writeline(hello) it shows the line perfect in the
immediate windows without the carrot.

Any help would be appreciated.

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e
As
System.EventArgs) Handles Button2.Click
shrdvars.wflname = Microsoft.VisualBasic.Mid(ofdlg1.FileName,
21, 12)
sfdlg1.FileName = shrdvars.wflname
sfdlg1.InitialDirectory() = "h:\dp\testfolder\out\"
sfdlg1.ShowDialog()
Dim fsw As New FileStream(sfdlg1.FileName,
FileMode.CreateNew) Dim rw As New BinaryWriter(fsw)
'FileOpen(1, sfdlg1.FileName, OpenMode.Binary,
OpenAccess.Write,
OpenShare.Default, 94)
Dim three As New shrdvars
Dim hello As String
Dim s As Integer
For s = 0 To shrdvars.al.Count - 1
hello = three.parsrecord(shrdvars.al(s))
rw.Write(hello)
Next
rw.Close()
fsw.Close()
End Sub

[Jay B. Harlow [MVP - Outlook]]

Travis,
Have you tried writing the individual characters instead of writing the
entire string?

For s = 0 To shrdvars.al.Count - 1
hello = three.parsrecord(shrdvars.al(s)) rw.Write(hello.ToCharArray()) Next

Hope this helps
Jay

"Travis Llewellyn" <travisll"@"comfedcu.org> wrote in message
news:Xn*********************************@207.46.24 8.16... Kerry,

Thanks for the quick reply, Can you give me a quick way to drop that
byte before writing?

Travis

"=?Utf-8?B?S2VycnkgTW9vcm1hbg==?="
<Ke**********@discussions.microsoft.com> wrote in
news:38**********************************@microsof t.com:

Travis,

From the .Net online documentation about BinaryWriter's Write (string)
method:

"A length-prefixed string represents the string length by prefixing to
the string a single byte or word that contains the length of that
string."

Kerry Moorman

"Travis Llewellyn" <travisll"@" wrote:

I am writing a program that write out and array that I have stored.
It writes out the whole array but adds a Carrot "^" in front of each
section it writes.

If I do a debug.writeline(hello) it shows the line perfect in the
immediate windows without the carrot.

Any help would be appreciated.

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e
As
System.EventArgs) Handles Button2.Click
shrdvars.wflname = Microsoft.VisualBasic.Mid(ofdlg1.FileName,
21, 12)
sfdlg1.FileName = shrdvars.wflname
sfdlg1.InitialDirectory() = "h:\dp\testfolder\out\"
sfdlg1.ShowDialog()
Dim fsw As New FileStream(sfdlg1.FileName,
FileMode.CreateNew) Dim rw As New BinaryWriter(fsw)
'FileOpen(1, sfdlg1.FileName, OpenMode.Binary,
OpenAccess.Write,
OpenShare.Default, 94)
Dim three As New shrdvars
Dim hello As String
Dim s As Integer
For s = 0 To shrdvars.al.Count - 1
hello = three.parsrecord(shrdvars.al(s))
rw.Write(hello)
Next
rw.Close()
fsw.Close()
End Sub

[Travis Llewellyn]

Jay,

This worked great.
Thanks
Travis

"Jay B. Harlow [MVP - Outlook]" <Ja************@msn.com> wrote in
news:e9**************@tk2msftngp13.phx.gbl:

Travis,
Have you tried writing the individual characters instead of writing
the entire string?

For s = 0 To shrdvars.al.Count - 1
hello = three.parsrecord(shrdvars.al(s)) rw.Write(hello.ToCharArray()) Next

Hope this helps
Jay

"Travis Llewellyn" <travisll"@"comfedcu.org> wrote in message
news:Xn*********************************@207.46.24 8.16...

Kerry,

Thanks for the quick reply, Can you give me a quick way to drop that
byte before writing?

Travis

"=?Utf-8?B?S2VycnkgTW9vcm1hbg==?="
<Ke**********@discussions.microsoft.com> wrote in
news:38**********************************@microsof t.com:

Travis,

From the .Net online documentation about BinaryWriter's Write
(string) method:

"A length-prefixed string represents the string length by prefixing
to the string a single byte or word that contains the length of that
string."

Kerry Moorman

"Travis Llewellyn" <travisll"@" wrote:

I am writing a program that write out and array that I have stored.
It writes out the whole array but adds a Carrot "^" in front of
each section it writes.

If I do a debug.writeline(hello) it shows the line perfect in the
immediate windows without the carrot.

Any help would be appreciated.

Private Sub Button2_Click(ByVal sender As System.Object, ByVal
e As
System.EventArgs) Handles Button2.Click
shrdvars.wflname =
Microsoft.VisualBasic.Mid(ofdlg1.FileName,
21, 12)
sfdlg1.FileName = shrdvars.wflname
sfdlg1.InitialDirectory() = "h:\dp\testfolder\out\"
sfdlg1.ShowDialog()
Dim fsw As New FileStream(sfdlg1.FileName,
FileMode.CreateNew) Dim rw As New BinaryWriter(fsw)
'FileOpen(1, sfdlg1.FileName, OpenMode.Binary,
OpenAccess.Write,
OpenShare.Default, 94)
Dim three As New shrdvars
Dim hello As String
Dim s As Integer
For s = 0 To shrdvars.al.Count - 1
hello = three.parsrecord(shrdvars.al(s))
rw.Write(hello)
Next
rw.Close()
fsw.Close()
End Sub