Link to home
Start Free TrialLog in
Avatar of Jimmyjay21
Jimmyjay21

asked on

With VB 2008 something using the stream class

I am having trouble understanding how the stream can be read and data extracted to a fielded recordset.

Dim myStream As Stream = Nothing
        Dim openFileDialog1 As New OpenFileDialog()
 
        openFileDialog1.InitialDirectory = Application.StartupPath & \Data\
        openFileDialog1.Filter = "Icon files (*.ico|"
        openFileDialog1.FilterIndex = 2
        openFileDialog1.RestoreDirectory = True
 
        If openFileDialog1.ShowDialog() = System.Windows.Forms.DialogResult.OK Then
            Try
                myStream = openFileDialog1.OpenFile()
                If (myStream IsNot Nothing) Then
                    ' Insert code to read the stream here. Here is the 
                'something like this?
              mydate = read(buffer, 1, 16) 
                End If
            Catch Ex As Exception
                MessageBox.Show("Cannot read file from disk. Original error: " & Ex.Message)
            Finally
                ' Check this again, since we need to make sure we didn't throw an exception on open.
                If (myStream IsNot Nothing) Then
                    myStream.Close()
                End If
 
 
 
            End Try
 
        End If

Open in new window

ASKER CERTIFIED SOLUTION
Avatar of Mike Tomlinson
Mike Tomlinson
Flag of United States of America image

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial