OVH Cloud OVH Cloud

multiboot

7 réponses
Avatar
Hervé
comment faire unmultiboot pour que je puisse demarrer mes 2 dd en C: . au choix
merci de votre aide

7 réponses

Avatar
carnoli
Hervé wrote:
comment faire unmultiboot pour que je puisse demarrer mes 2 dd en C:
. au choix merci de votre aide


Ce n'est pas une question de multi-boot, c'est une question de
partitionnement. Il faut que chacun de tes disques est une partition
primaire sur laquelle est installée le système d'exploitation.
Va faire un tour sur le site qui est dans ma signature, après un peu de
lecture, tes connaissances "s'accroîtront" comme dit l'auteur.

--
Amicalement
A.C
En cas de problème avec WinXX site à consulter:
http://www.bellamyjc.org/

Avatar
Michel_D
"carnoli" a écrit dans le message news:
Hervé wrote:
comment faire unmultiboot pour que je puisse demarrer mes 2 dd en C:
. au choix merci de votre aide


Ce n'est pas une question de multi-boot, c'est une question de
partitionnement. Il faut que chacun de tes disques est une partition
primaire sur laquelle est installée le système d'exploitation.
Va faire un tour sur le site qui est dans ma signature, après un peu de
lecture, tes connaissances "s'accroîtront" comme dit l'auteur.


On peut aussi avoir XP en C: sur un lecteur/partition logique par
clonage avec ensuite rectification de la lettre de lecteur dans la BDR
pour info cette manip me prend moins de 5 minutes (clonage+rectif)
avec mes utilitaires perso executable pour le clonage et script vbs
pour la rectif.


Avatar
carnoli
Michel_D wrote:

On peut aussi avoir XP en C: sur un lecteur/partition logique par
clonage avec ensuite rectification de la lettre de lecteur dans la BDR
pour info cette manip me prend moins de 5 minutes (clonage+rectif)
avec mes utilitaires perso executable pour le clonage et script vbs
pour la rectif.


Bonsoir,
Ca c'est une chose qu'elle est intéressante.... Et c'est possible
d'avoir tout ça..? Avec quelques explications.
Vous remerciant par avance.

--
Amicalement
A.C
En cas de problème avec WinXX site à consulter:
http://www.bellamyjc.org/

Avatar
Michel_D
"carnoli" a écrit dans le message news:
Michel_D wrote:

On peut aussi avoir XP en C: sur un lecteur/partition logique par
clonage avec ensuite rectification de la lettre de lecteur dans la BDR
pour info cette manip me prend moins de 5 minutes (clonage+rectif)
avec mes utilitaires perso executable pour le clonage et script vbs
pour la rectif.


Bonsoir,
Ca c'est une chose qu'elle est intéressante.... Et c'est possible
d'avoir tout ça..? Avec quelques explications.
Vous remerciant par avance.


Bon comme on peut cloner une partition ou on veux, mais la bdr
qui contient les définitions de lecteurs a aussi été copié tel quelle
et donc si l'on démarre sur la nouvelle partition on s'aperçoit
que la partition système est toujours l'ancienne (en fait c'est un
peu plus compliqué puisque l'on est à cheval sur les 2 partitions)
, il suffit de rectifier la lettre de lecteur de la partition clonée pour
que tout rentre dans l'ordre.

Donc mon script réalise cette opération aprés avoir démarrer
sur la partition clonée (chose que l'on peut réaliser soit en
rajoutant une ligne dans le boot.ini de la partition originelle
ou en démarrant avec une disquette de boot partiel).

NOTA : l'utilitaire "savepart" que je n'ai pas testé permet je
crois cette manipulation (rectif de la BDR).

