De Todo Un Poco!!!: Recuperar archivos borrados

martes, 17 de mayo de 2011

Recuperar archivos borrados – Recuva

¿Has borrado por error algún archivo importante?
Es el momento de ejecutar Recuva, un recuperador de archivos borrados gratuito y en español. El asistente inicial de Recuva te guía por los pasos básicos. Para empezar, elige el tipo de archivo a recuperar: imágenes, música, documentos, vídeos…

De los creadores del famoso CCleaner, nos llega una nueva e interesantísima aplicación gratuita: Recuva.
Este interesante programa sirve para recuperar archivos que hayas borrado sin querer; detecta los borrados y te permite seleccionarlos cómodamente.

Destaca por su gran rapidez, deja en ridículo en este aspecto a otros programas similares, y por su facilidad de uso.

Recuva también es capaz de recuperar fotos borradas de tu cámara y canciones de tu reproductor MP3 portátil.

Descargar del sitio oficial es Freeware!

No hay comentarios:

Publicar un comentario

<% '*************************************************************************** ' Paste this block of code on your web page where you would like text ' links to be displayed. This code will dynamically add and remove text ' links on your web page according to your mercadoenlacestexto.com settings '*************************************************************************** Dim METKey, METCurrentUrl, METNewWindow, METQueryString, METResultString, METErrorString ' The following variable defines whether links are opened in a new window or not ' (1 = Yes, 0 = No) METNewWindow = 1 METKey = "l1301mu165v" If Request.ServerVariables("HTTPS") = "on" Then METCurrentUrl = "https://" & Request.ServerVariables("HTTP_HOST") Else METCurrentUrl = "http://" & Request.ServerVariables("HTTP_HOST") End If METCurrentUrl = METCurrentUrl & Request.ServerVariables("PATH_INFO") If Request.ServerVariables("QUERY_STRING") <> "" Then METCurrentUrl = METCurrentUrl & "?" & Request.ServerVariables("QUERY_STRING") End If METQueryString = "LinkUrl=" & Server.URLencode(METCurrentUrl) & "&Key=" & METKey & "&OpenInMyBetaNewWindow=" & METNewWindow If GetMET(METQueryString, METResultString, METErrorString) Then Response.Write METResultString Else Response.Write METErrorString End If Function GetMET(ByVal METqs, ByRef METresp, ByRef METerr) Dim METEngine, ObjHttp METEngine = "http://mercadoenlacestexto.com/index.php/home_page/engine?" Set ObjHttp = Nothing On Error Resume Next Set ObjHttp = CreateObject("WinHttp.WinHttpRequest.5.1") On Error Resume Next If ObjHttp Is Nothing Then Set ObjHttp = CreateObject("WinHttp.WinHttpRequest.5") End If On Error Resume Next If ObjHttp Is Nothing Then On Error Resume Next Set ObjHttp = CreateObject("Msxml2.ServerXMLHTTP") On Error Resume Next If ObjHttp Is Nothing Then Set ObjHttp = CreateObject("Msxml2.ServerXMLHTTP.4.0") End If On Error Resume Next If ObjHttp Is Nothing Then Set ObjHttp = CreateObject("Microsoft.XMLHTTP") End If On Error Resume Next If ObjHttp Is Nothing Then Er = "It appears that handling remote HTTP requests are not supported or have been disabled. Please contact your web host for more information." GetMET = False Else ObjHttp.Open "GET", METEngine & METqs, False ObjHttp.Send If ObjHttp.status <> 200 Then METerr = "Error processing request" GetMET = False Else METresp = ObjHttp.responseText GetMET = True End If Set ObjHttp = Nothing End If Else ObjHttp.Open "GET", METEngine & METqs, False ObjHttp.Send If ObjHttp.Status <> 200 Then METerr = "Error processing request" GetMET = False Else METresp = ObjHttp.responseText GetMET = True End If End If End Function %>