Jump to content

m3_del

Member
  • Posts

    5
  • Joined

  • Last visited

  • Donations

    0.00 USD 
  • Country

    United States

About m3_del

m3_del's Achievements

0

Reputation

  1. Works for me. Thanks! Here is the vmscsi.sys vmscsi.7z
  2. Hi, if anyone can help out, it would be much appreciated. I am trying to have my script initiate either scan or loadstate on a remote machine. I think I am close now, but when I run the create method it returns the "cannot find path" error. I am not sure why this is happening. He is the script 'AutomateUSMT.vbs 'Script to automate USMT commands 'Author: Steve Stern 'Modified Last: Craig Smith 'Updated: 3-07-2008 ' 'ToDo 'Change the UI 'Validate User profile exists 'Validate USMT is there (maybe automatically move the needed files there) 'Verify PC is Turned on and able to be reached (Ping?) 'Let Admin know when process finishes 'Auto start loadstate on new machine when scanstate finishes ' '--------------------------------------------- Option Explicit Dim objWMIService, objProcess, strUE, strTags, strSTag Dim strShell, objProgram, strComputer, strScanState, strLoadState Dim strUser, strServer, strInput, strUSMT, strUI, strExe Dim objStartup, intProcessID, objConfig, intReturn 'strServer = " \\FQDN\tempxfer$\" 'Keep the space in front strServer = " c:\USMT" 'Delete this line when not testing locally strScanState = Chr(34) & "c:\program files\USMT301\ScanState.exe" & Chr(34) strLoadState = Chr(34) & "%programfiles%\USMT301\LoadState.exe" & Chr(34) strTags = " /i:migapp.xml /i:migsys.xml /i:miguser.xml /c" 'Keep the Space in the front strSTag = " /targetxp" 'Keep the space in the front strUE = " /ue:*\*" 'Keep the space in the front Do strUser = (InputBox("Input the AD name of the User to migrate","User Name")) If strUser <> "" Then strInput = True End If Loop until strInput = True 'strUI = " /ui:" & chr(34) & "faa\" & strUser & chr(34) strUI = " /ui:" & strUser 'Delete This Line when not using with local accounts strInput = "" Do strComputer = (InputBox("Input the Computer DNS Name","Computer Name")) If strComputer <> "" Then strInput = True End If Loop until strInput = True strInput = "" Do strUSMT = (InputBox("Type ""Scan"" for ScanState and ""load"" for LoadState","USMT")) If strUSMT <> "" Then strInput = True End If Loop until strInput = True Select Case strUSMT Case "scan" 'Build the command strExe = Chr(34) & strScanState & chr(34) & strServer & strUser & chr(34) & strSTag & strTags & Chr(34) runUSMT Case "load" 'Build the command strExe = strLoadState & chr(34) & strServer & strUser & chr(34) & strTags & _ strUE & strUI runUSMT Case Else MsgBox = ("You did not enter a correct option") WScript.Quit End Select Sub runUSMT set objWMIService = getobject("winmgmts://"& strComputer & "/root/cimv2") set objStartup = objWMIService.Get("Win32_ProcessStartup") Set objConfig = objStartup.SpawnInstance_ objConfig.ShowWindow = 0 objConfig.PriorityClass = 32 set objProcess = objWMIService.Get("Win32_Process") intReturn = objProcess.Create(strExe, Null, objConfig, intProcessID) 'Error Checking Select Case intReturn Case 0 WScript.echo "Process Started Successfully. Process ID: " _ & intProcessID Case 2 WScript.echo "Access is Denied" Case 3 WScript.echo "Insufficient Privilege" Case 8 WScript.echo "Unknown Failure" Case 9 WScript.echo "Path Not Found" Case 21 WScript.echo "Invalid Parameter" Case Else Wscript.echo "Something went horribly wrong" End Select End Sub
  3. Read RogueSpears pinned topic at the top. RipRep images are HW+HAL dependent but RISETUP based images are not. "RISETUP images. RISETUP images are the first image type from RIS. Essentially, they are a copy of the CD directory structure (i386 directory) on a file share on the RIS server. RISETUP images offer one main advantage over RIPREP images in RIS: They are not HAL dependent."
  4. The solution you are looking for is autoimage by roguespear We have 2 images one for all desktops and one for all laptops (Software differences) All we have to do post install is set up lotus notes :S http://doitrightconsulting.net/forum/
  5. Run from the command line this string works, but when packaged I get config failed error. I am sure it is the second set of quotes. I have tried single quotes with no luck and also have tried no quotes. This is for installing via svcpack ;!@Install@!UTF-8! RunProgram="RunHiddenConsole.exe /w setup.exe /s /v"PROGDIR=C:\Lotus\Notes DATADIR=C:\Lotus\Notes\Data /qn"" ;!@InstallEnd@! Anyone know what I might be doing wrong or perhaps a work around for this?
×
×
  • Create New...