Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

gelöst InfoPath Formular und Outlook Kontakte

Mitglied: Sabse96

Sabse96 (Level 1) - Jetzt verbinden

13.06.2013 um 11:43 Uhr, 3720 Aufrufe, 22 Kommentare

Hallo Zusammen,

ich habe folgende Frage.

Ich bin gerade dabei ein InfoPath Formular zu erstellen. Es funktionieren so weit auch alle Funktionen etc. nur bei einer Sache hab ich ein paar Probleme.

Das Formular soll in einem Netzlaufwerk von uns veröffentlicht werden, ist auch schon geschehen. Bearbeitet/Gesendet soll es über Outlook werden, außerdem sollen wenn man im Formular auf Senden klickt, ein Auswahlfenster erscheinen, in dem alle angelegten Outlook Kontakte hinterlegt sind.
Weiß vlt. jemand wie ich das in InfoPath einstellen kann?

Danke schon mal.

Mitglied: colinardo
13.06.2013, aktualisiert 14.06.2013
Hallo Sabse96,
ich weiß nicht ob du dich mit VBA auskennst oder damit schon mal Kontakt hattest, aber die Vorgehensweise sieht folgendermaßen aus:

  1. Man erstelle im Formular eine Datenverbindung des Typs E-Mail und gebe Ihr den Namen sendmail (Tab Daten >Datenverbindungen)
  2. Man erstelle eine Schaltfläche im Formular und weise Ihr folgenden benutzerdefinierten Code zu :
(Hinweis: Im Code-Editor muss man noch einen Verweis auf die .NET Bibliothek Microsoft.Office.Interop.Outlook hinzufügen[Projekt->Verweis hinzufügen], und im Codefenster ganz oben noch folgende Zeile hinzufügen Imports Microsoft.Office.Interop)
01.
If Me.Errors.Count = 0 Then 
02.
    Dim objOL As New Outlook.Application 
03.
    Dim oDialog As Outlook.SelectNamesDialog = objOL.Session.GetSelectNamesDialog 
04.
    Dim targetTo As String = "" 
05.
    Try 
06.
        With oDialog 
07.
            .AllowMultipleSelection = True 
08.
            If .Display() = True Then 
09.
                For Each rec As Outlook.Recipient In oDialog.Recipients 
10.
                    targetTo &= rec.Address & ";" 
11.
                Next 
12.
                Dim conn As EmailSubmitConnection = DataConnections("sendmail") 
13.
                conn.To.SetStringValue(targetTo) 
14.
                conn.Subject.SetStringValue("Testsubject") 
15.
                conn.Introduction = "Testbody" 
16.
                conn.Execute() 
17.
            End If 
18.
        End With 
19.
    Catch ex As Exception 
20.
        MessageBox.Show(ex.Message) 
21.
    End Try 
22.
Else 
23.
    MessageBox.Show("Es sind nicht alle erforderlichen Eingabefelder ausgefüllt", "Fehler", MessageBoxButtons.OK, MessageBoxIcon.Exclamation) 
24.
End If
Jetzt muss man in den Sicherheitseinstellungen des Formulars noch folgendes machen:
Datei > Erweiterte Formularoptionen > Sicherheits und Vertrauensstellung > "Sicherheitsstufe : Voll vertrauenswürdig"
und unten das Häkchen Diese Formularvorlage signieren setzen und entweder ein schon vorhandenes Zertifikat wählen oder ein neues erstellen.

Was jetzt passiert wenn du auf den benutzerdefinierten Button klickst ist folgendes:
Nach dem Klick auf den Button wird der Outlook-Eigene Dialog zum wählen der Kontakte aufgerufen in denen du den Empfänger wählen kannst.

Hoffe das war einigermaßen klar. Wenn nicht, kann ich dir das in einem fertigen Demo-Formular zuschicken wenn du willst...

Grüße Uwe
Bitte warten ..
Mitglied: Sabse96
14.06.2013 um 08:20 Uhr
Hi Uwe,

