// "\"" required for printer name with spaces

/// Searches a path for spaces. If spaces are found, the entire path is enclosed in quotation marks.

/// <returns>TRUE if spaces were found; otherwise, FALSE.</returns>

[DllImport("shlwapi.dll", EntryPoint = "PathQuoteSpacesW",  SetLastError = True, CharSet = CharSet.Unicode)]

static extern bool PathQuoteSpaces([MarshalAs(UnmanagedType.LPTStr)]System.Text.StringBuilder lpsz);

''' Searches a path for spaces. If spaces are found, the entire path is enclosed in quotation marks.

''' <returns>TRUE if spaces were found; otherwise, FALSE.</returns>

<DllImport("shlwapi.dll", EntryPoint:="PathQuoteSpacesW",  SetLastError:=True, CharSet:=CharSet.Unicode)> _

Public Function PathQuoteSpaces(<MarshalAs(UnmanagedType.LPTStr)>lpsz As System.Text.StringBuilder) As <MarshalAs(UnmanagedType.Bool)> Boolean

Public Declare Sub PathQuoteSpaces Lib "shlwapi" Alias "PathQuoteSpacesA" _

/// Removes all leading and trailing spaces from a string.

/// <param name="pszPath">A pointer to a null-terminated string of length MAX_PATH from which to strip all leading and trailing spaces.</param>

''' Removes all leading and trailing spaces from a string.

''' <param name="pszPath">A pointer to a null-terminated string of length MAX_PATH from which to strip all leading and trailing spaces.</param>

/// Replaces the extension of a file name with a new extension. If the file name does not contain an extension, the extension will be attached to the end of the string.

''' Replaces the extension of a file name with a new extension. If the file name does not contain an extension, the extension will be attached to the end of the string.

[DllImport("shlwapi.dll", EntryPoint = "PathUnQuoteSpacesW",  SetLastError = True, CharSet= CharSet.Unicode)]

static extern void PathUnQuoteSpaces([MarshalAs(UnmanagedType.LPTStr)]System.Text.StringBuilder lpsz);

<DllImport("shlwapi.dll", EntryPoint:="PathUnQuoteSpacesW",  SetLastError:=True, CharSet:=CharSet.Unicode)> _

Public Sub PathUnQuoteSpaces(<MarshalAs(UnmanagedType.LPTStr)>lpsz As System.Text.StringBuilder)

Public Declare Sub PathUnquoteSpaces Lib "shlwapi" Alias "PathUnquoteSpacesA" _

Raymond Chen, a popular Microsoft blogger, recommends that you not worry about leaving keys because it's per-user data anyway and in many environments it's preferable to leave it behind. Definitely do not try to enumerate all user profiles to remove the keys for the other users because in the case of roaming profiles you'll likely corrupt a lot of stuff. If you want to remove all traces of your program, one alternative is to write your own SHMessageBoxCheck dialog and store the preference wherever you want. Source: http://blogs.msdn.com/oldnewthing/archive/2007/09/17/4948130.aspx

        public short AceSize;

    ' Get an array of ACEs

Set dwAclRevision to ACL_REVISION_DS if the access control list supports object-specific ACEs, otherwise use ACL_REVISION.

            CSIDL_NETWORK           = 0x0012,    // Network Neighborhood (My Network Places)

        /// A file system directory containing the link objects that may exist in the My Network Places virtual folder.

        CSIDL_NETWORK       = 0x0012,    // Network Neighborhood (My Network Places)

Partially complete... http://workspaces.gotdotnet.com/dm

Partially complete... http://workspaces.gotdotnet.com/dm

Partially complete... http://workspaces.gotdotnet.com/dm

Partially complete... http://workspaces.gotdotnet.com/dm

It seems szTarget should start and end with a double-quote if it contains spaces -- so, you should always quote it. szShortcut should end with ".lnk".

    Dim i, numberOfInterfaces as Integer

    numberOfInterfaces = i

    For i = 0 to numberOfInterfaces - 1

//note that for this to work you will need to change the signature from 'int nIndex' to 'GWL nIndex' in all three places

//note that for this to work you will need to change the signature from 'int nIndex' to 'GWL nIndex' in all three places

' Purpose: stript the string from non-letter characters and replace by spaces

// Runs notepad and places it's window into form.

/// The SetProp function adds a new entry or changes an existing entry in the property list of the specified window. The function adds a new entry to the list if the specified character string does not exist already in the list. The new entry contains the string and the handle. Otherwise, the function replaces the string's current handle with the specified handle.

    ///         Places the window at the bottom of the Z order. If the hWnd parameter identifies a topmost

    ///         Places the window above all non-topmost windows (that is, behind all topmost windows). This

    ///         <term>HWND_TOP ((HWND)0)</term><description>Places the window at the top of the Z order.</description>

    ///         Places the window above all non-topmost windows. The window maintains its topmost position

        ///     Places the window at the top of the Z order.

        ///     Places the window at the bottom of the Z order. If the hWnd parameter identifies a topmost window, the window loses its topmost status and is placed at the bottom of all other windows.

        ///     Places the window above all non-topmost windows. The window maintains its topmost position even when it is deactivated.

        ///     Places the window above all non-topmost windows (that is, behind all topmost windows). This flag has no effect if the window is already a non-topmost window.

    private const int LF_FACESIZE = 32;

        /// than <see cref="LF_FACESIZE"/> including the terminating '\0'.

        [MarshalAs(UnmanagedType.ByValTStr, SizeConst=LF_FACESIZE)]

        public const int LF_FACESIZE = 32;

            [MarshalAs(UnmanagedType.ByValTStr, SizeConst=LF_FACESIZE)]

            [MarshalAs(UnmanagedType.ByValTStr, SizeConst=LF_FACESIZE)]

            [MarshalAs(UnmanagedType.ByValTStr, SizeConst=LF_FACESIZE)]

    ''' the system uses the template to create an old-style dialog box that replaces the default dialog box.