leujax

'Lut ToutouLinux http://www.moulinier.net/ , remarquable par sa légéreté, tres didactique en plus ,en fr sinon Dawn SmallLinux (moins bien à mon avis) on en parlai (en USB ),ici : http://forum.zebulon.fr/index.php?showtopi...t=#entry1156020 @+

Pour faire un tri du probléme;tu peux essayer un liveCd/ou cléUsb de boot Linux type Kaella -en Cd : http://www.framasoft.net/article2551.html -et en USB : http://spirale.aneantis.com/message-KAELLA...2_0-197259.html ,ou meme un CD de réparation comme :Slax LFI ,qui detecte bien les lecteurs USB en automontage au boot pour voir ce que ca donne ... @+

Salut Que donne la gestion disque ? (toucheWin+R,tape DISKMGMT.MSC ou copie/colle ceci dans bloc-notes: Set wshell=CreateObject("WScript.Shell") wshell.Run"DISKMGMT.MSC" à renommer gererdisque.vbs avnt de cliquer dessus ) le disque USB apparait -il ,"sain", avec lettre attribué ? @+

Oups! Voici le bon lien direct de "SpeedWebServ": http://clement.reinier.free.fr/scuny/Setup_V1.2.6.zip et aussi ici cité la #14: http://forum.zebulon.fr/index.php?showtopic=137103&st=0 @+

Salut Un petit logiciel de Scuny( chez Tesgaz ) pour aider à gagner du temps en le faisant "SpeedWebServ" ; @+

Salut En plus rapide en fonctionnement tu peut essayer enLive CD "Kaella "avec l'option cheatcode' knoppix toram ' au boot (cela charge le cd en ram) ou la version Knoppix modifié par des Nippons (en anglais ,heureusement!) "accelerated knoppix" @+

Salut ...Et Scuny chez Tesgaz a creé un petit soft "SpeedWebServ" pour désactiver / activer les services en sachant pourquoi http://clement.reinier.free.fr/scuny/Setup_V1.2.6.zip @+

Bonjour Wullfk : Des liens interessants qui devrai faciliter ton projet, ICI: http://forum.framasoft.org/viewtopic.php?t=28188 à+

Facile ! :P >>> http://www2.ac-lyon.fr/services/cdri/trucs/autorun.html http://www.sur-la-toile.com/viewTopic_1056...un-AUTORUN.html @+

>>Bien, mais dans ce cas change le titre du sujet : "CD auto-AMORCABLE" peut se comprendre comme "bootable" et relis les différences entre Bootable et Autorun :P @+

Salut @+

C'etait pas tres net... mais dans ce cas ,pourquoi réinventer la roue à coté de CD-DVD comme LoliWin : http://www.framasoft.net/article2604.html, the open Cd : http://www.framasoft.net/article1816.html et meme : http://www.framasoft.net/rubrique216.html il existe deja une palanqué de clés hyper riches en softs comme la Framakey (l'ancetre!) et mieux la Liberkey, bureau_de_poche, etc.; etc.. et pour avoir testé depuis longtemps (j'ai meme construit une clé bootable comme decrit plus haut,avec en plus un dossier "éxécutables" remplis de softs triés sur les clés cités, le tout accroché au trousseau de clés (de serrures! ): utilisable : -soit en boot -soit dans windows du PC -soit dans Linux du PC (avec l'emulateur Wine) -soit dans le Linux (ToutouLinux) de la clé! toujours avec Wine donc:universelle je dirai qu'à mon humble avis,que je partage et qui n'engage que moi : pas photo avec un DVD ,fragile,encombrant et pas forcemment simple pour les MAJ logiciels et autres.. @+

