Yo tengo en un fichero INI la direccion de la base de 
datos (c:\directorio\archivo.mdb). Lo que quisiera saber 
es como en un archivo ini puedo tener varias direcciones 
de varias bases de datos. Ej:

[comercial] 'base de datos comercial
c:\directorio\archivo.mdb

[tecnico]  'base de datos tecnico
d:\directorio\archivo.mdb

Yo en la actualidad lohago de la siguiente manera, lo que 
pasa que en el fichero ini solo tengo la ruta de la base 
de datos.

Option explicit
Private objfile As Scripting.FileSystemObject
Private objtext As Scripting.TextStream

Private Sub Form_Load()
dim donde as string  'declaro una variable

Set Objfile = CreateObject("Scripting.FileSystemObject")

If Not IsEmpty(objtext) then
  Set txtObjtext = objfile.opentextfile (App.Path 
& "\fichero.ini")
  donde = objtext.readline
  objtext.close
end if

pero con esto yo solo leo una linea, por eso pido ayuda 
para saber como puedo leer de un fichero ini mas de una 
linea y leer la linea que yo quiero.


RESPONDE  VIGON
===============

[Adjunta modulo]

Podrķas hacer:

modINI.RutaArchivoINI = App.Path & "\TuAplicacion.ini"
MsgBox modINI.strLeerClaveString("Comercial", "RutaBD")