Pour Info mon script (Ce n'est pas la dernière version) :

Dim Diag, Wshell, fso, source, dest, TLigne(100)
set Wshell = WScript.CreateObject("WScript.Shell")
L_Install = Wshell.RegRead("HKLMSOFTWAREMicrosoftWindowsCurrentVersionDevicePath")
'if left(L_Install,1) = "%" Then
if left(L_Install,1) <> "%" Then
wscript.echo "Ce n'est pas un système NT !!!"
else
L_Session = left(Wshell.RegRead("HKLMSOFTWAREMicrosoftWindows NTCurrentVersionSystemRoot"),2)
L_Install = left(Wshell.RegRead("HKLMSOFTWAREMicrosoftWindows NTCurrentVersionPathName"),2)
wscript.echo "Unité d'install : " & L_Install & VBCRLF & "Unité de session : " & L_Session
if L_Session <> L_Install Then
diag = MsgBox(" L'unité de la Session en cours " & VBCRLF _
& "est différente de l'unité d'Install !" & VBCRLF & VBCRLF _
& " Voulez-vous que les deux" & VBCRLF _
& " unités soient identiques ?" , vbYesNo)
If diag = vbNo Then Wscript.quit
Set fso = WScript.CreateObject("Scripting.FileSystemObject")
If not(fso.FileExists("VOLUME.REG")) Then
wscript.echo "Vous devez exporter de la base de registre la branche suivante :" & VBCRLF _
& " 'HKEY_LOCAL_MACHINESYSTEMMountedDevice' dans" & VBCRLF _
& " un fichier intitulé 'VOLUME.REG' situé à la racine."
else
Set Source = fso.OpenTextFile("VOLUME.REG", 1, false, tristatetrue)
Set Dest = fso.OpenTextFile("VOLUME_M.REG", 2, true, tristatetrue)
compteur = 0
Do While not Source.AtEndOfStream
Ligne = Source.ReadLine
L_Ansi = Conv_Uni_Ansi(Ligne)
Pos=instr(1,L_Ansi,L_Install,1)
if Pos>0 Then L_User=Mid(L_Ansi,Pos+4,Len(L_Ansi))
Pos=instr(1,L_Ansi,L_Session,1)
if Pos>0 Then L_Sys=Mid(L_Ansi,Pos+4,Len(L_Ansi))
if left(L_Ansi,1)="[" or Mid(L_Ansi,2,5)="Dos" Then
compteur = compteur + 1
TLigne(compteur) = L_Ansi
NLigne=""
else
if NLigne<>"" and left(NLigne,1)<>" " and len(L_Ansi)<36 Then
compteur = compteur + 1
TLigne(compteur) = NLigne
compteur = compteur + 1
TLigne(compteur) = L_Ansi
end if
NLigne=L_Ansi
end If
Loop
source.close
dest.write chr(255) & chr(254)
writeline_Uni(TLigne(1))
writeline_Uni(TLigne(2))
writeline_Uni(TLigne(3))
For i = 4 to compteur
Pos=instr(1,TLigne(i),left(L_User,24),1)
if Pos>0 Then Echange(L_Sys)
Pos=instr(1,TLigne(i),left(L_Sys,24),1)
if Pos>0 Then Echange(L_User)
next
dest.close
wscript.echo "Vous devez maintenant fusionner le fichier" & VBCRLF _
& "modifié 'VOLUME_M.REG' situé à la racine" & VBCRLF _
& "et ensuite redémarrer."
end if
end if
end if
Wscript.quit
'--------------------------------------------------------
Function Conv_Uni_Ansi(L1)
For j = 1 to Len(L1)
car = asc(mid(L1,j,1))
If car>30 and car<253 Then L2 = L2 & chr(car)
Next
Conv_Uni_Ansi=L2
End Function
'--------------------------------------------------------
Sub Writeline_Uni(L1)
For j = 1 to Len(L1)
dest.write chr(asc(mid(L1,j,1))) & chr(0)
Next
dest.write chr(13) & chr(0) & chr(10) & chr(0)
End Sub
'--------------------------------------------------------
Sub Echange(L_)
Ligne=left(Tligne(i),Pos+3)
if Mid(TLigne(i),2,5)="Dos" Then
Ligne=Ligne & right(L_,35)
writeline_Uni(Ligne)
else
Ligne=Ligne & Mid(L_,5,21) & ""
writeline_Uni(Ligne)
Ligne=" " & right(L_,14)
writeline_Uni(Ligne)
end if
End Sub


Avatar
carnoli
Michel_D wrote:

Pour Info mon script (Ce n'est pas la dernière version) :


Un grand Merci pour cette réponse et la copie de ton script.
N'étant pas très doué dans le domaine, peux tu me confirmer son
utilisation:Avec un éditeur de texte, je fais un copié collé et je
l'enregistre sous le format: vbs Il suffit ensuite de double cliquer
dessus pour qu'il s'exécute.... C'est ça ?...


--
Amicalement
A.C
En cas de problème avec WinXX site à consulter:
http://www.bellamyjc.org/

Avatar
Michel_D
"carnoli" a écrit dans le message news:
Michel_D wrote:

Pour Info mon script (Ce n'est pas la dernière version) :


Un grand Merci pour cette réponse et la copie de ton script.
N'étant pas très doué dans le domaine, peux tu me confirmer son
utilisation:Avec un éditeur de texte, je fais un copié collé et je
l'enregistre sous le format: vbs Il suffit ensuite de double cliquer
dessus pour qu'il s'exécute.... C'est ça ?...


Oui, et il y a des boites de dialogues de confirmation des actions
à effectuer (comme ce n'est pas la dernière version, certaines
opérations sont à réalisés en sus -> exportation/fusion bdr).


Avatar
carnoli
Michel_D wrote:

Oui, et il y a des boites de dialogues de confirmation des actions
à effectuer (comme ce n'est pas la dernière version, certaines
opérations sont à réalisés en sus -> exportation/fusion bdr).


Merci et bonne journée.



--
Amicalement
A.C
En cas de problème avec WinXX site à consulter:
http://www.bellamyjc.org/