<?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>SharePoint Integration</title><link>https://www.infopathdev.com:443/forums/46.aspx</link><description> For questions concerning issues in the integration of SharePoint and Microsoft InfoPath.</description><dc:language>en</dc:language><generator>CommunityServer 2007 SP3 (Build: 31118.962)</generator><item><title>Re: VB Script in form fails when loading to Sharepoint</title><link>https://www.infopathdev.com:443/forums/thread/15847.aspx</link><pubDate>Mon, 07 Nov 2005 16:58:19 GMT</pubDate><guid isPermaLink="false">033a2e2d-04e2-4a9d-be01-a4634161eefd:15847</guid><dc:creator>Oleg Bespalov</dc:creator><slash:comments>0</slash:comments><comments>https://www.infopathdev.com:443/forums/thread/15847.aspx</comments><wfw:commentRss>https://www.infopathdev.com:443/forums/commentrss.aspx?SectionID=46&amp;PostID=15847</wfw:commentRss><description>Figured it out.  sharepoint site needs to be added to list of trusted sites in IE to run Active X script.</description></item><item><title>Re: VB Script in form fails when loading to Sharepoint</title><link>https://www.infopathdev.com:443/forums/thread/15846.aspx</link><pubDate>Sat, 05 Nov 2005 07:32:46 GMT</pubDate><guid isPermaLink="false">033a2e2d-04e2-4a9d-be01-a4634161eefd:15846</guid><dc:creator>Patrick Halstead</dc:creator><slash:comments>0</slash:comments><comments>https://www.infopathdev.com:443/forums/thread/15846.aspx</comments><wfw:commentRss>https://www.infopathdev.com:443/forums/commentrss.aspx?SectionID=46&amp;PostID=15846</wfw:commentRss><description>Hmmm. Outlook is installed right? Security issue?&lt;br /&gt;&lt;br /&gt;Patrick Halstead [InfoPath MVP]&lt;br /&gt;InfoPathDev</description></item><item><title>VB Script in form fails when loading to Sharepoint</title><link>https://www.infopathdev.com:443/forums/thread/15312.aspx</link><pubDate>Fri, 04 Nov 2005 22:53:32 GMT</pubDate><guid isPermaLink="false">033a2e2d-04e2-4a9d-be01-a4634161eefd:15312</guid><dc:creator>Oleg Bespalov</dc:creator><slash:comments>0</slash:comments><comments>https://www.infopathdev.com:443/forums/thread/15312.aspx</comments><wfw:commentRss>https://www.infopathdev.com:443/forums/commentrss.aspx?SectionID=46&amp;PostID=15312</wfw:commentRss><description>I have VB script code (Below) that is inside a button and is supposed to save a calendar appointment on the user's outlook.  The form works fine when on my computer.  But once I publish to sharepoint, and run a new form from there or edit the template, I get this error when pressing the button:&lt;br /&gt;&lt;br /&gt;"ActiveX component can't create object: 'Outlook.Application'&lt;br /&gt;File:script.vbs&lt;br /&gt;Line:32"&lt;br /&gt;&lt;br /&gt;&lt;br /&gt;Here is the code&lt;br /&gt;&lt;br /&gt;Dim objField&lt;br /&gt;&lt;br /&gt;Dim objField2&lt;br /&gt;&lt;br /&gt;Set objField = XDocument.DOM.selectSingleNode("//my:myFields/my:Date_Interview")&lt;br /&gt;&lt;br /&gt;Set objField2 = XDocument.DOM.selectSingleNode("//my:myFields/my:Name")&lt;br /&gt;&lt;br /&gt;        if objField.text &amp;lt;&amp;gt; "" then &lt;br /&gt;&lt;br /&gt;                Const olAppointmentItem = 1&lt;br /&gt;&lt;br /&gt;                Set objOutlook = CreateObject("Outlook.Application")&lt;br /&gt;&lt;br /&gt;                Set objAppointment = objOutlook.CreateItem(olAppointmentItem)&lt;br /&gt;&lt;br /&gt;                dim theDate&lt;br /&gt;&lt;br /&gt;                theDate = objField.text&lt;br /&gt;&lt;br /&gt;                theDate = DateAdd("D", 7, theDate)&lt;br /&gt;&lt;br /&gt;                theDate = theDate &amp; " 9:00 AM"&lt;br /&gt;&lt;br /&gt;                objAppointment.Start = theDate&lt;br /&gt;&lt;br /&gt;                objAppointment.Duration = 60&lt;br /&gt;&lt;br /&gt;                objAppointment.Subject = "Complete Applicant Review"&lt;br /&gt;&lt;br /&gt;                objAppointment.Body = "Make sure all feedback for " &amp; objField2.text &amp; " is complete and create feedback summary."&lt;br /&gt;&lt;br /&gt;                objAppointment.Location = ""&lt;br /&gt;&lt;br /&gt;                objAppointment.ReminderMinutesBeforeStart = 15&lt;br /&gt;&lt;br /&gt;                objAppointment.ReminderSet = True&lt;br /&gt;&lt;br /&gt;                objAppointment.Save&lt;br /&gt;&lt;br /&gt;        End if&lt;br /&gt;&lt;br /&gt;&lt;br /&gt;</description></item></channel></rss>