EDN Admin
Well-known member
Hola, la verdad empiezo con este tema de asp.net vb y no he podido tener exito con lo siguiente:
Quiero leer desde el archivo ClientesHFM.txt unos datos separados por , y otros con doble "". Estuve mirando en algunos foros y trate de usar el siguiente código, pero me sale un erro sobre la definición de campos...
Lo que pretendo es seleccionar algunos datos separados por coma y guardarlos en una tabla...
Uso Visual Studio 2010, Asp.net con VB...
Gracias por la ayuda....
______________________________________________________________________________________________________
Dim archivo As String = Server.MapPath("~/Files/ClientesHFM.txt")
Array donde se almacenara los campos de la fila separados
Dim campos As String()
Declaramos el lector
Dim reader As StreamReader
Dim CAMPO1, CAMPO2, CAMPO3, CAMPO4 As String
Dim cnp1 As New SqlConnection
Dim queryp1 As New SqlCommand
cnp1.ConnectionString = SDSourceClient.ConnectionString
cnp1.Open()
queryp1.CommandType = Data.CommandType.Text
queryp1.CommandText = "Select * from Clientes "
queryp1.Connection = cnp1
Try
Leemos su contenido
reader = File.OpenText(archivo)
Leemos linea por linea
While reader.Peek() <> -1
Separamos la linea por el ;
campos = reader.ReadLine.Split(";")
Aqui haces el insert a la tabla de tu BD...
queryp1.CommandText = "INSERT INTO CLIENTES (Cod, Nombre, Nit, Dir) VALUES(campos(0), campos(2), campos(0), campos(4))"
queryp1.ExecuteNonQuery()
End While
Dim n As Integer = queryp1.ExecuteNonQuery()
LblError.Text = ("Nº de registros afectados: " & CStr)
reader.Close()
Catch ex As Exception
MsgBox(ex.Message)
End Try
cnp1.Close()
______________________________________________________________________________________________
Haaaa quisiera saber como puedo ejecutar el asistente para que el usuario examine y pueda seleccionar el archivo .Txt a leer...
Gracias por la ayuda, pues ya me estoy voviendo loco.
View the full article
Quiero leer desde el archivo ClientesHFM.txt unos datos separados por , y otros con doble "". Estuve mirando en algunos foros y trate de usar el siguiente código, pero me sale un erro sobre la definición de campos...
Lo que pretendo es seleccionar algunos datos separados por coma y guardarlos en una tabla...
Uso Visual Studio 2010, Asp.net con VB...
Gracias por la ayuda....
______________________________________________________________________________________________________
Dim archivo As String = Server.MapPath("~/Files/ClientesHFM.txt")
Array donde se almacenara los campos de la fila separados
Dim campos As String()
Declaramos el lector
Dim reader As StreamReader
Dim CAMPO1, CAMPO2, CAMPO3, CAMPO4 As String
Dim cnp1 As New SqlConnection
Dim queryp1 As New SqlCommand
cnp1.ConnectionString = SDSourceClient.ConnectionString
cnp1.Open()
queryp1.CommandType = Data.CommandType.Text
queryp1.CommandText = "Select * from Clientes "
queryp1.Connection = cnp1
Try
Leemos su contenido
reader = File.OpenText(archivo)
Leemos linea por linea
While reader.Peek() <> -1
Separamos la linea por el ;
campos = reader.ReadLine.Split(";")
Aqui haces el insert a la tabla de tu BD...
queryp1.CommandText = "INSERT INTO CLIENTES (Cod, Nombre, Nit, Dir) VALUES(campos(0), campos(2), campos(0), campos(4))"
queryp1.ExecuteNonQuery()
End While
Dim n As Integer = queryp1.ExecuteNonQuery()
LblError.Text = ("Nº de registros afectados: " & CStr)
reader.Close()
Catch ex As Exception
MsgBox(ex.Message)
End Try
cnp1.Close()
______________________________________________________________________________________________
Haaaa quisiera saber como puedo ejecutar el asistente para que el usuario examine y pueda seleccionar el archivo .Txt a leer...
Gracias por la ayuda, pues ya me estoy voviendo loco.
View the full article