Contenido De Textbox En Base De Datos
Subject: Contenido De Textbox En Base De Datos
buenos dias, como puedo introducir el contenido de un textbox a la base de datos?
Subject: Re: Contenido De Textbox En Base De Datos
Last edited by chen_08 on Monday, 12 April 2010, 22:48; edited 1 time in total
Hola Techm3..! No especificaste que base de datos usas bueno aquí te dejo la conección de la base de datos de Mysql
El codigo sql para insertar un dato es insert into <nombretabla> value(<campo1>,<campo2>,<campo3>)
Si no sabes sentencias sql puedes buscar en google algún manual de mysql o progresql.!! Es necesario para interactuar con una base de dato..! te servirá de mucho.
Mas Ayuda
Conección Base de Datos Mysql
Tipo de Base de Datos que soporta Gambas
Componente para acceso a base de dato "gb.db"
Espero que te sirva..!! Saludos
DIM cn AS Connection
cn = NEW Connection
cn.Type = "mysql" //Tipo de Base de Dato
cn.Host = "FreeSQL.org" //Host del Servidor
cn.User = "gambas" //Usuario de la DB
cn.Password = "gambas" //Contraseña de la DB
cn.Name = "nombreyedad" //Nombre de la DB
cn.Open //Abre la Coneccion
cn.Exec("insert into <nombretabla> value('" & textbox1.text & "')") //Ejecuta la sentecia SQL
cn = NEW Connection
cn.Type = "mysql" //Tipo de Base de Dato
cn.Host = "FreeSQL.org" //Host del Servidor
cn.User = "gambas" //Usuario de la DB
cn.Password = "gambas" //Contraseña de la DB
cn.Name = "nombreyedad" //Nombre de la DB
cn.Open //Abre la Coneccion
cn.Exec("insert into <nombretabla> value('" & textbox1.text & "')") //Ejecuta la sentecia SQL
El codigo sql para insertar un dato es insert into <nombretabla> value(<campo1>,<campo2>,<campo3>)
Si no sabes sentencias sql puedes buscar en google algún manual de mysql o progresql.!! Es necesario para interactuar con una base de dato..! te servirá de mucho.
Mas Ayuda
Conección Base de Datos Mysql
Tipo de Base de Datos que soporta Gambas
Componente para acceso a base de dato "gb.db"
Espero que te sirva..!! Saludos
Last edited by chen_08 on Monday, 12 April 2010, 22:48; edited 1 time in total
Subject: Re: Contenido De Textbox En Base De Datos
gracias chen_08 por tu respuesta. Resulta que añadí la última linea la de cn.Exec y cuando ejecuto el programa me dice que tengo un error en el sintaxis de sql.
Subject: Re: Contenido De Textbox En Base De Datos
Last edited by chen_08 on Wednesday, 14 April 2010, 03:29; edited 1 time in total
Hola Techm3.!! Este código ya esta probado de todos modos te dejo la base de dato y la tabla ya creada lista para ejecutar, lo que hice fue crear una tabla para insertar un nombre de 50 caracteres aqui te dejo la sentencia sql
Aqui te dejo el código del proyecto que hice, agregue algunas funciones de errores try catch y hice una función para cargar los datos !!
Aquí te dejo el Proyecto
Bajar Codigo
También te dejo un proyecto que fue el primer proyecto que hice es agregar un nombre y edad a una base de datos y mostrarlo en un ColumnView
Ver Post
Cualquiera duda o cualquiera pregunta estamos a tu disposición
Saludos
Aqui te dejo el código del proyecto que hice, agregue algunas funciones de errores try catch y hice una función para cargar los datos !!
PRIVATE FUNCTION agregar_nom(query AS String) AS Integer
DIM cn AS Connection
cn = NEW Connection
cn.Type = "mysql" 'Tipo de Base de Dato
cn.Host = "chen.serveftp.org" 'Host del Servidor
cn.User = "a8281819_jmental" 'Usuario de la DB
cn.Password = "gambas10" 'Contraseña
cn.Name = "a8281819_jmental" 'Nombre de la DB
TRY cn.Open 'Abre la Coneccion
cn.Exec(query) 'Ejecuta la sentecia SQL
Message.Info("El Nombre Fue Agregado")
cn.Close
CATCH
Message.Warning("Error Al Conectar a la Base de Dato " & Error.Text)
RETURN 0
END
PUBLIC SUB btn_agregar_Click()
DIM query AS String
IF (Len(txt_nombre.Text) > 5) THEN
query = "insert into prueba value('" & txt_nombre.Text & "')"
agregar_nom(query)
ELSE
Message.Info("Debe Escribir un nombre mayor de 5 caracteres")
ENDIF
END
DIM cn AS Connection
cn = NEW Connection
cn.Type = "mysql" 'Tipo de Base de Dato
cn.Host = "chen.serveftp.org" 'Host del Servidor
cn.User = "a8281819_jmental" 'Usuario de la DB
cn.Password = "gambas10" 'Contraseña
cn.Name = "a8281819_jmental" 'Nombre de la DB
TRY cn.Open 'Abre la Coneccion
cn.Exec(query) 'Ejecuta la sentecia SQL
Message.Info("El Nombre Fue Agregado")
cn.Close
CATCH
Message.Warning("Error Al Conectar a la Base de Dato " & Error.Text)
RETURN 0
END
PUBLIC SUB btn_agregar_Click()
DIM query AS String
IF (Len(txt_nombre.Text) > 5) THEN
query = "insert into prueba value('" & txt_nombre.Text & "')"
agregar_nom(query)
ELSE
Message.Info("Debe Escribir un nombre mayor de 5 caracteres")
ENDIF
END
Aquí te dejo el Proyecto
Bajar Codigo
También te dejo un proyecto que fue el primer proyecto que hice es agregar un nombre y edad a una base de datos y mostrarlo en un ColumnView
Ver Post
Cualquiera duda o cualquiera pregunta estamos a tu disposición
Saludos
Last edited by chen_08 on Wednesday, 14 April 2010, 03:29; edited 1 time in total
Page 1 of 1
You cannot post new topicsYou cannot reply to topics
You cannot edit your posts
You cannot delete your posts
You cannot vote in polls
You cannot attach files
You can download files
You cannot post calendar events
This is a "Lo-Fi" version of our main content. To view the full version with more information, formatting and images, please click here.
Powered by Icy Phoenix based on phpBB
Design by DiDiDaDo
Generation Time: 0.1152s (PHP: -33% SQL: 133%)
SQL queries: 26 - Debug Off - GZIP Enabled