Question : RIS - CAN WIN 2003 STANDARD & XP BE IMAGED INTO SAME FOLDER

as most will be aware in order to run ris at least 2 partitions need to be created otherwise ris will not take an image to be added to the same system partition.

ive successfully installed and ran ris and added a windows 2003 server image on my ris server in the d: partition.
ive successfully imaged a basic copy of xp on the same d: partition, although during the imaging process it states that in order to install a different image that i could:

remove old file for - windows 2003 or save as .dat for example
i decided to save the windows 2003 file as a .dat file
i then continued to created a new file specific to xp which completed with NO PROBLEMS.

the problem im having is that although xp completes its install i get unmountable device etc etc or no operating system - error or words to that affect.

i have installed both OS's on the same disc before so i dont believe it is my hdd being the issue!!

might this have something to do with both images sharing the same Windows folder?
when adding both images, should have i created a secondary folder to add xp?


Answer : RIS - CAN WIN 2003 STANDARD & XP BE IMAGED INTO SAME FOLDER

Follows a vb that replaces a specific string

Just need to instantiate these variables:

strTxtFile = "C:\Documents and Settings\" & strUser & "\Rest of the Path"
strMatch = "TEXT TO BE MODIFIED"
strNewText = "TEXT TO REPLACE ORIGINAL"
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
Dim strAllLines,strTxtFile,strMatch,objFSO,objFile,strNewText
Const ForReading = 1
Const ForWriting = 2

Set objNetwork = CreateObject("Wscript.Network")
strUser = objNetwork.UserName


strTxtFile = "C:\Documents and Settings\" & strUser & "\Rest of the Path"
strMatch = "TEXT TO BE MODIFIED"
strNewText = "TEXT TO REPLACE ORIGINAL"


'Reads the TXT file
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile(strTxtFile, ForReading)
strAllLines = objFile.ReadAll
objFile.Close

strNewText = Replace(strAllLines,strMatch,strNewText)

Set objFile = objFSO.OpenTextFile(strTxtFile, ForWriting)
objFile.WriteLine(strNewText)
objFile.Close
Random Solutions  
 
programming4us programming4us