Bonjour En fait il en existe deja un paquet de CD de ce type: UBCD, des BartPE(UBCDWin4,Bouldows etc) et moins legal (...) je pense qu'il vaut mieux creer une Clé USB de Boot :avantage ,plus souple,facilement modifiable (surtout pour les MAjour)on peut ajouter un microLinux(DSL ou mieux:toutoulinux), la plupart des CM accepte actuellement le boot en USB; avec un bootloader comme Grub4Dos ou Wingrub sur la Clé ,voire meme en multipartitions cela est super utile.. un grand spécialiste" jaclaz " ( voir Google) et : http://www.911cd.net/forums//index.php?showtopic=18846 http://www.911cd.net/forums//index.php?showforum=37 en (tres,tres)resumé: - formatage de la partition de clé avec PeToUSB -installation de bootloader Grub4dos ou WinGrub (options: ajouter un petit "boot.ini"+NTLDR+NTdetect.com si besoin) -création du fichier texte essentiel "menu.lst"(c'est le plus dur..faut tatonner) -copie des executables,voir des images de D7 de boot ou autres sur la clé (DBAN.ima,Memtest etc..) rebooter le pc et intense satisfaction (ou décéption selon le cas!) @+

Re )@+(

'lut -OnLine Armor http://forum.pcastuces.com/sujet.asp?f=25&s=35606 est encore récent et peu connu mais si j'en juge par la saturation des serveurs de download, ca ne devrait pas durer.. -Zone Alarm ,outre sa relative inéfficacité ,est suspecté d'etre ,avec d'autres, pîégé par des backdoors de la NSA: http://assiste.forum.free.fr/viewtopic.php?t=19358 autre raison de l'éviter.. @+

Salut Tu as Vista Drive Icon http://drvicon.sf.net/ en GPL , signalé par Falkra sur son merveilleux blog www.libellules.ch peut se lancer au boot sans souci.. @+

Salut Tourane ,grand bidouilleur spécialiste des tests de clés USB reponds ici : http://spirale.aneantis.com/message-NEW_Te...des-196392.html et http://spirale.aneantis.com/message-Tests_...ton-201814.html @+

bonjour Essaye de formater ta clé avec "PetoUsb" il m'a sauvé 5 clés qui refusait tout softs de formatage! http://french.osstrans.net/software/petousb.html ne laisse que ta clé branché,lance l'executable "PtoUsb" >>refresh>>enable diskformat;coche 'quick format'et 'enable LBA' >>start sinon tu peut essayer avec le genial Testdisk de C.Grenier (beaucoup plus complexe à manier: >>tuto de Romsk : http://forum.pcastuces.com/sujet.asp?f=1&s=102819 ) @+

Salut Pour les Updates de Win ,tu as ce remarquable script concocté par le Maitre JC Bellamy (je le met in-extenso, n'ayant plus le lien sous la pogne,un peu long, je m'en excuse. :P .) A copier/coller ds le blocnotes et renommer "deluninstall.vbs" avant de cliquer dessus.. ' ---------------------------------------------------------- ' Script de suppression des dossiers de désinstallation de ' hotfixes sous Windows 2000, XP, 2003 ... ' ' Syntaxe: delUninstall ' ' ' JC BELLAMY © 2003-2005 ' Mises à jour : ' 16/08/2005 : ajout de la suppression des fichiers log ' ---------------------------------------------------------- On error resume next Const SW_HIDE=0 Const SW_SHOWNORMAL=1 ColorBack="""#FFFFD8""" BGProgressON="blue" BGProgressOFF=ColorBack Const HKEY_CURRENT_USER = &H80000001 const HKEY_LOCAL_MACHINE = &H80000002 Const REG_SZ = 1 Const REG_EXPAND_SZ = 2 Const REG_BINARY = 3 Const REG_DWORD = 4 Const REG_MULTI_SZ = 7 Dim shell,fso,oIE,NbHF,HFFolders(),HFKeys(),HFarticle() Set shell = WScript.CreateObject("WScript.Shell") Set fso = WScript.CreateObject("Scripting.FileSystemObject") shell.Popup "Veuillez patienter quelques instants ...",3,"Recherche des dossiers de correctif et service pack",64 ' Autoriser le contenu actif à s'exécuter dans les fichiers de la zone Ordinateur local LockDown="HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_LOCALMACHINE_LOCKDOWN\" Keysec1=LockDown & "iexplore.exe" Oldvalue1=shell.RegRead(Keysec1) If Err.Number<>0 Then Err.Clear Oldvalue1=1 End If shell.RegWrite Keysec1,0,"REG_DWORD" Keysec2=LockDown & "Settings\LOCALMACHINE_CD_UNLOCK" Oldvalue2=shell.RegRead(Keysec2) If Err.Number<>0 Then Err.Clear Oldvalue2=0 End If shell.RegWrite Keysec2,1,"REG_DWORD" ficInit = GetPath() & "deluninstall.html" Titre="Suppression des dossiers de désinstallation de hotfixes" Set ts = fso.CreateTextFile(ficInit, True) ts.writeline header ts.writeline ScriptBtn Windir=shell.ExpandEnvironmentStrings("%systemroot%") Key="HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\" LastKey="HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Applets\Regedit\LastKey" ts.writeline "Dossier système : <b>" & Windir & "</b>" ts.writeline "<hr><form name=""strategyForm"">" ts.writeline "<table border=""1"">" ts.writeline "<tr><td valign=""top"" bgcolor=""#C0C0C0"">Suppr.</td><td bgcolor=""#C0C0C0"">Lien MSDN</td><td bgcolor=""#C0C0C0"">Dossier</td><td bgcolor=""#C0C0C0"">Clef BDR</td></tr>" ts.writeline "<tr><td valign=""top"" bgcolor=""#C0C0C0""><input type=""checkbox"" name=""allselect"" onClick='SetSelect()'></td>" ts.writeline "</td><td bgcolor=""#C0C0C0"">Tout (dé)selectionner" ts.writeline "</td><td bgcolor=""#C0C0C0""> " ts.writeline "</td><td bgcolor=""#C0C0C0""> </td></tr>" set fWindir=fso.GetFolder(Windir) set collf=fWindir.SubFolders Index=0 For each subf in collf fName=subf.Name lName=len(fName) Uninst=false Suffixe="" If InStr(1,fName,"$",vbTextCompare)=1 then Suffixe=GetKeyFromFolder(fName) If Suffixe<>"" Then Index=Index+1 redim preserve HFFolders(Index),HFKeys(Index),HFarticle(Index) NumArticle="" HFFolders(Index-1)=fName HFKeys(Index-1)=Suffixe ts.writeline "<tr><td valign=""top"" id=""HF" & Index & """>" ts.writeline "<input type=""checkbox"" name=""CB" & Index & """></td>" HelpLink=Shell.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\" & Suffixe & "\HelpLink") If Err.number=0 Then p=InstrRev(HelpLink,"=") If p>0 Then NumArticle=Mid(HelpLink,p) ts.writeline "<td><a href=""" & HelpLink & """ target=""_blank"">MSDN " & Numarticle & "</a></td>" else Err.Clear ts.writeline "<td> </td>" End If HFarticle(Index-1)=NumArticle ts.writeline "<td><a href=""#" & fName & """ onClick='Explore(""1"& fName & """)'>" & fName & "</a></td>" ts.writeline "<td><a href=""#" & Suffixe & """ onClick='Explore(""2"& Suffixe & """)'>" & Suffixe & "</a></td>" ts.writeline "</tr>" end if Next NbHF=Index ts.writeline "</table>" ts.writeline "<input type=""button"" value=""Supprimer"" name=""B1"">" ts.writeline "<input type=""button"" value=""Quitter"" name=""B0"">" ts.writeline "</form>" ts.writeline ProgressBar ts.writeline "<font size=""1"">JCB © 2005</font>" ts.writeline "</body></html>" ts.close codeRet=RunIE(640,480) If coderet<=0 Then If coderet=0 Then oIE.Quit wscript.quit end if NbDel=0 For i = 1 To NbHF Action=eval("oIE.document.strategyForm.CB" & i & ".checked") Taux=i*100/NbHF If Action Then NbDel=NbDel+1 fso.DeleteFolder Windir & "\" & HFFolders(i-1),true LogFile= Windir & "\" & HFKeys(i-1) & ".log" If fso.FileExists(LogFile) Then fso.DeleteFile LogFile,true shell.RegDelete Key & HFKeys(i-1) & "\" msgerr="" If err.number<>0 Then msgerr=" Erreur suppression" err.clear End If SetProgress "Suppr." & HFarticle(i-1) & msgerr,taux else SetProgress " ",Taux End If Next oIE.Quit If NbDel>1 Then pluriel="s" else pluriel="" wscript.echo NbDel & " désinstallation" & pluriel & " de hotfixes supprimée" & pluriel ' Restauration état shell.RegWrite Keysec1,OldValue1,"REG_DWORD" shell.RegWrite Keysec2,OldValue2,"REG_DWORD" Wscript.quit '-------------------------------------------------------------------- Function RunIE(W,H) RunIE=1 ' Ouverture d'Internet Explorer Set oIE = WScript.CreateObject("InternetExplorer.Application") Do While (oIE.Busy) WScript.Sleep 100 Loop oIE.navigate ficInit oIE.Height = H oIE.Width = W oIE.MenuBar = 0 oIE.ToolBar = 0 oIE.StatusBar = 1 oIE.Top=(oIE.Document.ParentWindow.Screen.Height-oIE.Height)/2 oIE.Left=(oIE.Document.ParentWindow.Screen.Width-oIE.Width)/2 oIE.Visible = 2 shell.AppActivate Titre ' Attente d'action sur le bouton ou fermeture de la fenêtre Do WScript.Sleep 100 Selection=oIE.Document.Script.CheckSelect() If Selection<>0 Then oIE.Document.Script.ResetSelect If oIE.document.strategyForm.allselect.checked Then StrFlag="true" else StrFlag="false" For i = 1 To NbHF execute("oIE.document.strategyForm.CB" & i & ".checked=""" & StrFlag & """") Next End If FlagParam=oIE.Document.Script.CheckParam() If FlagParam<>0 Then param=oIE.Document.Script.GetParam() oIE.Document.Script.ResetParam typeobj=left(param,1) path=mid(param,2) Select Case typeobj Case "1" Shell.run "explorer /n,/root," & Windir & "\" & path & "\",1 Case "2" Shell.RegWrite LastKey, Key & path oIE.Visible = 0 shell.Run "REGEDIT",1,true oIE.Visible = 1 End Select End If Check=oIE.Document.Script.CheckVal() Loop While (Check = 0) ' Si on ferme directement IE sans passer par un bouton, ' cela provoque une erreur qui est détectée et alors ' on quitte le script If Err <> 0 Then RunIE=-1 Err.Clear else If Check=-1 Then RunIE=0 end if End Function '-------------------------------------------------------------------- ' Fonction de récupération du répertoire courant Function GetPath() Dim path path = WScript.ScriptFullName GetPath = Left(path, InStrRev(path, "\")) End Function '-------------------------------------------------------------------- Function Header s="<html><head><title>" & Titre & "</title>" & VBCRLF s=s & "<STYLE TYPE=""text/css"">" & VBCRLF s=s & "body {" & VBCRLF s=s & " font-family: Verdana;" & VBCRLF s=s & " font-size: 8 pt }" & VBCRLF s=s & " h1, h2, h3, h4, h5 { font-family: Verdana }" & VBCRLF s=s & "table {" & VBCRLF s=s & " table-border-color-light: " & ColorBorderL &";" & VBCRLF s=s & " table-border-color-dark: " & ColorBorderD &";" & VBCRLF s=s & " font-size: 8 pt;" & VBCRLF s=s & " font-family: Verdana }" & VBCRLF s=s & ".progressOFF {background-color :" & BGProgressOFF & ";}" & VBCRLF s=s & ".progressON {background-color :" & BGProgressON &";}" & VBCRLF s=s & "</STYLE></head><body bgcolor=" & ColorBack &">" header=s End Function '-------------------------------------------------------------------- Function ScriptBtn s="<script language=""VBScript""> " & VBCRLF s=s & "<!--" & VBCRLF s=s & "Dim ready,FlagParam,Param,Selection" & VBCRLF s=s & "Sub B0_OnClick" & VBCRLF s=s & "ready=-1" & VBCRLF s=s & "End Sub" & VBCRLF s=s & "Sub B1_OnClick" & VBCRLF s=s & "ready=1" & VBCRLF s=s & "End Sub" & VBCRLF s=s & "function Explore(filename)" & VBCRLF s=s & "FlagParam=1" & VBCRLF s=s & "Param=filename" & VBCRLF s=s & "End function" & VBCRLF s=s & "Sub Window_OnLoad()" & VBCRLF s=s & "ready=0" & VBCRLF s=s & "FlagParam=0" & VBCRLF s=s & "Param=""""" & VBCRLF s=s & "Selection=0" & VBCRLF s=s & "End Sub" & VBCRLF s=s & "Public Function CheckVal()" & VBCRLF s=s & "CheckVal=ready" & VBCRLF s=s & "End function" & VBCRLF s=s & "Public Function CheckParam()" & VBCRLF s=s & "CheckParam=FlagParam" & VBCRLF s=s & "End function" & VBCRLF s=s & "Public Sub ResetParam()" & VBCRLF s=s & "FlagParam=0" & VBCRLF s=s & "End sub" & VBCRLF s=s & "Public Function GetParam()" & VBCRLF s=s & "GetParam=Param" & VBCRLF s=s & "End function" & VBCRLF s=s & "Public Function CheckSelect()" & VBCRLF s=s & "CheckSelect=Selection" & VBCRLF s=s & "End function" & VBCRLF s=s & "Public Sub ResetSelect()" & VBCRLF s=s & "Selection=0" & VBCRLF s=s & "End sub" & VBCRLF s=s & "Public Sub SetSelect()" & VBCRLF s=s & "Selection=1" & VBCRLF s=s & "End sub" & VBCRLF s=s & "'-->" & VBCRLF s=s & "</script>" ScriptBtn=s End Function '-------------------------------------------------------------------- Function ProgressBar s=s & "<table id=""tabprog"" border=""0"" cellpadding=""0"" cellspacing=""0"" style=""border-collapse: collapse"" bordercolor=""#111111"">" & VBCRLF s=s & "<tr><td>" & VBCRLF s=s & "<table border=""0"" cellpadding=""2"" cellspacing=""2"" style=""border-collapse: collapse"" bordercolor=""#111111"">" & VBCRLF s=s & "<tr>" & VBCRLF For indl = 1 To 20 s=s & "<td id=""c" & indl &""" class=""ProgressOFF""> </td>" & VBCRLF Next s=s & "</tr></table></td></tr></table>" & VBCRLF s=s & "<table><tr><td id=""lib""> </td></tr></table>" & VBCRLF ProgressBar=s End Function '-------------------------------------------------------------------- Sub SetProgress(lib,taux) set objLib=oIE.Document.All("lib") set objTab=oIE.Document.All("tabprog") objTab.border="1" k=int(taux/5) objLib.innerhtml=lib for numc= 1 to 20 set objCell=oIE.Document.All("c" & numc) if numc<=k then className="progressON" else className="progressOFF" objCell.className=className next End Sub '-------------------------------------------------------------------- Function GetKeyFromFolder(folder) GetKeyFromFolder="" Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\default:StdRegProv") strKeyPath = "SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall" oReg.EnumKey HKEY_LOCAL_MACHINE,strKeyPath,arrSubKeys trouve=false For Each subkey In arrSubKeys oReg.GetStringValue HKEY_LOCAL_MACHINE,strKeyPath & "\" & subkey,"UninstallString",UninstallString If InStr(1,UninstallString,Folder,vbTextCompare)>0 Then trouve=true GetKeyFromFolder=subkey exit function End If Next End Function '--------------------------------------------------------------------

bah... bien content d'avoir EXIGE XPPro sur mon nouveau Dell Vostro quand on lit çà : http://www.theinquirer.fr/2007/10/08/cher_....html#more-3978 pieds et poings liés au bon vouloir de Billou/Balmer et Co ]@+

'Lut oui,fini .. voir aussi ce fil http://infomars.fr/forum/index.php?showtop...entry9930 @+

Ok je vais essayer çà, d'autant que, Arrrgh! j'avais oublié de compter la micro partition cachée Dell de backup.. @+