Asunto: Insertar registros en tb oracle desde VB6 utilizando RDO
Ingenieros,,,,,,me pueden decir de que manera puedo insertar registros a una tb oracle desde visual basic 6, estoy utilizando un Odbc de oracle home y un RDO en visual basic. Ya tengo la conexion activa pero no se como enlazo el rdoconexion con la instruccion "insert into" para ejecutarlo con el metodo (execute)
Set rdoEntorno = rdoEngine.rdoEnvironments(0)
Set rdoConexion = rdoEntorno.OpenConnection(txtodbc.Text, False, True, conODBC)
Gracias por su ayuda
Publicado:
Mie Ago 08, 2007 4:06 pm
alonsojpd Administrador/Moderador
Registrado: Sep 16, 2003 Mensajes: 2687
Asunto: Re: Insertar registros en tb oracle desde VB6 utilizando RDO
Anuncios
yecoar escribió:
Ingenieros,,,,,,me pueden decir de que manera puedo insertar registros a una tb oracle desde visual basic 6, estoy utilizando un Odbc de oracle home y un RDO en visual basic. Ya tengo la conexion activa pero no se como enlazo el rdocone...
Te mostramos un ejemplo:
Código:
Private Sub btInsertarRegistro_Click()
Dim rdoEntorno As rdoEnvironment
Dim rdoConexion As rdoConnection
Dim conODBC As String
Dim insertarSQL As String
Dim rdoConsulta As New rdoQuery
On Error GoTo cError
conODBC = "DSN=NOMBRE_ODBC;ODBC;;" + _
"uid=USUARIO_CONEXION;pwd=CONTRASEÑA_CONEXION"
Set rdoEntorno = rdoEngine.rdoEnvironments(0)
Set rdoConexion = rdoEntorno.OpenConnection(txtODBC.Text, _
False, False, conODBC)
MsgBox "Consulta SQL de inserción ejecutada correctamente.", _
vbInformation
cSalir:
Exit Sub
cError:
MsgBox Err.Description
GoTo cSalir
End Sub
Donde:
* NOMBRE_ODBC: nombre que le hayas dado al origen de datos ODBC.
* USUARIO_CONEXION: nombre del usuario de la base de datos Oracle que tenga los permisos sufientes para hacer inserciones.
* CONTRASEÑA_CONEXION: contraseña del usuario con el que nos conectaremos a Oracle.
Recuerda añadir en Visual Basic una referencia a Microsoft Remote Data Object 2.0, lógicamente deberá estar instalada y registrada la dll MSRDO20.DLL en el equipo donde se vaya a ejecutar el programa.
Este código te sirve para cualquier origen de datos ODBC: Oracle, MySQL, SQL Server, DB2, Interbase, Access, etc.
Para ver cómo instalar y añadir un origen de datos ODBC de Oracle y cómo realizar la conexión RDO en Visual Basic, aquí tienes un manual que lo explica paso a paso:
Puede publicar nuevos temas en este foro No puede responder a temas en este foro No puede editar sus mensajes en este foro No puede borrar sus mensajes en este foro No puede votar en encuestas en este foro
Visita nuestro nuevo sitio web con programas y contenidos actualizados: Proyecto A
