<?xml version="1.0" encoding="UTF-8"?>
<rss version="2.0"
	xmlns:content="http://purl.org/rss/1.0/modules/content/"
	xmlns:wfw="http://wellformedweb.org/CommentAPI/"
	xmlns:dc="http://purl.org/dc/elements/1.1/"
	xmlns:atom="http://www.w3.org/2005/Atom"
	xmlns:sy="http://purl.org/rss/1.0/modules/syndication/"
	xmlns:slash="http://purl.org/rss/1.0/modules/slash/"
	>

<channel>
	<title>Brad Marsh's Weblog &#187; Software</title>
	<atom:link href="http://bradmarsh.net/index.php/category/software/feed/" rel="self" type="application/rss+xml" />
	<link>http://bradmarsh.net</link>
	<description>Bloggin about Microsoft, SQL Server, Windows Server 2008, Windows Mobile, new techie bits and pieces</description>
	<lastBuildDate>Thu, 10 Nov 2011 22:01:44 +0000</lastBuildDate>
	<generator>http://wordpress.org/?v=2.9.2</generator>
	<language>en</language>
	<sy:updatePeriod>hourly</sy:updatePeriod>
	<sy:updateFrequency>1</sy:updateFrequency>
			<item>
		<title>Windows Live Mail Backup</title>
		<link>http://bradmarsh.net/index.php/2009/12/17/windows-live-mail-backup/</link>
		<comments>http://bradmarsh.net/index.php/2009/12/17/windows-live-mail-backup/#comments</comments>
		<pubDate>Wed, 16 Dec 2009 21:51:32 +0000</pubDate>
		<dc:creator>Brad Marsh</dc:creator>
				<category><![CDATA[Microsoft]]></category>
		<category><![CDATA[Software]]></category>

		<guid isPermaLink="false">http://bradmarsh.net/index.php/2009/12/17/windows-live-mail-backup/</guid>
		<description><![CDATA[With the release of windows 7, they have no longer included a default windows mail client for the first time, in as long as I can recall.
So if you got use to outlook express or windows mail in VISTA, then you might want to get your hands on Windows Live Mail, very similar to windows [...]]]></description>
			<content:encoded><![CDATA[<p>With the release of windows 7, they have no longer included a default windows mail client for the first time, in as long as I can recall.</p>
<p>So if you got use to outlook express or windows mail in VISTA, then you might want to get your hands on Windows Live Mail, very similar to windows mail in terms of interface, but for multiple accounts, I find it actually surprisingly much easier to manager all my email accounts. </p>
<p>Though backing up data might be a little tricker, here is a quick easy guide to follow</p>
<p><a title="http://liveunplugged.spaces.live.com/blog/cns!F92775FC46A390CA!174.entry" href="http://liveunplugged.spaces.live.com/blog/cns!F92775FC46A390CA!174.entry" onclick="javascript:pageTracker._trackPageview('/outbound/article/http://liveunplugged.spaces.live.com/blog/cns!F92775FC46A390CA!174.entry');">http://liveunplugged.spaces.live.com/blog/cns!F92775FC46A390CA!174.entry</a></p>
]]></content:encoded>
			<wfw:commentRss>http://bradmarsh.net/index.php/2009/12/17/windows-live-mail-backup/feed/</wfw:commentRss>
		<slash:comments>2</slash:comments>
		</item>
		<item>
		<title>DotNetNuke REAL replacement menus</title>
		<link>http://bradmarsh.net/index.php/2009/11/25/dotnetnuke-real-replacement-menus/</link>
		<comments>http://bradmarsh.net/index.php/2009/11/25/dotnetnuke-real-replacement-menus/#comments</comments>
		<pubDate>Tue, 24 Nov 2009 21:11:45 +0000</pubDate>
		<dc:creator>Brad Marsh</dc:creator>
				<category><![CDATA[DotNetNuke]]></category>
		<category><![CDATA[Software]]></category>

		<guid isPermaLink="false">http://bradmarsh.net/index.php/2009/11/25/dotnetnuke-real-replacement-menus/</guid>
		<description><![CDATA[Finally some one has cracked it, they have made an easy to use and style menu replacement. Your probably about to say but there are hundreds or Menu replacements for DotNetNuke (DNN) and yes there are, alot of which I have used, though none of them used DNN the existing styling. 
The one I am [...]]]></description>
			<content:encoded><![CDATA[<p>Finally some one has cracked it, they have made an easy to use and style menu replacement. Your probably about to say but there are hundreds or Menu replacements for DotNetNuke (DNN) and yes there are, alot of which I have used, though none of them used DNN the existing styling. </p>
<p>The one I am most excited about was the drop in replacement for the Solpart menu, lets face it this was always the most style able and configurable menu that ever came out with std DNN, and SEO has always been a pain in the rear end with this menu. </p>
<p>So for people like me that have a stack of DNN sites that used the solpart menu simply for style purposes over SEO (which lets face it the avg person / client that knows nothing about what SEO is, wants looks over functionality).</p>
<p> I like the best of both world’s DDN Done Right (Mark Allan) has produced an awesome extension for DNN with a simple install and a simple change to the skin tag and hey presto your solpart menu retains its funky look as it did before and&#160;&#160; you have some better overall SEO structured menus, True hyperlinks, and a better overall user experience.</p>
<p>No only Has Mark enhanced the solpart, he also added functionality to better DNN new default nav provider, and the ability to add some really cool menu over effects, using&#160; JQuery</p>
<p><a href="http://www.dnndoneright.com/Standard-DNN-menu-upgraded.T94.aspx" onclick="javascript:pageTracker._trackPageview('/outbound/article/http://www.dnndoneright.com/Standard-DNN-menu-upgraded.T94.aspx');">http://www.dnndoneright.com/Standard-DNN-menu-upgraded.T94.aspx</a>(See bottom menu)</p>
<p>and further to that Mark has created Mega menus also, and look to be creating additional templates, I know I for one will be watching very closely to DDR’s site for further updates!</p>
<p>for more info keep an eye on <a href="http://www.dnndoneright.com/Free-DotNetNuke-menu-module-DDRMenu-v1-0-released.T129.aspx?EntryId=6" onclick="javascript:pageTracker._trackPageview('/outbound/article/http://www.dnndoneright.com/Free-DotNetNuke-menu-module-DDRMenu-v1-0-released.T129.aspx?EntryId=6');">Marks Blog</a></p>
<p>Download DDR’s Free <a href="http://www.dnndoneright.com/Download.T87.aspx" onclick="javascript:pageTracker._trackPageview('/outbound/article/http://www.dnndoneright.com/Download.T87.aspx');">menus here</a></p>
<p>Thanks for the FREE menus Mark</p>
]]></content:encoded>
			<wfw:commentRss>http://bradmarsh.net/index.php/2009/11/25/dotnetnuke-real-replacement-menus/feed/</wfw:commentRss>
		<slash:comments>0</slash:comments>
		</item>
		<item>
		<title>Word, Excel 07 getting sharing violations on save</title>
		<link>http://bradmarsh.net/index.php/2009/11/13/word-excel-07-getting-sharing-violations-on-save/</link>
		<comments>http://bradmarsh.net/index.php/2009/11/13/word-excel-07-getting-sharing-violations-on-save/#comments</comments>
		<pubDate>Fri, 13 Nov 2009 03:03:25 +0000</pubDate>
		<dc:creator>Brad Marsh</dc:creator>
				<category><![CDATA[Software]]></category>
		<category><![CDATA[Techie]]></category>
		<category><![CDATA[Vista]]></category>
		<category><![CDATA[Windows 7]]></category>

		<guid isPermaLink="false">http://bradmarsh.net/index.php/2009/11/13/word-excel-07-getting-sharing-violations-on-save/</guid>
		<description><![CDATA[So we were getting various sharing volitions when trying to save some changes to an existing document, both on windows VISTA and windows 7, this started to become an annoyance, but let it go because it was only now and then. I found out it wasn’t isolated to me, turns out many others have been [...]]]></description>
			<content:encoded><![CDATA[<p>So we were getting various sharing volitions when trying to save some changes to an existing document, both on windows VISTA and windows 7, this started to become an annoyance, but let it go because it was only now and then. I found out it wasn’t isolated to me, turns out many others have been affected by this annoyance also.</p>
<p>So you might get error messages like &quot;Your changes could not be saved to &#8216;Filename.xlsx&#8217; but were save to a temporary document &#8216;CERSS322&#8242; <em>(this is a random string)</em>. Close the existing document, then open the temporary document and save it under a new name.&quot; </p>
<p>If you try and save it again you might also get &quot;Your changes could not be saved to &#8216;Filename.xlsx&#8217; because of a sharing violation. Try saving to a different file.&quot;</p>
<p>once again if you were to save it it might actually save correctly. </p>
<p>There was lots of talk about an Anti-Virus might actually open this file scanning it when you have it open hence the reason for the sharing violation, and this could be well possible, but its more likely to be the Windows&#160; Desktop Indexing service., you could disable this though that might be a drastic measure. you can right click on the file and turn the indexing on that file off.</p>
<p>So to do this right click on the file giving you problems go to ‘Properties’&#160; &gt; click on the ‘Advanced’ button &gt; removed the tick from ‘ Allow this file to have contents indexed in addition to file properties’</p>
<p>See images below for more info.</p>
<p><a href="http://bradmarsh.net/wp-content/uploads/2009/11/image.png" ><img style="border-bottom: 0px; border-left: 0px; display: inline; border-top: 0px; border-right: 0px" title="image" border="0" alt="image" src="http://bradmarsh.net/wp-content/uploads/2009/11/image-thumb.png" width="279" height="379" /></a></p>
<p><a href="http://bradmarsh.net/wp-content/uploads/2009/11/image1.png" ><img style="border-bottom: 0px; border-left: 0px; display: inline; border-top: 0px; border-right: 0px" title="image" border="0" alt="image" src="http://bradmarsh.net/wp-content/uploads/2009/11/image-thumb1.png" width="244" height="187" /></a></p>
]]></content:encoded>
			<wfw:commentRss>http://bradmarsh.net/index.php/2009/11/13/word-excel-07-getting-sharing-violations-on-save/feed/</wfw:commentRss>
		<slash:comments>0</slash:comments>
		</item>
		<item>
		<title>OLE registration error occurred outlook 2003</title>
		<link>http://bradmarsh.net/index.php/2009/10/09/ole-registration-error-occurred-outlook-2003/</link>
		<comments>http://bradmarsh.net/index.php/2009/10/09/ole-registration-error-occurred-outlook-2003/#comments</comments>
		<pubDate>Thu, 08 Oct 2009 22:45:15 +0000</pubDate>
		<dc:creator>Brad Marsh</dc:creator>
				<category><![CDATA[Microsoft]]></category>
		<category><![CDATA[Software]]></category>

		<guid isPermaLink="false">http://bradmarsh.net/index.php/2009/10/09/ole-registration-error-occurred-outlook-2003/</guid>
		<description><![CDATA[So on your outlook 2003 your getting an ole registration error occurred. Well don’t stress, its an easy fix.
Close outlook 2003
Open start &#62; Run &#62; type:
regsvr32 %windir%\system32\ole32.dll 
No open Outlook and try again…
Still not working? 
then give this ago
Open Outlook again

click on the Send/Receive pull / Drop-down menu ( this is the same button which [...]]]></description>
			<content:encoded><![CDATA[<p>So on your outlook 2003 your getting an ole registration error occurred. Well don’t stress, its an easy fix.</p>
<p>Close outlook 2003</p>
<p>Open start &gt; Run &gt; type:</p>
<p>regsvr32 %windir%\system32\ole32.dll </p>
<p>No open Outlook and try again…</p>
<p>Still not working? </p>
<p>then give this ago</p>
<p>Open Outlook again</p>
<ul>
<li>click on the Send/Receive pull / Drop-down menu ( this is the same button which gives the error message, the pull down is located on the right side, its an arrow)</li>
<li>Choose Send/Receive Settings</li>
<li>Uncheck “Make This Folder Available Offline”</li>
<li>Now re-check “Make This Folder Available Offline” again</li>
</ul>
<p>&#160;</p>
<p>Done!   </p>
]]></content:encoded>
			<wfw:commentRss>http://bradmarsh.net/index.php/2009/10/09/ole-registration-error-occurred-outlook-2003/feed/</wfw:commentRss>
		<slash:comments>0</slash:comments>
		</item>
		<item>
		<title>Exchange 2007: Purge mailboxes</title>
		<link>http://bradmarsh.net/index.php/2009/07/08/exchange-2007-purge-mailboxes/</link>
		<comments>http://bradmarsh.net/index.php/2009/07/08/exchange-2007-purge-mailboxes/#comments</comments>
		<pubDate>Tue, 07 Jul 2009 22:44:49 +0000</pubDate>
		<dc:creator>Brad Marsh</dc:creator>
				<category><![CDATA[Exchange 2007]]></category>
		<category><![CDATA[Microsoft]]></category>
		<category><![CDATA[Software]]></category>

		<guid isPermaLink="false">http://bradmarsh.net/index.php/2009/07/08/exchange-2007-purge-mailboxes/</guid>
		<description><![CDATA[With 2003 Exchange purging users was super simple through the GUI, you simply ran your clean up agent after deleting the mailbox and then you saw the disconnected mailbox then right click and purge, it was effortless. 2007 is certainly not effortless but its not all that hard either, you just have to start using [...]]]></description>
			<content:encoded><![CDATA[<p>With 2003 Exchange purging users was super simple through the GUI, you simply ran your clean up agent after deleting the mailbox and then you saw the disconnected mailbox then right click and purge, it was effortless. 2007 is certainly not effortless but its not all that hard either, you just have to start using more PowerShell, which is not such a bad thing, so here is how:</p>
<p><strong>Step 1</strong></p>
<p>First thing is first, Find the mailbox you wish to delete within the console, once you have located the account right click and choose remove, be warned this will also remove the AD account associated with the mailbox if you only want to remove the mailbox then choose disable.</p>
<p>Ok so you have now disconnected the mailbox you can no longer see this in the mailbox list, and there is a good chance you cant see it in the disconnected Mailbox just yet either. </p>
<p><strong>Step 2</strong></p>
<p>Open PowerShell and run this</p>
<p><font color="#0080c0">get-mailboxdatabase</font></p>
<p>This command will show you your database name, copy the database name and then issue the below command, replacing the <em>MailboxDatabaseHere</em> with your database name</p>
<p><strong>Step 3</strong></p>
<p><font color="#0080c0">Clean-Mailboxdatabase &quot;MailboxDatabaseHere&quot;</font></p>
<p>This clean-Mailbox database is the same as the clean up agent that was found in 2003’s GUI, once you have successfully ran this command go back to the GUI and see if you can see the mailbox you removed in the ‘Disconnected Mailbox’, once you can see it you will be able to delete the mailbox if not see step 5. </p>
<p><strong>Step 4</strong></p>
<p>If you are unlucky and you cant yet see it then hit refresh in the right pane…. Still cant see it ok, open PowerShell once again and run the below command:</p>
<p><font color="#0080c0">Get-MailboxStatistics | Sort-Object DisplayName -Descending | ft DisplayName,@{label=&quot;TotalItemSize(KB)&quot;;expression={$_.TotalItemSize.V alue.ToKB()}},ItemCount</font></p>
<p>This will return a list of all mailboxes in alphabetic order</p>
<p><a href="http://bradmarsh.net/wp-content/uploads/2009/07/image.png" ><img title="image" style="border-right: 0px; border-top: 0px; display: inline; border-left: 0px; border-bottom: 0px" height="123" alt="image" src="http://bradmarsh.net/wp-content/uploads/2009/07/image-thumb.png" width="450" border="0" /></a> </p>
<p>With this list locate the mailbox you have just removed, and take note of the <em>‘DisplayName’</em></p>
<p><em><strong>Step 5</strong></em></p>
<p>Now that we can see the mailbox here we need can then purge the mailbox do this by running the below command be sure to change <em>‘MailboxDatabaseHere’</em> to your Exchange database and also change the <em>‘DisplayName’ </em>to your account name, found using the above script. </p>
<p><font color="#0080c0">Remove-Mailbox -Database &quot;MailboxDatabaseHere&quot; –StoreMailboxIdentity DisplayName -confirm:$true</font></p>
<p>That’s it your mailbox is no longer you have successfully purged it, not so hard after all.</p>
]]></content:encoded>
			<wfw:commentRss>http://bradmarsh.net/index.php/2009/07/08/exchange-2007-purge-mailboxes/feed/</wfw:commentRss>
		<slash:comments>2</slash:comments>
		</item>
		<item>
		<title>Windows 7 &#8211; Shortcuts, hints and thoughts</title>
		<link>http://bradmarsh.net/index.php/2009/07/05/windows-7-shortcuts-hints-and-thoughts/</link>
		<comments>http://bradmarsh.net/index.php/2009/07/05/windows-7-shortcuts-hints-and-thoughts/#comments</comments>
		<pubDate>Sun, 05 Jul 2009 09:39:44 +0000</pubDate>
		<dc:creator>Brad Marsh</dc:creator>
				<category><![CDATA[Microsoft]]></category>
		<category><![CDATA[Software]]></category>
		<category><![CDATA[Techie]]></category>
		<category><![CDATA[Windows 7]]></category>

		<guid isPermaLink="false">http://bradmarsh.net/index.php/2009/07/05/windows-7-shortcuts-hints-and-thoughts/</guid>
		<description><![CDATA[Ok So I have installed windows 7 (7100) on my little EeePC 900, the EeePC has 2 gigs of RAM and a small 1.6 Atom, with this small combo 7 smashes the pre-installed XP.    Boot time is better by about 5 seconds and general performance to open applications and general processing is [...]]]></description>
			<content:encoded><![CDATA[<p>Ok So I have installed windows 7 (7100) on my little EeePC 900, the EeePC has 2 gigs of RAM and a small 1.6 Atom, with this small combo 7 smashes the pre-installed XP.    <br />Boot time is better by about 5 seconds and general performance to open applications and general processing is just far better, while it uses substantially more memory than XP, but lets face it all new entry level PC’s have 2 gigs of RAM these days.</p>
<p>But with saying that I would blame a lot of the memory usage on the rotten IE8 that is bundled with windows 7, I have many complaints about this browser, so rather than complain I am finding I am using Chrome more regularly, faster better on the memory and processor. MS if you read this use the KISS principle (Keep it simple stupid) Google has done this very well for years.</p>
<p>Anyways lets get to the shortcuts and handy little functions that windows 7 has added!</p>
<ul>
<li>My absolute favourite function has to be the if you have multiple screen configurations, you can click on a maximise screen and drag it to your other screens. Previously we had to resize / minimize and then move the open window to a new screen and then maximize… very annoying. </li>
<li>Next is the many many windows short cut keys, also work with multiple monitors or even single display :
<ul>
<li>Windows key + Left: docks current window to the left side of the screen. </li>
<li>Windows key + Right: docks current window to the right side of the screen. </li>
<li>Windows key + Up: maximizes and/or restores foreground window. </li>
<li>Windows key + Down: minimizes active window. </li>
</ul>
</li>
<li>Previously running an app in administrator was a right click, and then run as admin , while that still exists there is a quicker better way of doing this with keys: It’s now as easy as holding CTRL + SHIFT when you open the application. </li>
<li>Another one for those with multiple monitors: Windows + SHIFT + Left (or Right) will shift a window from monitor to monitor. </li>
</ul>
<p>Some handy things windows 7 includes:</p>
<ul>
<li>Windows 7 now includes Gabriola. This is an elaborate display typeface that takes advantage of OpenType layout to create a variety of stylistic sets. </li>
<li>Windows 7 now burns ISO files themselves instead of making us install unwanted third-party apps. </li>
<li>In the case that something happens to your system, you can make yourself a system repair disc. Just search “system repair disc” in the start menu. </li>
<li>For the advanced users finally a desktop OS that gives us the ability to setup software RAID, one of my favs! </li>
<li>Advance defrag for windows 7, read more here : <a href="http://blogs.msdn.com/e7/archive/2009/01/25/disk-defragmentation-background-and-engineering-the-windows-7-improvements.aspx" onclick="javascript:pageTracker._trackPageview('/outbound/article/http://blogs.msdn.com/e7/archive/2009/01/25/disk-defragmentation-background-and-engineering-the-windows-7-improvements.aspx');">http://blogs.msdn.com/e7/archive/2009/01/25/disk-defragmentation-background-and-engineering-the-windows-7-improvements.aspx</a> </li>
<li>Multi-Threaded File copy, this is by use of the command line robocoy which is included within windows 7, this is something I personally use on a constant basis, and is very powerful, if you haven&#8217;t used this before you are missing out! </li>
<li>UAC is substantially improved, where there is no need to turn this off any more, it only disturbs you on install of applications. this is something I turned of on VISTA as soon as I could, but one windows 7 I Have found that its something that’s not annoying and have left it on its default setting. Its also now provides us with a toggle bar where we can increase or decrease the default UAC settings. </li>
<li>A new calculator- about time it only took about 10 years! </li>
<li>Owh yeah an codec&#8217;s to play AVI Divx and other regularly used formats FINNALY!!!!!!! </li>
<li>And the whole OS is touch friendly! </li>
</ul>
<p>Another feature I will be talking about in more depth is the default install XP with program&#160; integration as a virtual machine. I will be blogging about business reasons as to why corporate should go the distance and&#160; install windows 7.</p>
<p>there is so much more they have done windows 7 is really all that and a bag of chips, its got my 2 thumbs up, I just hope they don&#8217;t bloat the final release with unnecessary junk</p>
]]></content:encoded>
			<wfw:commentRss>http://bradmarsh.net/index.php/2009/07/05/windows-7-shortcuts-hints-and-thoughts/feed/</wfw:commentRss>
		<slash:comments>2</slash:comments>
		</item>
		<item>
		<title>IIS7 logging in Central Location for web farms</title>
		<link>http://bradmarsh.net/index.php/2009/01/15/iis7-logging-in-central-location-for-web-farms/</link>
		<comments>http://bradmarsh.net/index.php/2009/01/15/iis7-logging-in-central-location-for-web-farms/#comments</comments>
		<pubDate>Thu, 15 Jan 2009 00:29:21 +0000</pubDate>
		<dc:creator>Brad Marsh</dc:creator>
				<category><![CDATA[Microsoft]]></category>
		<category><![CDATA[Server 2008]]></category>
		<category><![CDATA[Software]]></category>

		<guid isPermaLink="false">http://bradmarsh.net/index.php/2009/01/15/iis7-logging-in-central-location-for-web-farms/</guid>
		<description><![CDATA[
&#160;
&#160;
&#160;
&#160;
&#160;
&#160;
Ok so it appears IIS7 has thought of almost everything this time, and IIS7 is perfect for web Farms now they have the ability to share the configuration file. 
While we are in the mists of setting up a load balanced environment with a IIS7 farm, we have everything working wonders. But when it comes [...]]]></description>
			<content:encoded><![CDATA[<p><img height="154" src="http://blog.crowe.co.nz/images/IIS7Logo.jpg" width="525" align="left">
<p>&nbsp;</p>
<p>&nbsp;</p>
<p>&nbsp;</p>
<p>&nbsp;</p>
<p>&nbsp;</p>
<p>&nbsp;</p>
<p>Ok so it appears IIS7 has thought of almost everything this time, and IIS7 is perfect for web Farms now they have the ability to share the configuration file. </p>
<p>While we are in the mists of setting up a load balanced environment with a IIS7 farm, we have everything working wonders. But when it comes to log files it seems Microsoft missed this. they really should have added in the functionality to combine log files to a central location, while we can prove a UNC path and also log to this, but only one server can do this.</p>
<p>the problems that you are faced with in a web farm is that:</p>
<p>If you have shared you ApplicationHost.config which in a web farm, (I highly recommend you do to make your life that little be easier) you will find that y our log file location will be the same on all servers. which could be a problem if: </p>
<p>you have used a UNC path, all servers in the farm will try and log to this location and only one can win, as the HTTP.SYS for that winning server will keep this open and therefore other servers will not be able to log. </p>
<p>If you have specified a local path, which really lest face it is your only option, you MUST make 100% sure that location or that drive exists on all of your servers in the web farm. </p>
<p>Now if you don&#8217;t care so much for your log files you will be happy to have them on each server and not collate them. But for the people like us we need them in a central location for a: We like to find our data quickly and be able to find what is going on, on our servers b; we have webstats that we need to be able to provide to our clients or internal staff and c; for a backup / management purpose its just easier to have them centralised.</p>
<p>So our requirement is to be able to copy all of our log files to one location, keeping of course the web log file structure i.e. W3SVC1, W3SVC2 etc&#8230;</p>
<p>there is one other problem I should tell you, all of the log file names are the same name, so we can just schedule a move / copy script because they will fail or overwrite the other log files, you MUST rename the files before moving. In hind sight we have do this but its a good idea anyway, because this will allow us to easily track down a problem on a server via the logs. </p>
<p>So we have come up with a script that can be scheduled on a daily basis that will rename all files to the server name_&lt;orginalfilename&gt;.log (this will look in all sub folders i.e. W3SVC1, W3SVC2 etc&#8230;) once the name change is done it will then MOVE the files to the central location.</p>
<p>A Big thanks to <a href="http://www.alanjlee.com" onclick="javascript:pageTracker._trackPageview('/outbound/article/http://www.alanjlee.com');">Alan Lee</a> for this script, as he wrote the find and replace part (hats off)</p>
<div style="border-right: gray 1px solid; padding-right: 4px; border-top: gray 1px solid; padding-left: 4px; font-size: 8pt; padding-bottom: 4px; margin: 20px 0px 10px; overflow: auto; border-left: gray 1px solid; width: 97.5%; cursor: text; max-height: 200px; line-height: 12pt; padding-top: 4px; border-bottom: gray 1px solid; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4">
<div style="padding-right: 0px; padding-left: 0px; font-size: 8pt; padding-bottom: 0px; overflow: visible; width: 100%; color: black; border-top-style: none; line-height: 12pt; padding-top: 0px; font-family: consolas, 'Courier New', courier, monospace; border-right-style: none; border-left-style: none; background-color: #f4f4f4; border-bottom-style: none">
<pre style="padding-right: 0px; padding-left: 0px; font-size: 8pt; padding-bottom: 0px; margin: 0em; overflow: visible; width: 100%; color: black; border-top-style: none; line-height: 12pt; padding-top: 0px; font-family: consolas, 'Courier New', courier, monospace; border-right-style: none; border-left-style: none; background-color: white; border-bottom-style: none">&nbsp;</pre>
<pre style="padding-right: 0px; padding-left: 0px; font-size: 8pt; padding-bottom: 0px; margin: 0em; overflow: visible; width: 100%; color: black; border-top-style: none; line-height: 12pt; padding-top: 0px; font-family: consolas, 'Courier New', courier, monospace; border-right-style: none; border-left-style: none; background-color: #f4f4f4; border-bottom-style: none">set logs=C:\folder\folderagain</pre>
<pre style="padding-right: 0px; padding-left: 0px; font-size: 8pt; padding-bottom: 0px; margin: 0em; overflow: visible; width: 100%; color: black; border-top-style: none; line-height: 12pt; padding-top: 0px; font-family: consolas, 'Courier New', courier, monospace; border-right-style: none; border-left-style: none; background-color: white; border-bottom-style: none">cd /d %logs%</pre>
<pre style="padding-right: 0px; padding-left: 0px; font-size: 8pt; padding-bottom: 0px; margin: 0em; overflow: visible; width: 100%; color: black; border-top-style: none; line-height: 12pt; padding-top: 0px; font-family: consolas, 'Courier New', courier, monospace; border-right-style: none; border-left-style: none; background-color: #f4f4f4; border-bottom-style: none">&nbsp;</pre>
<pre style="padding-right: 0px; padding-left: 0px; font-size: 8pt; padding-bottom: 0px; margin: 0em; overflow: visible; width: 100%; color: black; border-top-style: none; line-height: 12pt; padding-top: 0px; font-family: consolas, 'Courier New', courier, monospace; border-right-style: none; border-left-style: none; background-color: white; border-bottom-style: none">dir /b %logs% &gt; tmp.txt</pre>
<pre style="padding-right: 0px; padding-left: 0px; font-size: 8pt; padding-bottom: 0px; margin: 0em; overflow: visible; width: 100%; color: black; border-top-style: none; line-height: 12pt; padding-top: 0px; font-family: consolas, 'Courier New', courier, monospace; border-right-style: none; border-left-style: none; background-color: #f4f4f4; border-bottom-style: none"> </pre>
<pre style="padding-right: 0px; padding-left: 0px; font-size: 8pt; padding-bottom: 0px; margin: 0em; overflow: visible; width: 100%; color: black; border-top-style: none; line-height: 12pt; padding-top: 0px; font-family: consolas, 'Courier New', courier, monospace; border-right-style: none; border-left-style: none; background-color: white; border-bottom-style: none"><span style="color: #0000ff">for</span> /D %%I <span style="color: #0000ff">in</span> (<span style="color: #006080">"%logs%"</span>) <span style="color: #0000ff">do</span> For /F <span style="color: #006080">"tokens=*"</span>  %%J <span style="color: #0000ff">in</span> (tmp.txt) <span style="color: #0000ff">do</span> cd /d %logs%\%%J &amp;&amp; <span style="color: #0000ff">for</span> %%i <span style="color: #0000ff">in</span> (u*.log) <span style="color: #0000ff">do</span> move %%i %computername%_%%i </pre>
<pre style="padding-right: 0px; padding-left: 0px; font-size: 8pt; padding-bottom: 0px; margin: 0em; overflow: visible; width: 100%; color: black; border-top-style: none; line-height: 12pt; padding-top: 0px; font-family: consolas, 'Courier New', courier, monospace; border-right-style: none; border-left-style: none; background-color: #f4f4f4; border-bottom-style: none">&nbsp;</pre>
<pre style="padding-right: 0px; padding-left: 0px; font-size: 8pt; padding-bottom: 0px; margin: 0em; overflow: visible; width: 100%; color: black; border-top-style: none; line-height: 12pt; padding-top: 0px; font-family: consolas, 'Courier New', courier, monospace; border-right-style: none; border-left-style: none; background-color: white; border-bottom-style: none">del %logs%\tmp.txt</pre>
<pre style="padding-right: 0px; padding-left: 0px; font-size: 8pt; padding-bottom: 0px; margin: 0em; overflow: visible; width: 100%; color: black; border-top-style: none; line-height: 12pt; padding-top: 0px; font-family: consolas, 'Courier New', courier, monospace; border-right-style: none; border-left-style: none; background-color: #f4f4f4; border-bottom-style: none">&nbsp;</pre>
<pre style="padding-right: 0px; padding-left: 0px; font-size: 8pt; padding-bottom: 0px; margin: 0em; overflow: visible; width: 100%; color: black; border-top-style: none; line-height: 12pt; padding-top: 0px; font-family: consolas, 'Courier New', courier, monospace; border-right-style: none; border-left-style: none; background-color: white; border-bottom-style: none">robocopy %logs% \\servername\FolderName /mov /E /minage:0 /R:3 /W:5 /LOG:%logs%\logs.log</pre>
<pre style="padding-right: 0px; padding-left: 0px; font-size: 8pt; padding-bottom: 0px; margin: 0em; overflow: visible; width: 100%; color: black; border-top-style: none; line-height: 12pt; padding-top: 0px; font-family: consolas, 'Courier New', courier, monospace; border-right-style: none; border-left-style: none; background-color: #f4f4f4; border-bottom-style: none">&nbsp;</pre>
<pre style="padding-right: 0px; padding-left: 0px; font-size: 8pt; padding-bottom: 0px; margin: 0em; overflow: visible; width: 100%; color: black; border-top-style: none; line-height: 12pt; padding-top: 0px; font-family: consolas, 'Courier New', courier, monospace; border-right-style: none; border-left-style: none; background-color: white; border-bottom-style: none">&nbsp;</pre>
</div>
</div>
<p>Of course the script uses robocopy so you will need to include the .exe for this where ever you are executing this .bat from.</p>
<p>With 2008 Server you can also schedule emails with attachments, might not be a bad idea to attach the log file so you can archive it away.</p>
]]></content:encoded>
			<wfw:commentRss>http://bradmarsh.net/index.php/2009/01/15/iis7-logging-in-central-location-for-web-farms/feed/</wfw:commentRss>
		<slash:comments>12</slash:comments>
		</item>
		<item>
		<title>FREE ftp, ftps and sftp server that works!</title>
		<link>http://bradmarsh.net/index.php/2008/12/15/free-ftp-ftps-and-sftp-server-that-works/</link>
		<comments>http://bradmarsh.net/index.php/2008/12/15/free-ftp-ftps-and-sftp-server-that-works/#comments</comments>
		<pubDate>Mon, 15 Dec 2008 04:24:40 +0000</pubDate>
		<dc:creator>Brad Marsh</dc:creator>
				<category><![CDATA[Software]]></category>
		<category><![CDATA[Techie]]></category>

		<guid isPermaLink="false">http://bradmarsh.net/index.php/2008/12/15/free-ftp-ftps-and-sftp-server-that-works/</guid>
		<description><![CDATA[Here @ my current work place Elcom we are heavy uses of FTP for various methods. However we have recently been asked to supply a client with a particular solution that requires a Secure FTP solution, while our current FTP allows FTPS (SSL) we wanted something will a little more security, so we opted to [...]]]></description>
			<content:encoded><![CDATA[<p>Here @ my current work place <a href="http://www.elcom.com.au" onclick="javascript:pageTracker._trackPageview('/outbound/article/http://www.elcom.com.au');">Elcom</a> we are heavy uses of FTP for various methods. However we have recently been asked to supply a client with a particular solution that requires a Secure FTP solution, while our current FTP allows FTPS (SSL) we wanted something will a little more security, so we opted to go the SSH route also known as SFTP, I have looked high and low for suitable FTP applications that have all protocols SFTP, FTPS and plain old FTP, I have since found that while there are many app&#8217;s that do this, some are just much too pricey and some well the interface is poorly thought out and hard to navigate through. </p>
<p>After hours of trailing paid software, I found that they just didnt do exactly what I required, or maybe what I expected. </p>
<p>So I when on the hunt again this time looking for GNU based software, and to my surprise I found one that has all protocols. </p>
<p>It has a simple but yet easy to navigate and work through, and even better it integrates with NT authentication, when I say NT authentication I am talking about Active Directory&#8230;. and its FREE. </p>
<p>It even Supports Virtual Directories.</p>
<p>While there could be more with users and assigning them specific paths, rather than global directories, I really can&#8217;t complain given its price tag. </p>
<p><a href="http://www.freeftpd.com" onclick="javascript:pageTracker._trackPageview('/outbound/article/http://www.freeftpd.com');">FreeFTd</a> can be found here </p>
<p><a href="http://www.freeftpd.com" onclick="javascript:pageTracker._trackPageview('/outbound/article/http://www.freeftpd.com');">http://www.freeftpd.com</a></p>
]]></content:encoded>
			<wfw:commentRss>http://bradmarsh.net/index.php/2008/12/15/free-ftp-ftps-and-sftp-server-that-works/feed/</wfw:commentRss>
		<slash:comments>0</slash:comments>
		</item>
		<item>
		<title>SQL 2008: Modify Design in a Table is not permitted</title>
		<link>http://bradmarsh.net/index.php/2008/12/05/sql-2008-modify-design-in-a-table-is-not-permitted/</link>
		<comments>http://bradmarsh.net/index.php/2008/12/05/sql-2008-modify-design-in-a-table-is-not-permitted/#comments</comments>
		<pubDate>Fri, 05 Dec 2008 03:00:26 +0000</pubDate>
		<dc:creator>Brad Marsh</dc:creator>
				<category><![CDATA[Microsoft]]></category>
		<category><![CDATA[SQL Server]]></category>
		<category><![CDATA[Software]]></category>
		<category><![CDATA[Techie]]></category>

		<guid isPermaLink="false">http://bradmarsh.net/index.php/2008/12/sql-2008-modify-design-in-a-table-is-not-permitted/</guid>
		<description><![CDATA[When attempting to modify a table design (by right clicking on the table and select &#8216;design&#8217;) you get and error something along the lines of:
&#160;
Saving change is not permitted. the changes you have made require the following tables to be dropped and re-created. You have either made changes to a table that cant be re-created [...]]]></description>
			<content:encoded><![CDATA[<p>When attempting to modify a table design (by right clicking on the table and select &#8216;design&#8217;) you get and error something along the lines of:</p>
<p>&nbsp;</p>
<p>Saving change is not permitted. the changes you have made require the following tables to be dropped and re-created. You have either made changes to a table that cant be re-created or enabled the option Prevent Saving changes that require the table to be re-created.</p>
<p><a href="http://bradmarsh.net/blogs/media/Images/SQL2008ModifyDesigninaTableisnotpermitte_C397/image.png" ><img style="border-right: 0px; border-top: 0px; border-left: 0px; border-bottom: 0px" height="261" alt="image" src="http://bradmarsh.net/blogs/media/Images/SQL2008ModifyDesigninaTableisnotpermitte_C397/image_thumb.png" width="324" border="0"></a> </p>
<p>&nbsp;</p>
<p>You can fix this quite easily by the following method</p>
<p>Tools Menu &gt; Options &gt; Designers &gt; Untick ‘Prevent saving changes that require a table re-creation’
<p>&nbsp;</p>
<p><a href="http://bradmarsh.net/blogs/media/Images/SQL2008ModifyDesigninaTableisnotpermitte_C397/clip_image0024.jpg" ><img style="border-right: 0px; border-top: 0px; border-left: 0px; border-bottom: 0px" height="229" alt="clip_image002[4]" src="http://bradmarsh.net/blogs/media/Images/SQL2008ModifyDesigninaTableisnotpermitte_C397/clip_image0024_thumb.jpg" width="390" border="0"></a></p>
<p>Done</p>
]]></content:encoded>
			<wfw:commentRss>http://bradmarsh.net/index.php/2008/12/05/sql-2008-modify-design-in-a-table-is-not-permitted/feed/</wfw:commentRss>
		<slash:comments>1</slash:comments>
		</item>
		<item>
		<title>AD Based Outlook Email Signature for 2003 and 2007 Part 4 &#8211; Now writes TXT and RTF as well as HTML</title>
		<link>http://bradmarsh.net/index.php/2008/11/20/ad-based-outlook-email-signature-for-2003-and-2007-part-4-now-writes-txt-and-rtf-as-well-as-html/</link>
		<comments>http://bradmarsh.net/index.php/2008/11/20/ad-based-outlook-email-signature-for-2003-and-2007-part-4-now-writes-txt-and-rtf-as-well-as-html/#comments</comments>
		<pubDate>Thu, 20 Nov 2008 00:43:31 +0000</pubDate>
		<dc:creator>Brad Marsh</dc:creator>
				<category><![CDATA[Microsoft]]></category>
		<category><![CDATA[Software]]></category>
		<category><![CDATA[Techie]]></category>
		<category><![CDATA[Vista]]></category>

		<guid isPermaLink="false">http://bradmarsh.wordpress.com/2008/11/20/ad-based-outlook-email-signature-for-2003-and-2007-part-4-now-writes-txt-and-rtf-as-well-as-html/</guid>
		<description><![CDATA[Ok due to high demand, and for some very odd reason 2007 was not writing the .txt file and the .rtf.
Now I have implemented various changes so it does this, however due to time constraints its not as
automated as I would like, I will try to review this when I get some free time (hopefully [...]]]></description>
			<content:encoded><![CDATA[<p>Ok due to high demand, and for some very odd reason 2007 was not writing the .txt file and the .rtf.</p>
<p>Now I have implemented various changes so it does this, however due to time constraints its not as<br />
automated as I would like, I will try to review this when I get some free time (hopefully <img src='http://bradmarsh.net/wp-includes/images/smilies/icon_smile.gif' alt=':)' class='wp-smiley' />  ).</p>
<p>So if you are using the old script the only changes are:</p>
<p>&#8216;=========================================================<br />
&#8216; This adds the Text file, will need to be changed accordingly<br />
&#8216;==========================================================</p>
<p>Set objFile = objFSO.CreateTextFile(Folderlocation&amp;&#8221;Elcom.txt&#8221;,True)<br />
objfile.writeLine &#8220;&#8221;&amp; FullName &amp; &#8221; | &#8221; &amp; title &amp; &#8221; |  &#8221; &amp; title &amp; &#8221; | &#8220;&amp; Company &amp; &#8221; | Australian Technology Park&#8221;<br />
objfile.writeLine &#8220;T +612 &#8221; &amp; PhoneNumber &amp; &#8221; | F +612 9209 4423 | www.elcom.com.au | &#8221; &amp; Email &amp;&#8221; &#8221;<br />
objfile.writeLine &#8221; &#8221;<br />
objfile.writeLine &#8221; &#8221;<br />
objfile.writeLine &#8220;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8211;&#8221;<br />
objfile.writeLine &#8220;This email is intended for the intended recipients(s) and may contain confidential information. &#8221;<br />
objfile.writeLine &#8220;Reproduction, dissemination or distribution of this message is prohibited unless authorised by the sender.&#8221;<br />
objfile.writeLine &#8220;If you are not the intended recipient, please notify the sender immediately and you must not read,&#8221;<br />
objfile.writeLine &#8220;keep, use, disclose, copy or distribute this email without the sender&#8217;s prior permission.&#8221;<br />
objfile.writeLine &#8220;The views expressed by the sender are not necessarily those of Elcom Technology Pty Ltd &#8221;<br />
objFile.Close</p>
<p>as you can see I have had to write this out again (without the HTML tags), this is far from perfect but<br />
it is a working fix for the time being. You will have to edit the above to suite your Text based<br />
Signature.</p>
<p>Next addition is</p>
<p>&#8216;====================================================<br />
&#8216; This copies the .htm file and changes it to a RTF format<br />
&#8216;====================================================</p>
<p>&#8216;Set the Source and Destination paths below &#8211; CHANGE your file name<br />
&#8216;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;-</p>
<p>Const OverwriteExisting = True<br />
Set objFSO = CreateObject(&#8220;Scripting.FileSystemObject&#8221;)<br />
objFSO.CopyFile Folderlocation &amp; &#8220;Elcom.htm&#8221; , Folderlocation &amp; &#8220;Elcom.rtf&#8221;, OverwriteExisting </p>
<p>Being that RTF will show a HTML format this is any easy fix, all you have to do with this is change the<br />
file name which we set in the begining of the script. So for example I would change &#8220;Elcom.htm&#8221; to<br />
&#8220;MyCompany.htm&#8221;</p>
<p>  Here is the complete code</p>
<div style="font-size: 8pt; margin: 20px 0px 10px; overflow: auto; width: 97.5%; cursor: text; max-height: 200px; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border: gray 1px solid; padding: 4px;">
<div style="font-size: 8pt; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"> </pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"> </pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">'====================</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #008000;">'</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">' VBScript: &lt;Signatures.vbs&gt;</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #008000;">' AUTHOR: Peter Aarts</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">' Contact Info: peter.aarts@l1.nl</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #008000;">' Version 2.04</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">' Date: January 20, 2006</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #008000;">' Moddified By Brad Marsh Now works with both 2003 and 2007 outlook </span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">' Contact: gentex@tpg.com.au</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #008000;">' Date 19 feb 08</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">' Tested on Vista, XP, XP64 and office 2003 and 2007. </span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #008000;">' NOTE will not work that well with various email accounts</span>

<span style="color: #008000;">' Additions added on 20 Nov 08 - Tested on Office 07 and Vista </span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">'====================  </span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"> </pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">'Option Explicit</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">On</span> <span style="color: #0000ff;">Error</span> <span style="color: #0000ff;">Resume</span> <span style="color: #0000ff;">Next</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"> </pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">Dim</span> qQuery, objSysInfo, objuser</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #0000ff;">Dim</span> FullName, EMail, Title, PhoneNumber, MobileNumber, FaxNumber, OfficeLocation, Department</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">Dim</span> web_address, FolderLocation, HTMFileString, StreetAddress, Town, State, Company</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #0000ff;">Dim</span> ZipCode, PostOfficeBox, UserDataPath</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"> </pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">' Read LDAP(Active Directory) information to asigns the user's info to variables.</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #008000;">'====================</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #0000ff;">Set</span> objSysInfo = CreateObject(<span style="color: #006080;">"ADSystemInfo"</span>)</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">objSysInfo.RefreshSchemaCache</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">qQuery = <span style="color: #006080;">"LDAP://"</span> &amp; objSysInfo.Username</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">Set</span> objuser = GetObject(qQuery)</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"> </pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">FullName = objuser.displayname</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">EMail = objuser.mail</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">Company = objuser.Company</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">Title = objuser.title</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">PhoneNumber = objuser.TelephoneNumber</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">FaxNumber = objuser.FaxNumber</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">OfficeLocation = objuser.physicalDeliveryOfficeName</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">StreetAddress = objuser.streetaddress</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">PostofficeBox = objuser.postofficebox</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">Department = objUser.Department</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">ZipCode = objuser.postalcode</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">Town = objuser.l</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">MobileNumber = objuser.TelephoneMobile</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">web_address = <span style="color: #006080;">"http://www.elcom.com.au"</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"> </pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">' This section creates the signature files names and locations.</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #008000;">'====================</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">' Corrects Outlook signature folder location. Just to make sure that</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #008000;">' Outlook is using the purposed folder defined with variable : FolderLocation</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">' Example is based on Dutch version.</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #008000;">' Changing this in a production enviremont might create extra work</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">' all employees are missing their old signatures</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #008000;">'====================</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #0000ff;">Dim</span> objShell, RegKey, RegKey07, RegKeyParm</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">Set</span> objShell = CreateObject(<span style="color: #006080;">"WScript.Shell"</span>)</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">RegKey = <span style="color: #006080;">"HKEY_CURRENT_USER\Software\Microsoft\Office\11.0\Common\General"</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">RegKey07 = <span style="color: #006080;">"HKEY_CURRENT_USER\Software\Microsoft\Office\12.0\Common\General"</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">RegKey07 = RegKey07 &amp; <span style="color: #006080;">"\Signatures"</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">RegKey = RegKey &amp; <span style="color: #006080;">"\Signatures"</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">objShell.RegWrite RegKey , <span style="color: #006080;">"AD_elcom"</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">objShell.RegWrite RegKey07 , <span style="color: #006080;">"AD_elcom"</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">UserDataPath = ObjShell.ExpandEnvironmentStrings(<span style="color: #006080;">"%appdata%"</span>)</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">FolderLocation = UserDataPath &amp;<span style="color: #006080;">"\Microsoft\AD_elcom\"</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">HTMFileString = FolderLocation &amp; <span style="color: #006080;">"Elcom.htm"</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"> </pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">' This section disables the change of the signature by the user.</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #008000;">'====================</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">'objShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Office\11.0\Common\MailSettings\NewSignature" , "L1-Handtekening"</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #008000;">'objShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Office\11.0\Common\MailSettings\ReplySignature" , "L1-Handtekening"</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">'objShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Office\11.0\Outlook\Options\Mail\EnableLogging" , "0", "REG_DWORD"  </span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"> </pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">' This section checks if the signature directory exits and if not creates one.</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #008000;">'====================</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #0000ff;">Dim</span> objFS1</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">Set</span> objFS1 = CreateObject(<span style="color: #006080;">"Scripting.FileSystemObject"</span>)</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #0000ff;">If</span> (objFS1.FolderExists(FolderLocation)) <span style="color: #0000ff;">Then</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">Else</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #0000ff;">Call</span> objFS1.CreateFolder(FolderLocation)</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">End</span> <span style="color: #0000ff;">if</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"> </pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #008000;">' The next section builds the signature file</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">'====================</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">Dim</span> objFSO</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #0000ff;">Dim</span> objFile,afile</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">Dim</span> aQuote</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">aQuote = chr(34)</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"> </pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">' This section builds the HTML file version</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #008000;">'====================</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #0000ff;">Set</span> objFSO = CreateObject(<span style="color: #006080;">"Scripting.FileSystemObject"</span>)</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"> </pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">' This section deletes to other signatures.</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #008000;">' These signatures are automaticly created by Outlook 2003.</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">'====================</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">Set</span> AFile = objFSO.GetFile(Folderlocation&amp;<span style="color: #006080;">"Elcom.rtf"</span>)</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">aFile.Delete</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">Set</span> AFile = objFSO.GetFile(Folderlocation&amp;<span style="color: #006080;">"Elcom.txt"</span>)</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">aFile.Delete</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"> </pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">'=========================================================</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #008000;">' This adds the Text file, will need to be changed accordingly</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">'========================================================== </span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"> </pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #0000ff;">Set</span> objFile = objFSO.CreateTextFile(Folderlocation&amp;<span style="color: #006080;">"Elcom.txt"</span>,<span style="color: #0000ff;">True</span>)</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">objfile.writeLine <span style="color: #006080;">""</span>&amp; FullName &amp; <span style="color: #006080;">" | "</span> &amp; title &amp; <span style="color: #006080;">" |  "</span> &amp; title &amp; <span style="color: #006080;">" | "</span>&amp; Company &amp; <span style="color: #006080;">" | Australian Technology Park"</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">objfile.writeLine <span style="color: #006080;">"T +612 "</span> &amp; PhoneNumber &amp; <span style="color: #006080;">" | F +612 9209 4423 | www.elcom.com.au | "</span> &amp; Email &amp;<span style="color: #006080;">" "</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">objfile.writeLine <span style="color: #006080;">" "</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">objfile.writeLine <span style="color: #006080;">" "</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">objfile.writeLine <span style="color: #006080;">"--------------------------------------------------------------------------------"</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">objfile.writeLine <span style="color: #006080;">"This email is intended for the intended recipients(s) and may contain confidential information. "</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">objfile.writeLine <span style="color: #006080;">"Reproduction, dissemination or distribution of this message is prohibited unless authorised by the sender."</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">objfile.writeLine <span style="color: #006080;">"If you are not the intended recipient, please notify the sender immediately and you must not read,"</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">objfile.writeLine <span style="color: #006080;">"keep, use, disclose, copy or distribute this email without the sender's prior permission."</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">objfile.writeLine <span style="color: #006080;">"The views expressed by the sender are not necessarily those of Elcom Technology Pty Ltd "</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">objFile.Close</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"> </pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">Set</span> objFile = objFSO.CreateTextFile(HTMFileString,<span style="color: #0000ff;">True</span>)</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">objFile.Close</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">Set</span> objFile = objFSO.OpenTextFile(HTMFileString, 2)</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"> </pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">objfile.write <span style="color: #006080;">"&lt;!DOCTYPE HTML PUBLIC "</span> &amp; aQuote &amp; <span style="color: #006080;">"-//W3C//DTD HTML 4.0 Transitional//EN"</span> &amp; aQuote &amp; <span style="color: #006080;">"&gt;"</span> &amp; vbCrLf</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">objfile.write <span style="color: #006080;">"&lt;HTML&gt;&lt;HEAD&gt;&lt;TITLE&gt;Microsoft Office Outlook Signature&lt;/TITLE&gt;"</span> &amp; vbCrLf</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">objfile.write <span style="color: #006080;">"&lt;META http-equiv=Content-Type content="</span> &amp; aQuote &amp; <span style="color: #006080;">"text/html; charset=windows-1252"</span> &amp; aQuote &amp; <span style="color: #006080;">"&gt;"</span> &amp; vbCrLf</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">objfile.write <span style="color: #006080;">"&lt;META content="</span> &amp; aQuote &amp; <span style="color: #006080;">"MSHTML 6.00.3790.186"</span> &amp; aQuote &amp; <span style="color: #006080;">" name=GENERATOR&gt;&lt;/HEAD&gt;"</span> &amp; vbCrLf</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">objfile.write <span style="color: #006080;">"&lt;body&gt;"</span> &amp; vbCrLf</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">objfile.write <span style="color: #006080;">"&lt;font color=696969 face="</span> &amp; aQuote &amp; <span style="color: #006080;">"Arial"</span> &amp; aQuote &amp; <span style="color: #006080;">"&gt;&lt;h6&gt; "</span>&amp; FullName &amp; <span style="color: #006080;">" | "</span> &amp; title &amp; <span style="color: #006080;">" | "</span>&amp; Company &amp; <span style="color: #006080;">" | Australian Technology Park &lt;br&gt;"</span>&amp; vbCrLf</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">objfile.write <span style="color: #006080;">"T +612 "</span> &amp; PhoneNumber &amp; <span style="color: #006080;">" | F +612 9209 4423 | &lt;a href=http://www.elcom.com.au&gt;&lt;font color=#696969&gt;www.elcom.com.au&lt;/font&gt;&lt;/a&gt; |&lt;a href=mailto:"</span> &amp; Email &amp;<span style="color: #006080;">" &gt; &lt;font color=#696969&gt;"</span> &amp; Email &amp;<span style="color: #006080;">" "</span> &amp; vbCrLf</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">objfile.write <span style="color: #006080;">"&lt;/h6&gt;&lt;/font&gt;&lt;/a&gt;&lt;/B&gt;"</span> &amp; vbCrLf</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">objfile.write <span style="color: #006080;">"&lt;/font&gt;"</span> &amp; vbCrLf</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">objfile.write <span style="color: #006080;">"&lt;font color=696969 face=arial&gt;&lt;A href=http://www.elcom.com.au/&gt; &lt;img src=http://www.elcom.com.au/images/elcom-logo-web-175x70.gif border=0&gt;&lt;/a&gt;"</span> &amp; vbCrLf</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">objfile.write <span style="color: #006080;">"&lt;br&gt;"</span> &amp; vbCrLf</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">objfile.write <span style="color: #006080;">"&lt;img src=http://www.elcom.com.au/images/mspartner.jpg&gt;"</span> &amp; vbCrLf</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">objfile.write <span style="color: #006080;">"&lt;br&gt;"</span> &amp; vbCrLf</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">objfile.write <span style="color: #006080;">"&lt;/font&gt;&lt;font color=696969 size=1 face=arial&gt;&lt;br&gt;"</span> &amp; vbCrLf</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">objfile.write <span style="color: #006080;">"&lt;hr size=1 align=left width=465 color=696969&gt;"</span> &amp; vbCrLf</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">objfile.write <span style="color: #006080;">" This email is intended for the intended recipients(s) and may contain confidential information. &lt;br&gt; Reproduction, dissemination or distribution of this message is prohibited unless authorised by the sender.&lt;br&gt; If you are not the intended recipient, please notify the sender immediately and you must not read,&lt;br&gt; keep, use, disclose, copy or distribute this email without the sender's prior permission.&lt;br&gt; The views expressed by the sender are not necessarily those of Elcom Technology Pty Ltd&lt;/font&gt;"</span>  &amp; vbCrLf</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">objfile.write <span style="color: #006080;">"&lt;/FONT&gt;&lt;/BODY&gt;&lt;/HTML&gt;"</span> &amp; vbCrLf</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">objFile.Close</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"> </pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">'==========================================================================</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #008000;">' This copies the .htm file and changes it to a RTF format</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">'==========================================================================</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #008000;">'Set the Source and Destination paths below - CHANGE your file name</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">'---------------------------------------------------- </span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"> </pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #0000ff;">Const</span> OverwriteExisting = <span style="color: #0000ff;">True</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">Set</span> objFSO = CreateObject(<span style="color: #006080;">"Scripting.FileSystemObject"</span>)</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">objFSO.CopyFile Folderlocation &amp; <span style="color: #006080;">"Elcom.htm"</span> , Folderlocation &amp; <span style="color: #006080;">"Elcom.rtf"</span>, OverwriteExisting</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"> </pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">' ===========================</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #008000;">' This section readsout the current Outlook profile and then sets the name of the default Signature</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">' ===========================</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #008000;">' Use this version to set all accounts</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">' in the default mail profile</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #008000;">' to use a previously created signature  </span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"> </pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">Call</span> SetDefaultSignature(<span style="color: #006080;">"Elcom"</span>,<span style="color: #006080;">""</span>)</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"> </pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #008000;">' Use this version (and comment the other) to</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">' modify a named profile.</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #008000;">'Call SetDefaultSignature _</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">' ("Signature Name", "Profile Name")  </span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"> </pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #0000ff;">Sub</span> SetDefaultSignature(strSigName, strProfile)</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">Const</span> HKEY_CURRENT_USER = &amp;H80000001</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">strComputer = <span style="color: #006080;">"."</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"> </pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #0000ff;">If</span> <span style="color: #0000ff;">Not</span> IsOutlookRunning <span style="color: #0000ff;">Then</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">Set</span> objreg = GetObject(<span style="color: #006080;">"winmgmts:"</span> &amp; _</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #006080;">"{impersonationLevel=impersonate}!\\"</span> &amp; _</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">strComputer &amp; <span style="color: #006080;">"\root\default:StdRegProv"</span>)</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">strKeyPath = <span style="color: #006080;">"Software\Microsoft\Windows NT\"</span> &amp; _</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #006080;">"CurrentVersion\Windows "</span> &amp; _</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #006080;">"Messaging Subsystem\Profiles\"</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #008000;">' get default profile name if none specified</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #0000ff;">If</span> strProfile = <span style="color: #006080;">""</span> <span style="color: #0000ff;">Then</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">objreg.GetStringValue HKEY_CURRENT_USER, _</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">strKeyPath, <span style="color: #006080;">"DefaultProfile"</span>, strProfile</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">End</span> <span style="color: #0000ff;">If</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">' build array from signature name</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">myArray = StringToByteArray(strSigName, <span style="color: #0000ff;">True</span>)</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">strKeyPath = strKeyPath &amp; strProfile &amp; _</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #006080;">"\9375CFF0413111d3B88A00104B2A6676"</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">objreg.EnumKey HKEY_CURRENT_USER, strKeyPath, _</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">arrProfileKeys</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #0000ff;">For</span> <span style="color: #0000ff;">Each</span> subkey <span style="color: #0000ff;">In</span> arrProfileKeys</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">strsubkeypath = strKeyPath &amp; <span style="color: #006080;">"\"</span> &amp; subkey</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">objreg.SetBinaryValue HKEY_CURRENT_USER, _</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">strsubkeypath, <span style="color: #006080;">"New Signature"</span>, myArray</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">objreg.SetBinaryValue HKEY_CURRENT_USER, _</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">strsubkeypath, <span style="color: #006080;">"Reply-Forward Signature"</span>, myArray</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #0000ff;">Next</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">Else</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">strMsg = <span style="color: #006080;">"Please shut down Outlook before "</span> &amp; _</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #006080;">"running this script."</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">MsgBox strMsg, vbExclamation, <span style="color: #006080;">"SetDefaultSignature"</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">End</span> <span style="color: #0000ff;">If</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #0000ff;">End</span> <span style="color: #0000ff;">Sub</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"> </pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #0000ff;">Function</span> IsOutlookRunning()</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">strComputer = <span style="color: #006080;">"."</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">strQuery = <span style="color: #006080;">"Select * from Win32_Process "</span> &amp; _</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #006080;">"Where Name = 'Outlook.exe'"</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #0000ff;">Set</span> objWMIService = GetObject(<span style="color: #006080;">"winmgmts:"</span> _</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">&amp; <span style="color: #006080;">"{impersonationLevel=impersonate}!\\"</span> _</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">&amp; strComputer &amp; <span style="color: #006080;">"\root\cimv2"</span>)</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">Set</span> colProcesses = objWMIService.ExecQuery(strQuery)</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #0000ff;">For</span> <span style="color: #0000ff;">Each</span> objProcess <span style="color: #0000ff;">In</span> colProcesses</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">If</span> UCase(objProcess.Name) = <span style="color: #006080;">"OUTLOOK.EXE"</span> <span style="color: #0000ff;">Then</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">IsOutlookRunning = <span style="color: #0000ff;">True</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">Else</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">IsOutlookRunning = <span style="color: #0000ff;">False</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">End</span> <span style="color: #0000ff;">If</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #0000ff;">Next</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">End</span> <span style="color: #0000ff;">Function</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"> </pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">Public</span> <span style="color: #0000ff;">Function</span> StringToByteArray _</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">(Data, NeedNullTerminator)</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">Dim</span> strAll</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">strAll = StringToHex4(Data)</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">If</span> NeedNullTerminator <span style="color: #0000ff;">Then</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">strAll = strAll &amp; <span style="color: #006080;">"0000"</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">End</span> <span style="color: #0000ff;">If</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">intLen = Len(strAll) \ 2</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">ReDim</span> arr(intLen - 1)</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #0000ff;">For</span> i = 1 <span style="color: #0000ff;">To</span> Len(strAll) \ 2</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">arr(i - 1) = <span style="color: #0000ff;">CByte</span> _</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">(<span style="color: #006080;">"&amp;H"</span> &amp; Mid(strAll, (2 * i) - 1, 2))</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">Next</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">StringToByteArray = arr</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">End</span> <span style="color: #0000ff;">Function</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"> </pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">Public</span> <span style="color: #0000ff;">Function</span> StringToHex4(Data)</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">' Input: normal text</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #008000;">' Output: four-character string for each character,</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">' e.g. "3204" for lower-case Russian B,</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #008000;">' "6500" for ASCII e</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">' Output: correct characters</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #008000;">' needs to reverse order of bytes from 0432</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #0000ff;">Dim</span> strAll</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">For</span> i = 1 <span style="color: #0000ff;">To</span> Len(Data)</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #008000;">' get the four-character hex for each character</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">strChar = Mid(Data, i, 1)</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;">strTemp = Right(<span style="color: #006080;">"00"</span> &amp; Hex(AscW(strChar)), 4)</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">strAll = strAll &amp; Right(strTemp, 2) &amp; Left(strTemp, 2)</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"><span style="color: #0000ff;">Next</span></pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;">StringToHex4 = strAll</pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: white; border-style: none; padding: 0px;"> </pre>
<pre style="font-size: 8pt; margin: 0px; overflow: visible; width: 100%; color: black; line-height: 12pt; font-family: consolas, 'Courier New', courier, monospace; background-color: #f4f4f4; border-style: none; padding: 0px;"><span style="color: #0000ff;">End</span> <span style="color: #0000ff;">Function</span></pre>
</div>
</div>
<p>Enjoy</p>
]]></content:encoded>
			<wfw:commentRss>http://bradmarsh.net/index.php/2008/11/20/ad-based-outlook-email-signature-for-2003-and-2007-part-4-now-writes-txt-and-rtf-as-well-as-html/feed/</wfw:commentRss>
		<slash:comments>32</slash:comments>
		</item>
	</channel>
</rss>

