Tecnología

Inicio

Cómo escribir un archivo de texto en una tabla de base de datos mediante Visual Basic

Cómo escribir un archivo de texto en una tabla de base de datos mediante Visual Basic


Microsoft Visual Basic (VB) es un lenguaje de programación que es fácil de aprender y utilizar. VB se utiliza para desarrollar aplicaciones de Windows de fácil uso. Una tarea común en el mundo de la programación es para mover la información de archivos de un lugar a otro. Usted puede guardar la información en un archivo de texto a una tabla de base de datos Microsoft Access utilizando Microsoft OLE DB. El acceso es una aplicación de base de datos relacional incluido en el paquete de Microsoft Office.

Instrucciones

1 Abrir "Bloc de notas" y tipo "nombre, edad, CIUDAD" en la primera línea.

Tipo "JUAN, 25, WATAUGA" en la segunda línea.

Guarde el archivo en "C: \" como "MyTextFile.txt".

2 Abra Microsoft Access y crear una nueva base de datos. Guarde su base de datos en "C: \" como "test.mdb".

Iniciar Microsoft Visual Basic 2010 Express, seleccione el menú "Archivo" y luego en "Nuevo proyecto ...". Haga clic en "Aplicación de Windows Forms" y seleccione "OK".

3 Haga doble clic en "botón" en el menú "Herramientas" para añadir un nuevo botón para "Form1". Haga doble clic en "Button1" para comenzar a escribir su código bajo "Form1.vb".

4 Tipo "Imports System.Data.OleDb" en la primera línea de "Form1.vb".

5 Escriba lo siguiente dentro de la subrutina "Button1_Click" para definir la conexión y el comando:

Dim oledbConn As New OleDbConnection ( "Provider = Microsoft.Jet.OleDb.4.0; Data Source = C: \ test.mdb")

Dim oledbCommand As New OleDbCommand("SELECT * INTO [myTextFile] FROM [Text;Database=C:\;Hdr=Yes].[myTextfile.txt]", oledbConn)

6 Escribe lo siguiente para abrir la conexión y ejecutar el comando a continuación, cierre la conexión:

oledbConn.Open ()

oledbCommand.ExecuteNonQuery ()

oledbConn.Close ()

Pulse la tecla "F5" para ejecutar el programa y haga clic en "Button1" para ejecutar la subrutina.


Artículos relacionados