none
mostrar los datos de una tabla de acces en visual basic 6.0

    Question

  • hol, soy nueva en esto de la programacion y desearia que me ayudasen. quiero conectar una base de datos de access con visual basic 6.0.
    estoy utilizando un control data, realize la coneccion  desde las propiedades, pero como ago para que me muestre el registro en los cuadros de texto. gracias de antemano.
    Wednesday, June 17, 2009 10:05 PM

All replies

  • Hola

    Aqui encontraras un codigo que espero que te sirva

    Private Sub Form_Load()
    
        ' Declare the ADO objects we need.
        Dim conn As ADODB.Connection
        Dim rs As ADODB.Recordset
    
        ' Prepare our connection string.
        Dim connString As String
        connString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & _
            "\..\Northwind.mdb;User Id=admin;Password="
    
        ' Prepare our SQL statement.
        Dim sqlString As String
        sqlString = "Select FirstName, LastName, Extension, HomePhone " & _
            "From Employees Order By LastName, FirstName"
    
        ' Instantiate and open the connection. The database is located relative to
        ' the application path.
        Set conn = New ADODB.Connection
        conn.Open connString
    
        ' Get the data into a recordset.
        Set rs = New ADODB.Recordset
        rs.CursorLocation = adUseClient
        rs.Open sqlString, conn, adOpenStatic, adLockOptimistic
    
        ' Bind the recordset to the grid.
        Set grdEmployees.DataSource = rs
    
    End Sub
    

    En cada textbox, tienes la propiedad DataSource que debe de estar conecta al DataControl, y la propiedad TexField al campo de de la tabla que ectives.

    También puedes pasar el rs a la propiedad RecordSource del objeto DataControl.

    Para grabar en un Button escribes directamente DataControl.Recordset.Update

    Saludos
    Bitnius



    Programador en VB.NET 2008, SQL SERVER 2008, Crystal Report 2008 Si la respuesta es correcta, marcála como correcta. También puedes votar como útil si te sirvió.
    • Proposed as answer by Bitnius Thursday, June 18, 2009 4:18 AM
    Thursday, June 18, 2009 4:18 AM
  • hola

    este codigo es para conectar la base de datos, si ya hice la conexion desde las propiedades debo incluirlo de todas formas, y como hago lo ultimo?

    "En cada textbox, tienes la propiedad DataSource que debe de estar conecta al DataControl, y la propiedad TexField al campo de de la tabla que ectives.

    También puedes pasar el rs a la propiedad RecordSource del objeto DataControl.

    Para grabar en un Button escribes directamente DataControl.Recordset.Update"

    gracias.

    Thursday, June 18, 2009 1:29 PM
  • Hola

    No se que paso con la edicion de mensaje, lo escribo nuevamente.

    Esto en el diseñador de VB6

    1. En cada TextBox de tu formulario que desees enlazar al control data, en explorador de propieades del control textbox seleccionas primero la propiedad datasource y te debe de aparecer un listbox con el nombre de tu control data, lo seleccionas.
    2. Luego buscas la propiedad del control textbox llamada TextField y escribes a que campo de tu tabla estara enlazado esto control.

    Esto en tu codigo de la forma

    En la rutina Form_load escribes la sentencia de conexion, apertura de recordset y lo asignas a la propiedad RecordSource de tu control data, y listo todo te debe de funcionar bien.

    Cuando requieras grabar los datos, en la rutina del boton grabar puedes poner lo siguiente;

    DataControl.Recordset.Update o el nombre del control data que usas

    Espero que te sirva esta explicacion

    Saludos
    Bitnius



    Programador en VB.NET 2008, SQL SERVER 2008, Crystal Report 2008 Si la respuesta es correcta, marcála como correcta. También puedes votar como útil si te sirvió.
    Friday, June 19, 2009 2:57 AM