Compartir a través de


Objeto AllStoredProcedures (Access)

La colección AllStoredProcedures contiene un objeto AccessObject para cada procedimiento almacenado en el objeto CurrentData o CodeData.

Comentarios

El objeto CurrentData o CodeData tiene una colección AllStoredProcedures compuesta que contiene objetos AccessObject que describen instancias de todos los procedimientos almacenados especificados mediante CurrentData o CodeData. Por ejemplo, puede enumerar la colección AllStoredProcedures en Visual Basic para establecer o devolver los valores de las propiedades de objetos AccessObject determinados de la colección.

Haga referencia a un objeto AccessObject individual de la colección AllStoredProcedures haciendo referencia al objeto por nombre o haciendo referencia a su índice dentro de la colección. Si desea hacer referencia a un objeto específico de la colección AllStoredProcedures, es más conveniente hacer referencia a los procedimientos almacenados por su nombre, dado que el índice de colección de un procedimiento almacenado puede cambiar.

La colección AllStoredProcedures se indiza a partir de cero. Si hace referencia a un procedimiento almacenado mediante el índice, el primer procedimiento almacenado es AllStoredProcedures(0), el segundo procedimiento almacenado es AllStoredProcedures (1) y así sucesivamente.

Nota:

Para enumerar todos los procedimientos almacenados abiertos en la base de datos, use la propiedad IsLoaded de cada objeto AccessObject de la colección AllStoredProcedures . A continuación, puede usar la propiedad Name de cada objeto AccessObject individual para devolver el nombre de un procedimiento almacenado.

Los objetos AccessObject no se pueden agregar ni eliminar de la colección AllStoredProcedures.

Ejemplo:

En el ejemplo siguiente se imprime el nombre de cada objeto AccessObject abierto en la colección AllProcedures.

Sub AllStoredProcedures() 
    Dim obj As AccessObject, dbs As Object 
    Set dbs = Application.CurrentData 
    ' Search for open AccessObject objects in 
    ' AllStoredProcedures collection. 
    For Each obj In dbs.AllStoredProcedures 
        If obj.IsLoaded = True Then 
            ' Print name of obj. 
            Debug.Print obj.Name 
        End If 
    Next obj 
End Sub

Propiedades

Vea también

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.