ABCdatos
ABCdatos tu página de inicio Inicio       

base de datos

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

Moderador: Moderadores

Notapor 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
 

Notapor 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
Avatar de Usuario
Invitado
 

Notapor 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
nachito79
Junior
 
Mensajes: 15
Registrado: Vie Dic 31, 2004 5:15 am


Volver a Programación

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 12 invitados

Creado con phpBB3 © 2000, 2002, 2005, 2007 Grupo phpBB
Copyright © 1999-2014 ABCdatos.com. Todos los derechos reservados.
Aviso legal. Políticas de privacidad y cookies.
Contactar con ABCdatos.