danke schon mal für deine Antwort. Ich habe das jetzt so ausprobiert aber es funktioniert nicht. Wenn ich auf den Button im Formular dann klicke, passiert gar nichts.

Wäre echt cool von dir, wenn du mir mal so ein Demo-Formular zuschicken könntest.
Bitte warten ..
Mitglied: colinardo
14.06.2013, aktualisiert um 08:36 Uhr
Welche Outlook Version benutzt du ? Das muss ich für die Vorlage wissen, da es unterschiedliche Office.Interop Bibliotheken für die jeweilige Office Version gibt ..

p.s. Sorry oben war die Bibliothek falsch angegeben, es muss natürlich Microsoft.Office.Interop.Outlook heißen....
Bitte warten ..
Mitglied: Sabse96
14.06.2013 um 08:43 Uhr
ich benutze Outlook 2010
Bitte warten ..
Mitglied: colinardo
14.06.2013 um 09:14 Uhr
Download hier. Du musst wahrscheinlich noch das Zertifikat ändern wie oben beschrieben, damit InfoPath dem Code vertraut. Noch zur Info: Es kann sein das der Dialog zum wählen der Kontakte unter Umständen nicht als oberstes Fenster angezeigt wird, das liegt daran das der Dialog im Kontext von Outlook läuft und nicht von InfoPath ...
Bitte warten ..
Mitglied: Sabse96
14.06.2013 um 09:37 Uhr
So also ich hab es jetzt runtergeladen, ich kann das Formular allerdings überhaupt nicht Bearbeiten.
Bitte warten ..
Mitglied: colinardo
14.06.2013 um 09:39 Uhr
mal im Explorer Rechtsklick auf das Formular gemacht und Entwerfen gewählt ?
Bitte warten ..
Mitglied: Sabse96
14.06.2013 um 09:41 Uhr
Die Funktion hab ich gar ned zu Auswahl
Bitte warten ..
Mitglied: Sabse96
14.06.2013 um 09:42 Uhr
Okay, passt schon habs schon ^^
Bitte warten ..
Mitglied: Sabse96
14.06.2013 um 09:45 Uhr
jetzt bekomme ich aber folgende Fehlermeldung:

InfoPath kann den Ereignishandler nicht hinzufügen.

Das Visual Basic- oder C#-Projekt für diese Formularvorlage kann nicht gefunden werden.
d:\Eigene Dateien\nfoPath-Projekte\Formular 11\Formular 1.vbproj
Bitte warten ..
Mitglied: colinardo
14.06.2013 um 09:49 Uhr
Das ist das Problem mit der Weitergabe von solchen Projekten, deshalb habe ich oben die Anleitung geschrieben, weil es bei der Weitergabe Probleme gibt....
Bitte warten ..
Mitglied: Sabse96
14.06.2013 um 09:52 Uhr
Kannst du mir vlt. einen Screenshot von dem Code-Editor schicken von dem Formular?
Bitte warten ..
Mitglied: colinardo
14.06.2013 um 10:00 Uhr
00ee98eb625c67178f453a2e924f18f0 - Klicke auf das Bild, um es zu vergrößern

Verweis auf Outlook Bibliothek nicht vergessen:

a48b65bb8f3c3a112cdb12055d8f1364 - Klicke auf das Bild, um es zu vergrößern
Bitte warten ..
Mitglied: colinardo
14.06.2013 um 10:06 Uhr
Was du noch beachten musst wenn das Formular von mehreren Leuten benutzt wird ist der Pfad in dem der benutzerdefinierte Code gespeichert wird:
(Erweiterte Optionen des Formulars)
ba9290a4e2930b6ea77133b2d4e0ef30 - Klicke auf das Bild, um es zu vergrößern
Bitte warten ..
Mitglied: Sabse96
14.06.2013 um 10:13 Uhr
Super Vielen Dank.

Jetzt noch eine blöde Frage, ich bin jetzt grad bei dem Verweis und bei mir wird das Microsoft.Office.Interop.Outlook gar nicht aufgeführt?
Bitte warten ..
Mitglied: colinardo
14.06.2013, aktualisiert um 10:31 Uhr
OK dann hast du die Primary Interop Assemblies nicht installiert, macht nix dann nimmst du halt die Outlook-COM Bibliothek die sollte auf jeden Fall installiert sein:

