DavidOverton.com
This site is my way to share my views and general business and IT information with you about Microsoft, IT solutions for ISVs, technologists and businesses, large and small.  

August 2006 - The Random Musings of an IT Consultant.......

  • Creating a "reminder" appointment for the next day in Outlook

    I don't know about you, but I often need to put a quick reminder in Outlook for tomorrow. Such things as "Phone Bill", "Feed the Guinea Pig" and "Get son to have bath" are the sort of essential things that make life slip along that little easier. A while ago I wrote a quick VBScript to do just that. Here it is: ' Written by Ian Watkins September 2002 ' This script creates an Outlook Appointment item to act as a reminder to the user Dim ol Dim olns dim olAppt dim olAppointmentItem olAppointmentItem = 1 ' Set the Application object. Set ol = CreateObject("Outlook.Application") ' Set the Namespace object. Set olns = ol.GetNamespace("MAPI") ' Create an appointment item and populate it set olAppt = ol.CreateItem(olAppointmentItem) olAppt.start = date + 1 & " 09:00am" olAppt.duration = 0 olAppt.ReminderMinutesBeforeStart = 0 olAppt.subject = inputbox("Please enter a subject", "Reminder Appointment") olAppt.BusyStatus...
  • Moving CompanyWeb

    Our internal SBS2003 box and one at a clients were starting to get a bit short of space on the C: drive. One of the culprits were the Sharepoint database files which were well over a gig on our system and .5 gig at our clients. I read up various documents on the MS site and a few NG and blog posts before trying this and I have now successfully moved both sets of Sharepoint databases. I would strongly recommend you read the document at http://download.microsoft.com/download/1/1/6/11671e4d-fb21-489c-870f-db36fd21a7d2/SBS_MoveDataFolders.DOC before doing this. Because I'm basically lazy by nature and prefer to do things the easy way and I really don't like typing in obscure OSQL commands I decided to write a batch file that would do it all for me. Here it is: -------------------------------- @echo off rem Move CompanyWeb rem Based on MS document and posts on newsgroups rem YOU MUST CHANGE THESE SOURCE AND TARGET FOLDERS TO MATCH YOUR OWN rem DON'T FORGET THE TRAILING "\" EITHER OTHERWISE NASTY...

(c)David Overton 2006-23