Hi,
I am trying to read a text file with vb.net from SSIS package but it fails on objCom.ExecuteReader(). The error message is below
[Script Component [294]] Error: System.Data.OleDb.OleDbException: Invalid argument. at Microsoft.SqlServer.Dts.Pipeline.ScriptComponentHost.HandleUserException(Exception e) at Microsoft.SqlServer.Dts.Pipeline.ScriptComponentHost.ProcessInput(Int32 inputID, PipelineBuffer buffer) at Microsoft.SqlServer.Dts.Pipeline.ManagedComponentHost.HostProcessInput(IDTSManagedComponentWrapper90 wrapper, Int32 inputID, IDTSBuffer90 pDTSBuffer, IntPtr bufferWirePacket)
This is my code. I can’t figure out what may be wrong.
Dim con As New OleDb.OleDbConnection
Dim objCom As New OleDb.OleDbCommand
Dim rdr As OleDb.OleDbDataReader
con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\SapText;Extended Properties=""text;HDR=Yes;FMT="""
Dim cmd As OleDb.OleDbDataAdapter = New OleDb.OleDbDataAdapter("SELECT * FROM Prg_Sys.txt", con)
con.Open()
rdr = objCom.ExecuteReader()
Do While rdr.Read()
MsgBox(rdr.Item(0))
Loop
con.Close()
Thanks
I am trying to read a text file with vb.net from SSIS package but it fails on objCom.ExecuteReader(). The error message is below
[Script Component [294]] Error: System.Data.OleDb.OleDbException: Invalid argument. at Microsoft.SqlServer.Dts.Pipeline.ScriptComponentHost.HandleUserException(Exception e) at Microsoft.SqlServer.Dts.Pipeline.ScriptComponentHost.ProcessInput(Int32 inputID, PipelineBuffer buffer) at Microsoft.SqlServer.Dts.Pipeline.ManagedComponentHost.HostProcessInput(IDTSManagedComponentWrapper90 wrapper, Int32 inputID, IDTSBuffer90 pDTSBuffer, IntPtr bufferWirePacket)
This is my code. I can’t figure out what may be wrong.
Dim con As New OleDb.OleDbConnection
Dim objCom As New OleDb.OleDbCommand
Dim rdr As OleDb.OleDbDataReader
con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\SapText;Extended Properties=""text;HDR=Yes;FMT="""
Dim cmd As OleDb.OleDbDataAdapter = New OleDb.OleDbDataAdapter("SELECT * FROM Prg_Sys.txt", con)
con.Open()
rdr = objCom.ExecuteReader()
Do While rdr.Read()
MsgBox(rdr.Item(0))
Loop
con.Close()
Thanks