GrapeCity.Windows.SpreadSheet.Data Namespace > Worksheet Class > OpenTextFile Method : OpenTextFile(Stream,TextFileOpenFlags,String,String,String) Method |
'Declaration Public Overloads Sub OpenTextFile( _ ByVal stream As System.IO.Stream, _ ByVal flags As TextFileOpenFlags, _ ByVal rowDelimiter As System.String, _ ByVal columnDelimiter As System.String, _ ByVal cellDelimiter As System.String _ )
'Usage Dim instance As Worksheet Dim stream As System.IO.Stream Dim flags As TextFileOpenFlags Dim rowDelimiter As System.String Dim columnDelimiter As System.String Dim cellDelimiter As System.String instance.OpenTextFile(stream, flags, rowDelimiter, columnDelimiter, cellDelimiter)
public void OpenTextFile( System.IO.Stream stream, TextFileOpenFlags flags, System.string rowDelimiter, System.string columnDelimiter, System.string cellDelimiter )
OpenFileDialog openFileDialog = new OpenFileDialog(); openFileDialog.Filter = "Text File (.txt)|*.txt"; bool? useClick = openFileDialog.ShowDialog(); if (useClick == true) { var stream = openFileDialog.File.OpenRead(); stream.Seek(0, System.IO.SeekOrigin.Begin); gcSpreadSheet1.Sheets[0].OpenTextFile(stream, GrapeCity.Windows.SpreadSheet.Data.TextFileOpenFlags.None, "\r", ",", ""); //gcSpreadSheet1.Sheets[0].OpenTextFile(stream, GrapeCity.Windows.SpreadSheet.Data.TextFileOpenFlags.None, "\r", ",", "", System.Text.Encoding.UTF8); //gcSpreadSheet1.OpenTextFile(0, stream, GrapeCity.Windows.SpreadSheet.Data.TextFileOpenFlags.None, "\r", ",", ""); stream.Dispose(); }
Dim openFileDialog = New OpenFileDialog() openFileDialog.Filter = "Text File(.txt)|*.txt" Dim useClick As Boolean = openFileDialog.ShowDialog() If (useClick = True) Then Dim stream = openFileDialog.File.OpenRead() stream.Seek(0, IO.SeekOrigin.Begin) GcSpreadSheet1.Sheets(0).OpenTextFile(stream, GrapeCity.Windows.SpreadSheet.Data.TextFileOpenFlags.None, Chr(13), ",", "") 'GcSpreadSheet1.Sheets(0).OpenTextFile(stream, GrapeCity.Windows.SpreadSheet.Data.TextFileOpenFlags.None, Chr(13), ",", "", System.Text.Encoding.UTF8) 'GcSpreadSheet1.OpenTextFile(0, stream, GrapeCity.Windows.SpreadSheet.Data.TextFileOpenFlags.None, Chr(13), ",", "") End If
Target Platforms: Windows 7, Windows 8 Desktop, Windows Vista SP1 or later, Windows Server 2000, Windows 2000 Professional, Windows XP Professional, Windows NT 4.0 Workstation, SP6, Windows NT 4.0 Server, SP6