miércoles, 13 de noviembre de 2013

Cómo totales de entrada en una base de datos

Guardar la información de acceso en VB.

 

TOTAL DE BASE DE DATOS

El uso de un acceso de base de datos le da varias opciones para manipular los datos mediante el uso de sentencias de SQL. Haga la conexión a la base de datos que desea utilizar con la clase OleDbConnection, a continuación, modificar datos utilizando la clase OleDbCommand para introducir los resultados totales en una base de datos Access.

 

Lo que necesita

Microsoft Visual Studio

 

Inicie Microsoft Visual Studio, haga clic en Nuevo proyecto en el panel izquierdo de la pantalla del ordenador, y ampliar otros idiomas continuación Plantillas instaladas. Haga clic en Visual C # y haga doble clic en Windows aplicación de formularios desde el centro de la ventana para crear un proyecto nuevo.

 

Haga doble clic en cuadro de texto en el panel Cuadro de herramientas para agregar un nuevo cuadro de texto al formulario. Agregue dos más cajas de texto utilizando la misma técnica. Haga doble clic en Button para agregar un nuevo botón.

 

Haga doble clic en el formulario para crear un evento de carga del formulario y agregue el código siguiente para establecer una conexión con la base de datos. Crear una nueva tabla para guardar los totales:

 

ObjCmd Dim As New OleDbCommand Dim Con = new OleDbConnection (Provider = Microsoft.ACE.OLEDB.12.0; Data Source = C: \ database name.accdb) Con.Open () strSQL = CREATE TABLE tableName (Totales TEXTO) objCmd = New OleDbCommand (strSQL, Con) objCmd.ExecuteNonQuery () con.close ()

 

Cambie de nuevo para formar el diseño y haga doble clic en Button1 para crear un evento de clic en este botón. Copia y pega el código siguiente para agregar dos números y mostrar el resultado del tercer cuadro de texto:

 

InputOne Dim As Integer Dim inputTwo As Integer = inputOne Me.TextBox1.Text inputTwo = Me.TextBox2.Text Me.TextBox3.Text = inputOne + inputTwo

 

Cambie de nuevo para formar el diseño y haga doble clic en Button2 para introducir el resultado total en la tabla de base de datos que ha creado:

 

Dim totales como secuencia totales = Me.TextBox3.Text objCmd Dim As New OleDbCommand Dim Con = new OleDbConnection (Provider = Microsoft.ACE.OLEDB.12.0; Data Source = C: \ database name.accdb)) Con.Open () strSQL = INSERT INTO tableName (Totales) VALUES ('(totales)') objCmd = New OleDbCommand (strSQL, Con) objCmd.ExecuteNonQuery () con.close ()

 

Presione F5 para ejecutar el programa, introducir un número en el primer y segundo cuadro de texto. Haga clic en Button1 para mostrar el resultado y haga clic en Button2 para introducir el resultado en la base de datos.

 

 

No hay comentarios:

Publicar un comentario