elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Usando Git para manipular el directorio de trabajo, el índice y commits (segunda parte)


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP) (Moderador: kub0x)
| | | |-+  xfa un codigo en visual basic 2010 para abrir base de datos
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: xfa un codigo en visual basic 2010 para abrir base de datos  (Leído 4,439 veces)
duckcrazy

Desconectado Desconectado

Mensajes: 2


Ver Perfil
xfa un codigo en visual basic 2010 para abrir base de datos
« en: 28 Noviembre 2011, 00:32 am »

hola estoy algo oxidado en la programacion de vb 2010, alguien me podria proporcionar un codigo para abrir una base de datos de access 2010, para guardar, borrar, modificar registros, gracias de antemano


En línea

BlackZeroX
Wiki

Desconectado Desconectado

Mensajes: 3.158


I'Love...!¡.


Ver Perfil WWW
Re: xfa un codigo en visual basic 2010 para abrir base de datos
« Respuesta #1 en: 28 Noviembre 2011, 00:42 am »

Revisa la documentacion de ADO .NET y realiza una pregunta mas concreta en el tema...

Nota: este tema va en el sub-foro de .NET

Dulces Lunas!¡.


En línea

The Dark Shadow is my passion.
duckcrazy

Desconectado Desconectado

Mensajes: 2


Ver Perfil
Re: xfa un codigo en visual basic 2010 para abrir base de datos
« Respuesta #2 en: 28 Noviembre 2011, 20:45 pm »

Revisa la documentacion de ADO .NET y realiza una pregunta mas concreta en el tema...

Nota: este tema va en el sub-foro de .NET

Dulces Lunas!¡.


SOLO NECESITO EL CODIGO COMO PODER ABRIR LA BASE DE DATOS DE ACCESS 2010, ANTES LO HACIA ASI EN VB5 o VB6 PERO AHORA EMPEZE CON VB 2010 Y SE ME DIFICULTA
Public Class Form1
    set varprueba = opendatabase("c:\alan\prueba.accdb")
    set vartabnom = varprueba.opentable("prueba")
    Dim resp As Integer
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If TextBox1.Text = "" Then
            MsgBox("captura el nombre")
        Else
            If TextBox1.Text <> "" Then
                MsgBox("grabar nombre", 49, "datos")
                If resp = 1 Then
                    vartabnom.Addnew()
                End If
            End If

        End If
    End Sub
End Class
En línea

Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines