Importar datos a sql desde txt

Hola mi pregunta es la siguiente:

Tengo que hacer un programa que me pase los datos de un txt a una base de datos microsoft sql server, ya tengo creada la tabla pero a la hora de insertar los datos me da error. La primera linea del txt es la siguiente:

"Temperatura";"07/03/2012 9:36:51";4,5;1

Y el código de mi programa el siguiente:

Dim fileReader As System.IO.StreamReader
fileReader = My.Computer.FileSystem.OpenTextFileReader("C:\Tanque.txt")
Dim stringReader As String
stringReader = fileReader.ReadLine()
stringReader = Quitarcomillas(stringReader) 'quitar comillas es un porocedimiento


'stringReader = Len(stringReader)
'Dim sBuscar As String
'Dim sPoner As String
'sBuscar = " "
'sPoner = ";"
'TextBox1.Text = Replace(stringReader, sBuscar, sPoner, , , vbTextCompare)
Dim nombre As String
nombre = Mid(stringReader, 1, 14) 'selecciona el nombre del txt(variable stringreader)
Dim fecha As String
fecha = Mid(stringReader, 16, 10) 'seleccicona la fecha del txt(variable stringreader)
Dim hora As String
hora = Mid(stringReader, 26, 8) 'seleccicona la hora del txt(variable stringreader)
Dim temperatura As String
temperatura = Mid(stringReader, 35, 3) 'seleccicona la temperatura del txt(variable stringreader)
Dim id As String
id = Mid(stringReader, 39, 1) 'seleccicona el id del txt(variable stringreader)
Dim cadconect As String = "Data Source = AP\APLI; Initial Catalog = TRVTEMPERATURA; User Id=sa;Password=12345ab."
Dim conorigen As SqlConnection
conorigen = New SqlConnection(cadconect)
Dim cmdselect As SqlCommand = (New SqlCommand("INSERT INTO dbo.Temperatura(TM_Id,TMnombre,TMfecha,TMtemperatura,TMhora) VALUES (id,nombre,fecha,temperatura,hora)", conorigen))

0

Añade tu respuesta

Haz clic para o