acces-visual basic 6.0

[jesusjaime]

hola

estoy haciendo una aplicacion en VB 6.0 el cual realiza cotizaciones y facturas en donde estoy usando 4 datagrid conectados a tablas de una misma base de datos en access. Lo que quiero saber como abrir access desde visual y crear las respectivas tablas y guardar la base de datos, esto es porque necesito guardar cada cotizacion que se haga. Tambien como hacer para crear un boton de guardar como para que guarde la base de datos.

de antemano muchas gracias

[genito]

Hola
Si con lo de abrir access te refieres a abrir la conexión a la BD lo puedes hacer de esta manera:

Public Function AbrirConexionAccess() As Boolean

Static bOpen As Boolean

On Error GoTo Errcnnaccess
If bOpen = False Then
Set cnnAccess = New ADODB.Connection
cnnAccess.ConnectionString = " Provider=Microsoft.Jet.OLEDB.4.0; DataSource= " & sRutaBaseDatos & _
";Persist Security Info = False"
cnnAccess.Open
bOpen = True
End If
AbrirConexionAccess = True
Exit Function

Errcnnaccess:
MsgBox Err.Number & ", " & Err.Description, vbCritical

End Function

Para crear las tablas puedes hacerlo así (aquí te pongo un ejemplo de unas tablas mias):

'CREAR LA BASE DE DATOS
Set cCataleg = New ADOX.Catalog
cCataleg.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & sPathBD & ";"
'CREAR LA TABLA
Set cTaula = New ADOX.Table
With cTaula
.Name = "PELICULAS"
.Columns.Append "ID_P", adDouble
.Columns.Append "titulo", adVarWChar, 100
.Columns.Append "duracion", adVarWChar
.Columns.Append "año", adVarWChar, 100
.Columns.Append "director", adVarWChar, 70
.Columns.Append "genero", adVarWChar, 30
.Columns.Append "pais", adVarWChar, 60
.Columns.Append "tamaño", adVarWChar, 8
.Columns.Append "fecha_desc", adDate
End With
'AGREGAR LA TABLA A LA BASE DE DATOS
cCataleg.Tables.Append cTaula

'DESTRUIR LOS OBJETOS
Set cTaula = Nothing
Set cCataleg = Nothing
End Sub

Espero que con esto puedas hacer algo ya.
Un saludo

[ccca001]

tambien puedes diseñar directamente las tablas en ms access...
y manejarlas desde visual basic...te ahorras código...

[Dcastro]

Hola jaime Jesus .. tu nombre se me hace conocido.. no hemos trabajado antes juntos???..
Bueno mas facil es crear las tablas en el mismo access. y la conexion normal...
no se si usas un opendatabase(basededatos) y haces un recordset con tu select.
y para guardar tb.. recordset.addnew.. asignas los datos al recordset y depues un update!
SUper Facil!!!