base de datos

Cuestiones y dudas acerca de lenguajes de programación diversos.

Moderador: Moderadores

Avatar de Usuario
Invitado

Mensaje por Invitado » Sab Mar 09, 2002 12:36 am

como se maneja una base de datos a traves de una intranet?

adriana

Avatar de Usuario
Invitado

Mensaje por Invitado » Sab Mar 09, 2002 12:39 am

Es sencillo, pero un poquito largo de explicar. Resumiendo, te diré que es preciso que crees un objeto , una conexión o un enlace con dicha base. y deberías luego programar dicha conexión.No sé en qué entorno vas trabajar, y qué tipo de base de datos quieres manejar, asi que no puedo ser más específica.Si lo quieres es acceder desde una red cerrada a una misma base, podría ser suficiente que "compartieras dicha base" y activaras las opciones de red oportunas, pero ya te digo que necesitaría más datos para ser más precisa.

wanda

nachito79
Junior
Mensajes: 15
Registrado: Vie Dic 31, 2004 5:15 am

Mensaje por nachito79 » Mié Ene 12, 2005 4:36 am

si lo haces con visual basic no necesitas tanta tarea, para ello debes usar unas funciones de visiual que escribian en el registro la ruta de la aplicacion y de la base, luego cada vez que inicies el programa lea los valores del registro y busque la base. En sintesis, cuando abras el programa configura el camino de la base de datos (ya sea en una maquina local u otra) y luego guarda dichos valores en el registro

ejemplo

Public Function ConfirmarCaminosDeTrabajo(ByRef CaminoBaseDeDatos As String ) As Boolean
'prueba si esta escrito en el registro el camino de la base de datos. 'si da un error, la primera vez, entonces se setea en el registro el camino

Dim FlgConfirmarCaminoBaseDeDatos As Boolean

FlgConfirmarCaminoBaseDeDatos = False

CaminoBaseDeDatos = getSetting"ProyectoDLS", "Camino", "BaseDeDatos")


If Dir(CaminoBaseDeDatos + NombreBaseDatos) <> "" Then


Set DB = dao.OpenDatabase(CaminoBaseDeDatos & NombreBaseDatos)

FlgConfirmarCaminoBaseDeDatos = True

End If

If FlgConfirmarCaminoBaseDeDatos Then

ConfirmarCaminosDeTrabajo = True

Else

ConfirmarCaminosDeTrabajo = False

End If
End Function

y con esta funcion puedes guardar la ruta de la base en el registro

Public Sub SetearCaminosBaseDeDatos(CaminoBaseDeDatos As String)

'guarda donde esta la base de datos en el registro
SaveSetting "ProyectoDLS", "Camino", "BaseDeDatos", CaminoBaseDeDatos

Set DB = dao.OpenDatabase(CaminoBaseDeDatos & NombreBaseDatos, , , "brother/brother")

End Sub

Responder