base de datos acceess
Publicado por francisco (162 intervenciones) el 19/01/2010 16:14:35
Dim direccion As String
direccion = My.Application.Info.DirectoryPath
direccion = direccion & "\basedatos.mdb"
Dim cat As Catalog = New Catalog()
If System.IO.File.Exists(direccion) Then
Label1.Text = " LA BASE DE DATOS YA EXISTE"
Else
cat.Create("Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & direccion & ";" & _
"Jet OLEDB:Engine Type=5")
Label1.Text = "LA BASE DE DATOS CREADA CORRECTAMENTE"
cat = Nothing
End If
he creado una base de datos en accees
hasta aqui todo va bien pero como creo una tabla con sus columnas correspondientes
un manual o un ejemplo
gracias
direccion = My.Application.Info.DirectoryPath
direccion = direccion & "\basedatos.mdb"
Dim cat As Catalog = New Catalog()
If System.IO.File.Exists(direccion) Then
Label1.Text = " LA BASE DE DATOS YA EXISTE"
Else
cat.Create("Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & direccion & ";" & _
"Jet OLEDB:Engine Type=5")
Label1.Text = "LA BASE DE DATOS CREADA CORRECTAMENTE"
cat = Nothing
End If
he creado una base de datos en accees
hasta aqui todo va bien pero como creo una tabla con sus columnas correspondientes
un manual o un ejemplo
gracias
Valora esta pregunta


0