New Hta based windos 7 recovery

**testmans** · February 16, 2011

Hta-based recovery process for creating Windows 7. All documents and fully customizable tool

Waiting for your questions and comments

excerpt link

**Kullenen_Ask** · February 16, 2011

where is download link,hta code or english explanation? please give more info

**testmans** · February 16, 2011

converted the English language code.

<HTML>

<HEAD>

<TITLE>Recovery</TITLE>

<HTA:APPLICATION

BORDER = Yes

COMPANY = pctesti.com

APPLICATION = Yes

WINDOWSTATE = maximize

INNERBORDER = No

SHOWINTASKBAR = Yes

SCROLL = no

APPLICATIONNAME = "Recovery"

NAVIGABLE = yes

CAPTION = No

>

<STYLE>

.1{color: #1B4A95; font-family: tahoma; font-size: 8pt; font-weight: bold}

.2{color: #1B4A95; font-family: tahoma; font-size: 10pt; font-weight: bold}

input.btn {color:#1B4A95; font-family: tahoma; font-size: 10pt; font-weight: bold; width: 220; background-color: #FFFFFF; border-color: #C0D4EF

}

.auto-style3 {

color: #FF0000;

}

.auto-style5 {

border: 1px solid #1B4A95;

background-color: #C0D4EF;

}

.auto-style6 {

border-style: solid;

border-color: #1B4A95;

background-color: #1B4A95;

}

.auto-style7 {

color: #7D5757;

}

.auto-style8 {

border-style: solid;

border-color: #000000;

background-image: url('background.jpg');

}

.auto-style9 {

font-size: large;

color: #093B64;

}

.auto-style10 {

color: #e51f1f;

font-weight: normal;

}

.auto-style11 {

color: #000000;

}

.auto-style12 {

text-align: left;

}

.auto-style13 {

background-color: #1B4A95;

color: #FFFFFF;

}

.auto-style14 {

color: #FFFFFF;

}

</STYLE>

</HEAD>

Sub activate

yes.disabled = false

End Sub

Sub deactivate

yes.disabled = true

End Sub

Sub XPRecovery

Const HKEY_LOCAL_MACHINE = &H80000002

strComputer = "."

Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & _

strComputer & "\root\default:StdRegProv")

strKeyPath = "System\CurrentControlSet\Control"

strValueName = "PEBootRamdiskSourceDrive"

oReg.GetStringValue HKEY_LOCAL_MACHINE, strKeyPath, strValueName, strValue

UFD = strValue

document.body.style.cursor = "wait"

Set objShell = CreateObject("Wscript.Shell")

blnAnswer = window.confirm("ALL DATA ON DRIVE C: will be deleted. Are you sure you want to continue?")

If blnAnswer Then

objShell.Run "diskpart.exe /s x:\sources\Recovery\Tools\Clean_part.txt",1,true

objShell.Run "ISA.exe /apply c:\Recovery\windowsre\hdd.wim 1 d:",1,true

Else

End If

blnAnswer = window.confirm("Prcess complated please OK button restart comuter.")

If blnAnswer Then

objShell.Run "wpeutil reboot",0,true

Else

End If

End Sub

Sub ExitHTA

Self.Close()

End Sub

</script>

<TR>

<p>

</p>

</p>

</DIV>

</TD>

</TR>

<TR>

CAUTION: Do not cut the energy during the recovery process and do not close your computer. The recovery process is complete, the computer will restart automatically.

So you can restore the factory settings you must agree to the above terms.Press Accept button click.</textarea> <br>

</TD>

</TR>

<TR>

<span class="auto-style14">I agree</span>

<span class="auto-style14">I do not accept</span></DIV> </TD>

</TR>

</TABLE>

<br>

<TR>

<TD>

</TR>

</TABLE>

<a href="http://pctesti.com/"></script>pctesti</a>

Set WshNetwork = CreateObject("WScript.Network")

HostName = WshNetwork.ComputerName

Set WshNetwork = Nothing

document.open

document.write "<p><h3 align=center><font color='white' face='Century Gothic, Tahoma, Arial, Helvetica'>Disk kullanımı " & HostName & " </font></h3>"

document.write "<div align=right> </div><hr size=1>"

document.close

</body>

</HTML>

Edited February 16, 2011 by testmans

**jaclaz** · February 16, 2011

The reference site is in Turkish, but google translate does a fair job :

http://translate.google.it/translate?u=http%3A%2F%2Fpctesti.com%2Frecovery-programlari%2Frecovery-partition-olusturmak%2Fadim-adim-recovery-partition-olusturma%2F&sl=tr&tl=en&hl=&ie=UTF-8

jaclaz

**Tripredacus** · February 16, 2011

I'm not sure if it is clear on the linked page, but you can get any tool to appear as the 6th option on the Recovery app from here:

Customizing the Windows RE Experience

**testmans** · February 16, 2011

Linked page is open. This study is it bad?

**testmans** · February 17, 2011

links updated

**Tripredacus** · February 17, 2011

Linked page is open. This study is it bad?

What is the purpose for including the winre.wim in your download? Provide the files needed, and include instructions on how to put your files in the WIM, as I have done in my HTA thread in my signature. You are not allowed to redistribute the winre.wim. Also you cannot redistribute imagex.exe. I came across this after I saw it being extracted but couldn't find it.

D:\Brute\msfn\Recovery>dir *.* /a:sh
 Volume in drive D is Data
 Volume Serial Number is F2B2-27A8

 Directory of D:\Brute\msfn\Recovery

File Not Found

D:\Brute\msfn\Recovery>cd recovery

D:\Brute\msfn\Recovery\Recovery>dir *.* /a:sh
 Volume in drive D is Data
 Volume Serial Number is F2B2-27A8

 Directory of D:\Brute\msfn\Recovery\Recovery

02/15/2011  02:43 PM       213,043,656 Winre.wim
               1 File(s)    213,043,656 bytes
               0 Dir(s)  73,616,080,896 bytes free

D:\Brute\msfn\Recovery\Recovery>attrib winre.wim -s -h +a -r

D:\Brute\msfn\Recovery\Recovery>dir
 Volume in drive D is Data
 Volume Serial Number is F2B2-27A8

 Directory of D:\Brute\msfn\Recovery\Recovery

02/17/2011  08:49 AM    <DIR>          .
02/17/2011  08:49 AM    <DIR>          ..
02/15/2011  02:37 PM             9,287 Autounattend.xml
07/14/2009  06:10 AM           481,680 imagex.exe
01/02/2010  10:12 AM             4,166 Script.cmd
10/13/2009  04:04 PM             2,575 unattend_re.xml
02/17/2011  09:46 AM       213,043,656 Winre.wim
               5 File(s)    213,541,364 bytes
               2 Dir(s)  73,605,324,800 bytes free

D:\Brute\msfn\Recovery\Recovery>

Sign In

New Hta based windos 7 recovery

Recommended Posts

testmans

Link to comment

Share on other sites

Kullenen_Ask

Link to comment

Share on other sites

testmans

Link to comment

Share on other sites

jaclaz

Link to comment

Share on other sites

Tripredacus

Link to comment

Share on other sites

testmans

Link to comment

Share on other sites

testmans

Link to comment

Share on other sites

Tripredacus

Link to comment

Share on other sites

Create an account or sign in to comment

Create an account

Sign in

Recently Browsing 0 members

Activity

Browse