pregunta importante

puedes usar el código que se usa en ADO (convertido y usando las referencias
adecuadas, los mismo objetos ADOX)
Aquí tienes un ejemplo para VB6

En lugar de usar ADOX 2.6, tendrás que usar 2.7 o superior.
(en referencias, pestaña COM)

Nos vemos.
Guillermo
Microsoft VB MVP desde 1997
Te invito a mi sitio dedicado al VB y más...
http://www.elguille.info/
http://www.mundoprogramacion.com/
(puede que el correo usado sea anti-spam)


"jorge" wrote in message
news:465801c4c352$d551d0e0$
señores buenos dias si algui me puede ayudar crear una
base de datos con codigo en punto net haciendo el
comparativo con vb6.0 se utiliza esta funsion se declara
una variable global Database y despues es utilizada en
una funcion que crea la base de datos no se como hacerlo
en punto net de la misma forma.


Public BDars As Database

Public Function CrearBaseDatos(ByVal w_nombreBD)
On Error GoTo errCrearBaseDatos
Set BDars = CreateDatabase(w_nombreBD, dbLangGeneral,
dbVersion30)
Mensaje "Creada la Base de datos", 4
Exit Function

errCrearBaseDatos: lc_error = "(" & Err.Number & ") " &
Err.Description
mostrar_critico "Error Creando Base de Datos", lc_error

End Function