8cd1968d23538486ad16ac1ef56ec2bc - Klicke auf das Bild, um es zu vergrößern
Bitte warten ..
Mitglied: Sabse96
14.06.2013 um 12:10 Uhr
funktioniert immer noch ned...

ich bin mir aber auch nicht mal sicher, ob er das auch wirklich ausführt..
Bitte warten ..
Mitglied: Sabse96
14.06.2013 um 12:41 Uhr
Das is es jetzt momentan:

Imports Microsoft.Office.InfoPath
Imports System
Imports System.Windows.Forms
Imports System.Xml
Imports System.Xml.XPath
Imports Microsoft.Office.Interop
Imports mshtml




Namespace FRG_Formular_TEST
Public Class FormCode
' Membervariablen werden in browserfähigen Formularen nicht unterstützt.
' Schreiben und lesen Sie diese Werte stattdessen aus dem FormState-
' Wörterbuch, indem Sie Code wie folgt verwenden:
'
' Private Property _memberVariable() As Object
' Get
' _memberVariable = FormState("_memberVariable")
' End Get
' Set
' FormState("_memberVariable") = value
' End Set
' End Property

' HINWEIS: Das folgende Verfahren ist für Microsoft InfoPath erforderlich.
' Es kann mithilfe von Microsoft InfoPath geändert werden.
Private Sub InternalStartup(ByVal sender As Object, ByVal e As EventArgs) Handles Me.Startup
AddHandler DirectCast(EventManager.ControlEvents("Schaltfläche"), ButtonEvent).Clicked, AddressOf Absenden_Clicked
AddHandler DirectCast(EventManager.ControlEvents("CTRL63_5"), ButtonEvent).Clicked, AddressOf CTRL63_5_Clicked
End Sub

Public Sub Absenden_Clicked(ByVal sender As Object, ByVal e As ClickedEventArgs)
Dim objOL As New Outlook.Application
Dim oDialog As Outlook.SelectNamesDialog = objOL.Session.GetSelectNamesDialog
Dim targetTo As String = ""
With oDialog.AllowMultipleSelection = True
If oDialog.Display() = True Then
For Each rec As Outlook.Recipient In oDialog.Recipients
targetTo &= rec.Adress & ";"
Next
Dim conn As EmailSubmitConnection = DataConnections("FRG-Formular_TEST")
conn.To.SetStringValue(targetTo)
conn.To.SetStringValue("Testsubject")
conn.Introduction = "Testbody"
conn.Execute()
End If
End With
'Dim root As XPathNavigator = MainDataSource.CreateNavigator()
End Sub

Public Sub CTRL63_5_Clicked(ByVal sender As Object, ByVal e As ClickedEventArgs)
' Fügen Sie hier Code ein.
End Sub
End Class
End Namespace
Bitte warten ..
Mitglied: colinardo
14.06.2013, aktualisiert um 12:57 Uhr
irgendwas machst du noch falsch...
hast du das Formular wirklich als voll vertrauenswürdig gesetzt und signiert wie im ersten Post geschrieben ?
Datei > Erweiterte Formularoptionen > Sicherheits und Vertrauensstellung > "Sicherheitsstufe : Voll vertrauenswürdig" und unten das Häkchen Diese Formularvorlage signieren setzen und entweder ein schon vorhandenes Zertifikat wählen oder ein neues erstellen.
minimiere mal andere Fenster um zu sehen ob der Outlook-Dialog nicht unter einem anderen Fenster steckt oder öffne Outlook mal nach dem Klick auf den Button.

ansonsten mach mal ein TeamViewer-Meeting auf ...
Bitte warten ..
Mitglied: Sabse96
14.06.2013 um 12:56 Uhr
Ja ist alles so eingestellt.

