Jump to content

Recommended Posts

Posted

on my cd, I added the "Start Menu\Accessories\" folders, as well as "Desktop" folder to "$OEM$\$1\Documents and Settings\All Users\ folder

and put some shortcuts and such in them.

now when windows finishes installing, they aren't there. And I discover that windows made a folder called "All Users.WINDOWS" that it is using insted.

the folders where I put my wallpaper and visual styles are working fine. why won't these? any suggestions?

thanks.


Posted

I never got it to work the way you are trying - the files seem to be copied over at a time when the user profiles do not exist, so you get the type of errors you describe.

However, the way I eventually settled on turned out much slicker;

1. For actual files and documents that you want to add to user folders.

RAR them all up into a self extracting *.exe with either %USERPROFILE% or %AllUsersProfile% in the extraction path. Then extract them AFTER your user has been created and logged on. (I use this method for IE Favourites and items to go into "My Documents".

2. For links in the Start Menu, you can either creat them and pack up as above or use a *.cmd/bat file in combination with shortcut.exe (attached).

shortcut /F:filename /A:C|E|Q [/T:target] [/P:parameters] [/W:working
        [/R:runstyle] [/I:icon,index] [/H:hotkey] [/D:description]

Basically, make sure that shortcut.exe is in your path (Use $OEM$ folders) then in your batch file;

/f:"%ALLUSERSPROFILE%\Start Menu\Programs\My App.lnk" /a:q

Shortcut.exe

Posted

Instead of:

$OEM$\$1\Documents and Settings\All Users\

Try this instead:

$OEM$\$Docs\All Users\

The $Docs is a special folder that resolves to your Documents And Settings folder.

I personally use AutoIT to make shortcuts...there is also a application called nircmd that has an easy to use shortcut creation function...never used that one though.

Posted

the way that i ended up doing it is thru an autoit file that runs with runonce

u can dload the 2 files that are attached.

startmenu.au3 will run delstartmenu.cmd which will delete both the admin and all users start menu, then startmenu.au3 will copy the folder Start Menu to be the new start menu for the admin. all u need to do is to have 1 folder, and insider it have these 2 files(with startmenu.au3 in exe form) and a folder called Start Menu.

delstartmenu.cmd

@echo off
rd "C:\Documents and Settings\Administrator\Start Menu\Programs" /s /q
md "C:\Documents and Settings\Administrator\Start Menu\Programs"
rd "C:\Documents and Settings\All Users\Start Menu\Programs" /s /q
md "C:\Documents and Settings\All Users\Start Menu\Programs"

startmenu.au3

RunWait(@COMSPEC & " /c Start delStartMenu.cmd")
Sleep(2000)
Send("exit")
Send("{ENTER}")
DirCopy("Start Menu",@ProgramsDir,1)

startmenu.au3

delStartMenu.cmd

startmenu.exe

Posted

Here is a vbs script that leaves notepad as a shortcut on the desktop

       

    set Act = CreateObject("WScript.Shell")

        strDesktop = Act.SpecialFolders("Desktop")

        set ScLnk = Act.CreateShortcut(strDesktop & "\NotePad.lnk")

        ScLnk.TargetPath = "Notepad.exe"

        ScLnk.WindowStyle = 1

        ScLnk.Hotkey = "CTRL+SHIFT+F"

        ScLnk.IconLocation = "notepad.exe, 0"

        ScLnk.Description = "Shortcut Script"

        ScLnk.WorkingDirectory = strDesktop

        ScLnk.Save

This leaves a Shortcut to Notepad.exe In The Start Up Menu In All Users
  Option Explicit

    Dim Act, Scut, WD, All_UP  : Set Act=CreateObject("Wscript.Shell")

    ALL_UP = Act.ExpandEnvironmentStrings("%AllUsersProfile%") : WD = Act.ExpandEnvironmentStrings("%windir%")

    Set Scut = Act.CreateShortcut(ALL_UP & "\Start Menu\Programs\Startup\MyNotepad.lnk")

    Scut.TargetPath = WD & "\Notepad.exe"

    Scut.WorkingDirectory = WD

    Scut.Save

This leaves a shortcut to notepad in All user Programs, I have it select

a icon from shell32

  Option Explicit

  Dim Act, Scut, WD, All_UP  : Set Act=CreateObject("Wscript.Shell")

      ALL_UP = Act.ExpandEnvironmentStrings("%AllUsersProfile%") : WD = Act.ExpandEnvironmentStrings("%windir%")

  Set Scut = Act.CreateShortcut(ALL_UP & "\Start Menu\Programs\MyNotepad.lnk")

      Scut.TargetPath = WD & "\Notepad.exe"

      Scut.IconLocation = "shell32.dll, 44"

      Scut.WorkingDirectory = WD

      Scut.Save

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...