<?xml version="1.0" encoding="UTF-8" ?>
<?xml-stylesheet type="text/xsl" href="https://www.infopathdev.com:443/utility/FeedStylesheets/rss.xsl" media="screen"?><rss version="2.0" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:slash="http://purl.org/rss/1.0/modules/slash/" xmlns:wfw="http://wellformedweb.org/CommentAPI/"><channel><title>Qdabra Active Directory Web Service</title><link>https://www.infopathdev.com:443/forums/57.aspx</link><description>Qdabra Active Directory Web Service enables showing all Microsoft Active Directory user details in InfoPath forms. It is available in Database Accelerator, WSSP and as a standalone tool.</description><dc:language>en</dc:language><generator>CommunityServer 2007 SP3 (Build: 31118.962)</generator><item><title>Re: Extract values from ADservice using VB.net</title><link>https://www.infopathdev.com:443/forums/thread/22939.aspx</link><pubDate>Mon, 10 Sep 2007 05:02:21 GMT</pubDate><guid isPermaLink="false">033a2e2d-04e2-4a9d-be01-a4634161eefd:22939</guid><dc:creator>Patrick Halstead</dc:creator><slash:comments>0</slash:comments><comments>https://www.infopathdev.com:443/forums/thread/22939.aspx</comments><wfw:commentRss>https://www.infopathdev.com:443/forums/commentrss.aspx?SectionID=57&amp;PostID=22939</wfw:commentRss><description>&lt;p&gt;(From my e-mail on 8/15)&lt;/p&gt;
&lt;p class="MsoPlainText" style="MARGIN:0in 0in 0pt;"&gt;&lt;font face="Consolas" size="3"&gt;I don&amp;#39;t think we have any specific posts or articles that have code snippets (the purpose is to be codeless!), but it should be pretty easy to do this. Here&amp;#39;s some random ideas (note: the code won&amp;#39;t compile since you need to fill in values):&lt;/font&gt;&lt;/p&gt;&lt;font face="Consolas" size="3"&gt;&amp;nbsp;&lt;/font&gt; 
&lt;p class="MsoPlainText" style="MARGIN:0in 0in 0pt;"&gt;&lt;font face="Consolas" size="3"&gt;Dim dataObj as DataObject&lt;/font&gt;&lt;/p&gt;
&lt;p class="MsoPlainText" style="MARGIN:0in 0in 0pt;"&gt;&lt;font face="Consolas" size="3"&gt;Dim dataDom As IXMLDOMDocument2&lt;/font&gt;&lt;/p&gt;
&lt;p class="MsoPlainText" style="MARGIN:0in 0in 0pt;"&gt;&lt;font face="Consolas" size="3"&gt;Dim nodeEntry As IXMLDOMNode&lt;/font&gt;&lt;/p&gt;&lt;font face="Consolas" size="3"&gt;&amp;nbsp;&lt;/font&gt; 
&lt;p class="MsoPlainText" style="MARGIN:0in 0in 0pt;"&gt;&lt;font face="Consolas" size="3"&gt;dataObj = thisXDocument.DataObjects(&amp;quot;GetUserInfo&amp;quot;)&lt;/font&gt;&lt;/p&gt;&lt;font face="Consolas" size="3"&gt;&amp;nbsp;&lt;/font&gt; 
&lt;p class="MsoPlainText" style="MARGIN:0in 0in 0pt;"&gt;&lt;font face="Consolas" size="3"&gt;&amp;#39; Cast the DOM to a DOMDocument2 to access setProperty dataDom = dataObj.DOM dataDom.setProperty(&amp;quot;SelectionLanguage&amp;quot;, &amp;quot;XPath&amp;quot;) dataDom.setProperty(&amp;quot;SelectionNamesapces&amp;quot;, _ &amp;quot;&lt;/font&gt;&lt;a href="http://schemas.microsoft.com/office/infopath/2003/Template"&gt;&lt;font face="Consolas" size="3"&gt;http://schemas.microsoft.com/office/infopath/2003/Template&lt;/font&gt;&lt;/a&gt;&lt;font face="Consolas" size="3"&gt;&amp;quot; &amp;amp; _&lt;span style="mso-spacerun:yes;"&gt;&amp;nbsp; &lt;/span&gt;&amp;quot;&amp;quot;&amp;quot; xmlns:tns=&amp;quot;&amp;quot;&lt;/font&gt;&lt;a href="http://qdabra.com/webservices"&gt;&lt;font face="Consolas" size="3"&gt;http://qdabra.com/webservices&lt;/font&gt;&lt;/a&gt;&lt;font face="Consolas" size="3"&gt;&amp;quot;&amp;quot;)&lt;/font&gt;&lt;/p&gt;&lt;font face="Consolas" size="3"&gt;&amp;nbsp;&lt;/font&gt; 
&lt;p class="MsoPlainText" style="MARGIN:0in 0in 0pt;"&gt;&lt;font face="Consolas" size="3"&gt;&amp;#39; select the query parameters of the web service nodeEntry = dataObj.DOM.selectSingleNode( &amp;quot;/myFields/queryFields/tns:GetUserInfo&amp;quot;)&lt;/font&gt;&lt;/p&gt;
&lt;p class="MsoPlainText" style="MARGIN:0in 0in 0pt;"&gt;&lt;font face="Consolas" size="3"&gt;&amp;#39; Assign values to each relevant parameter nodeEntry.selectSingleNode(&amp;quot;tns:username&amp;quot;).text = &amp;quot;&amp;lt;your alias&amp;gt;&amp;quot;&lt;/font&gt;&lt;/p&gt;&lt;font face="Consolas" size="3"&gt;&amp;nbsp;&lt;/font&gt; 
&lt;p class="MsoPlainText" style="MARGIN:0in 0in 0pt;"&gt;&lt;font face="Consolas" size="3"&gt;dataObj.Query()&lt;/font&gt;&lt;/p&gt;&lt;font face="Consolas" size="3"&gt;&amp;nbsp;&lt;/font&gt; 
&lt;p class="MsoPlainText" style="MARGIN:0in 0in 0pt;"&gt;&lt;font face="Consolas" size="3"&gt;nodeResult = dataObj.DOM.selectSingleNode( &amp;quot;/myFields/dataFields/tns:GetUserInfoResponse/GetUserInfoResult/ADProp&amp;quot;)&lt;/font&gt;&lt;/p&gt;
&lt;p class="MsoPlainText" style="MARGIN:0in 0in 0pt;"&gt;&lt;font face="Consolas" size="3"&gt;&amp;#39; do filtering for desired value&lt;/font&gt;&lt;/p&gt;
&lt;p class="MsoPlainText" style="MARGIN:0in 0in 0pt;"&gt;&lt;font face="Consolas" size="3"&gt;&amp;#39; ...&lt;/font&gt;&lt;/p&gt;&lt;font face="Consolas" size="3"&gt;&amp;nbsp;&lt;/font&gt; 
&lt;p class="MsoPlainText" style="MARGIN:0in 0in 0pt;"&gt;&lt;font face="Consolas" size="3"&gt;Hope this gets you going in the right direction!&lt;/font&gt;&lt;/p&gt;</description></item><item><title>Extract values from ADservice using VB.net</title><link>https://www.infopathdev.com:443/forums/thread/22353.aspx</link><pubDate>Thu, 16 Aug 2007 03:17:22 GMT</pubDate><guid isPermaLink="false">033a2e2d-04e2-4a9d-be01-a4634161eefd:22353</guid><dc:creator>donovanhill</dc:creator><slash:comments>0</slash:comments><comments>https://www.infopathdev.com:443/forums/thread/22353.aspx</comments><wfw:commentRss>https://www.infopathdev.com:443/forums/commentrss.aspx?SectionID=57&amp;PostID=22353</wfw:commentRss><description>&lt;p&gt;Using Infopath 2007 and Qdabra ADservice, I would like to extract Active directory values (GetMyInfo) as string variables, using the&amp;nbsp;&amp;#39;&lt;font size="2"&gt;FormEvents_Loading&amp;#39; &lt;/font&gt;&lt;/p&gt;&lt;p&gt;event within VB.net, so I can use those values for further code. Would anyone know how to do this?&lt;/p&gt;&lt;p&gt;&amp;nbsp;&lt;/p&gt;&lt;p&gt;Thanks&lt;/p&gt;</description></item></channel></rss>