Das Fenster taucht auch dann nicht auf.
Bitte warten ..
Mitglied: colinardo
14.06.2013 um 12:58 Uhr
TeamViewer ... wenn du willst, sonst nimmt das hier kein Ende
Bitte warten ..
Mitglied: Sabse96
14.06.2013 um 13:20 Uhr
wenn du Zeit hast
Bitte warten ..
Ähnliche Inhalte
VB for Applications

Kontaktdaten aus Outlook im InfoPath Formularen verwenden

Frage von ronibooniVB for Applications

Hallo Alle zusammen, Infopath 2013 nutze ich für die Erstellung und Nutzung von Protokollen. Um das Ausfüllen der Formulare ...

Microsoft Office

Formular Autofill - Infopath

Frage von TlBERlUSMicrosoft Office1 Kommentar

N´abend Kollegen, einer meiner Kunden verwendet Infopath, um aus einer Datenquelle heraus ein Formular in Word zu erzeugen. Infopath ...

Microsoft Office

Daten aus Outlook für InfoPath Formulare abrufen und eintragen

Frage von ronibooniMicrosoft Office11 Kommentare

Hallo Alle zusammen, Infopath 2013 nutze ich für die Erstellung und Nutzung von Protokollen. Um das Ausfüllen der Formulare ...

Microsoft Office

InfoPath 2013: Versenden eines Formulares als PDF per Email

Frage von Focus198Microsoft Office

Hallo Zusammen, ich habe ein InfoPath Formular gebaut und versende es mittels Schaltpläche per Email. Soweit so gut. Jetzt ...

Neue Wissensbeiträge
Windows 10

USB Maus und Tastatur versagen Dienst unter Windows 10

Erfahrungsbericht von hardykopff vor 2 TagenWindows 105 Kommentare

Da steht man ziemlich dumm da, wenn der PC sich wegen fehlender USB Tastatur und Maus nicht bedienen lässt. ...

Administrator.de Feedback
Update der Seite: Alles zentriert
Information von Frank vor 2 TagenAdministrator.de Feedback18 Kommentare

Hallo User, die größte Änderung von Release 5.8 ist das Zentrieren der Webseite (auf großen Bildschirmen) und ein "Welcome"-Teaser ...

Humor (lol)

WhatsApp-Nachrichten endlich auch per Bluetooth versendbar

Information von BassFishFox vor 2 TagenHumor (lol)4 Kommentare

Genau darauf habe ich gewartet! ;-) Der beliebte Messaging-Dienst WhatsApp erhält eine praktische neue Funktion: Ab dem nächsten Update ...

Google Android

Googles "Android Enterprise Recommended" für Unternehmen

Information von kgborn vor 3 TagenGoogle Android3 Kommentare

Hier eine Information, die für Administratoren und Verantwortliche in Unternehmen, die für die Beschaffung und das Rollout von Android-Geräten ...

Heiß diskutierte Inhalte
Router & Routing
Router auf Orginal Firmware zurück flashen mit Tftpd
Frage von ILeonardRouter & Routing19 Kommentare

Hallo, Ich habe zwei Router, einmal TP-Link 841n v11 und TP-Link 940N v5. Ich wollte fragen, ob jemand mir ...

Router & Routing
WRT keine Verbindung zum Web Interface
gelöst Frage von ILeonardRouter & Routing18 Kommentare

Hallo, Ich habe einen TP-Link WR841n mit wrt geflasht, das Problem ist ich kann mich mit 192.168.1.1 nicht verbinden. ...

Windows Server
Standortvernetzung zu einem Strato VServer (Windows)
Frage von matzefratze81Windows Server10 Kommentare

Moin, ich komme aus einem Enterprise-Umfeld und habe den Fehler gemacht, dass ich mich auf ein kleines Unternehmen eingelassen ...

Grafikkarten & Monitore
4k EIZO Monitor, Fernseher und Splitter
Frage von LerxxeyGrafikkarten & Monitore9 Kommentare

Hallo Zusammen, vielleicht könnt ihr mir bei einem Problem helfen wo ich einfach nicht mehr weiterkomme Und zwar haben ...