IInfoPathDataImporter.Import - Méthode
Importe les données dans le formulaire actif.
Espace de noms : Microsoft.Office.Interop.InfoPath
Assembly : Microsoft.Office.Interop.InfoPath (dans Microsoft.Office.Interop.InfoPath.dll)
Syntaxe
'Déclaration
Sub Import ( _
pPrintSettings As IPropertyBag, _
punkViewControls As IEnumUnknown _
)
'Utilisation
Dim instance As IInfoPathDataImporter
Dim pPrintSettings As IPropertyBag
Dim punkViewControls As IEnumUnknown
instance.Import(pPrintSettings, punkViewControls)
void Import(
IPropertyBag pPrintSettings,
IEnumUnknown punkViewControls
)
Paramètres
pPrintSettings
Type : Microsoft.Office.Interop.InfoPath.IPropertyBagCollection de paramètres d'impression.
punkViewControls
Type : IEnumUnknownUne collection mshtml.IEnumUnknown des contrôles dans l'affichage.
Remarques
Les paramètres d'impression suivants sont disponibles par le biais de l'interface IPropertyBag .
Imprime la valeur |
Description |
---|---|
PageSize |
Taille de page en cours, tels que A4, B4, lettre. |
TopMargin |
La marge supérieure de la vue actuelle. |
BottomMargin |
La marge inférieure de la vue actuelle. |
LeftMargin |
La marge de gauche de la vue actuelle. |
RightMargin |
La marge de droite de la vue actuelle. |
MarginUnitsType |
Unités de mesure de la marge. |
Pour plus d'informations sur l'importation par programme des données dans un formulaire InfoPath, voir le Portail des développeurs InfoPath sur le Centre de développement Microsoft Office.
Exemples
Dans l'exemple suivant, la méthode Import de l'interface IInfoPathDataImporter est utilisée pour effectuer une itération dans la collection mshtml.IEnumUnknown des contrôles IInfoPathViewControl dans l'affichage du formulaire actif.
La routine Import est la partie principale d'une solution servant à générer un importateur de données personnalisé. Le projet Visual Studio requiert une référence à la Bibliothèque de Type Microsoft Office InfoPath 2.0 et System.Windows.Forms, avec Imports les instructions pour chaque, ainsi que les instructions mshtml.Implements sont requises pour générer les signatures des méthodes fournies par les interfaces de l'importateur des données personnalisées, y compris IInfoPathDataImporter, IInfoPathDataImporterFields, IInfoPathViewControlet IPropertyBag.
Notes
Pour créer un importateur de données personnalisé à l'aide d'une bibliothèque de classes .NET, cochez la case inscrire pour COM interop sur l'onglet de compilation de l'éditeur de propriétés de classe.
Notes
Pour déboguer un importateur de données personnalisé, définissez une Action de démarrage dans Visual Studio pour Démarrer le programme externe et accédez à INFOPATH. EXE situé dans < lecteur > : \Program Files\Microsoft Office\Office12\. Cette option est disponible sous l'onglet débogage de l'éditeur de propriétés de classe.
Imports Microsoft.Office.Interop.InfoPath
Imports System.Windows.Forms
Imports mshtml
<ComClass(Class1.ClassId, Class1.InterfaceId, Class1.EventsId)> Public Class Class1
Implements Microsoft.Office.Interop.InfoPath.IInfoPathDataImporter
Implements Microsoft.Office.Interop.InfoPath.IInfoPathDataImporterFields
Implements Microsoft.Office.Interop.InfoPath.IInfoPathViewControl
Implements Microsoft.Office.Interop.InfoPath.IPropertyBag
Public Const ClassId As String = _
"1FEB0DF8-E7F1-4b21-A9EE-B06D5FECC572"
Public Const InterfaceId As String = _
"9F9F685C-71A0-46ec-A7F9-A86AF8CBC2A8"
Public Const EventsId As String = _
"ED7C0C49-3F89-40a2-A50E-C59E8F682B08"
Public Sub Import( _
ByVal pPrintSettings As Microsoft.Office.Interop.InfoPath.IPropertyBag, _
ByVal punkViewControls As mshtml.IEnumUnknown) _
Implements Microsoft.Office.Interop.InfoPath.IInfoPathDataImporter.Import
Dim pControl As IInfoPathViewControl
Dim pUnk As Object
Dim pcelt As UInt16 = 1
Dim pceltFetched As UInt16 = 0
Try
'Gets first control in the view
punkViewControls.RemoteNext(pcelt, pUnk, pceltFetched)
Do While pUnk.ToString() <> "Nothing"
pControl = pUnk
MessageBox.Show(pControl.ControlType)
'Gets next control in the view
punkViewControls.RemoteNext(pcelt, pUnk, pceltFetched)
Loop
Catch e As Exception
If e.Message = _
"Object reference not set to an instance of an object." Then
'Signals the end of the enumeration/controls in the view
Else
MessageBox.Show("Error: " & e.ToString & " " & e.Message)
End If
End Try
End Sub
Voir aussi
Référence
IInfoPathDataImporter interface