[VBScript] ¿Como conectar a una BD?

[noblejis]

Buenas,

necesito que alguien me explique como se hace en VBscript para crear una conexión a una Base de Datos.

He buscado por internet y hay poco información y la que encuentro no me vale.

Espero que me ayden.
Un saludo.

[anibal317]

Estimado amigo, aqui te paso un codigo de conexion de base de datos.

Este lo tengo unclucuido en una funcion publica para llamarla las veces q la necesite

Esta son las delacariones de las variables
Global ConectarBasePlanos As Database
Global AbrirTablaPlanos As Recordset

y esta es la conexion
Set ConectarBasePlanos = OpenDatabase(App.Path & "\Base\PlanosNuevos97.mdb") 'Abro Base de datos
Set AbrirTablaPlanos = ConectarBasePlanos.OpenRecordset("PLANOS", dbOpenTable) 'Abro Tabla

espero q te sea de utilidad

abrazo

[posman]

http://www.activexperts.com/activmon...ise/databases/

[mr_disaster]

Yo uso la siguiente funcion...

Código:

Dim Conexion As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\tubasededatos.mdb;")

Luego cuando nececites abrir la conexion a la base de datos colocas...

Código:

Conexion.Open()

y para cerrar...

Código:

Conexion.Close()