Recover Files USB Virus de Accesos Directos

[mpcu]

thanks

[rockgame42]

grxias

[spermanbsb]

excelente bro

[fersbrando]

Muy bueno Dowsher! Vamos a probarlo, es muy útil para tener a mano. Felicidades.

[Marsupi68]

Creo que hay un problema con su programa. lo siento por mi español ...

[omegacjfenix]

gracias

[Dow Sher]

¡Hi Marsupi68!
Ya he revisado el código, encontré algunos errores pero ninguno provoca el error que menciona en la imagen talvez el error pudo ser provocado por su sistema operativo, modifique un poco el script y probé con distintos SO y no hubo errores, por favor descarga de nuevo el programa e intenta de nuevo espero que el error no vuelva a aparecer.

[abood1987]

¡Hi Marsupi68!
Ya he revisado el código, encontré algunos errores pero ninguno provoca el error que menciona en la imagen talvez el error pudo ser provocado por su sistema operativo, modifique un poco el script y probé con distintos SO y no hubo errores, por favor descarga de nuevo el programa e intenta de nuevo espero que el error no vuelva a aparecer.

hi dowsher

On Refresh Button the right code is :

result = ComboBox.GetCount("ComboBox1");
while (result > 0) do
	ComboBox.DeleteItem("ComboBox1", 1);
	result = ComboBox.GetCount("ComboBox1");
end
ComboBox.AddItem("ComboBox1", "->Elija su unidad", "");
ComboBox.SetSelected("ComboBox1", 1);

drives = Drive.Enumerate();

for x, sDriver in pairs (drives) do
	sDrives = Drive.GetType(sDriver);
		if (sDrives == DRIVE_REMOVABLE) then
			sDrives = Drive.GetInformation(sDriver);
				if sDrives == nil then
					ComboBox.AddItem("ComboBox1", sDriver.." - ".."Disco extra?ble", sDriver);
				else
					ComboBox.AddItem("ComboBox1", sDriver.." - "..sDrives.Label, sDriver);
				end
		end
end

look at the line 14 and 15 and 18 what is happened

[Dow Sher]

hi dowsher

On Refresh Button the right code is :

result = ComboBox.GetCount("ComboBox1");
while (result > 0) do
        ComboBox.DeleteItem("ComboBox1", 1);
        result = ComboBox.GetCount("ComboBox1");
end
ComboBox.AddItem("ComboBox1", "->Elija su unidad", "");
ComboBox.SetSelected("ComboBox1", 1);
............................................................................

look at the line 14 and 15 and 18 what is happened

Hi abood1987.
Agradezco mucho tu ayuda pero el script que has publicado no es correcto, segun Help AMS
La unica forma de que Drive.GetInformation devuelva nil es que no haya un disco en la unidad de CD-ROM:

Offtopic:

Note: If the target drive is a CD-ROM drive or floppy drive, there must be a disk in the drive for this action to work. If there is no disk in the drive, nil is returned.

Yo descarto las unidades de CD-ROM y de disco flexible con:

sDrives = Drive.GetType(sDriver);
                if (sDrives == DRIVE_REMOVABLE) then
                .....................................................

y con esto Drive.GetInformation no puede devolver nil.
En todo caso entonces el código seria así.

result = ComboBox.GetCount("ComboBox1");
while (result > 0) do
	ComboBox.DeleteItem("ComboBox1", 1);
	result = ComboBox.GetCount("ComboBox1");
end
ComboBox.AddItem("ComboBox1", "->Elija su unidad", "");
ComboBox.SetSelected("ComboBox1", 1);

drives = Drive.Enumerate();

for x, sDriver in pairs (drives) do
	sDrives = Drive.GetType(sDriver);
		if (sDrives == DRIVE_REMOVABLE) then
			sDrives = Drive.GetInformation(sDriver);
			sDriver = String.Replace(sDriver, "\\", "");
				if sDrives.Label == "" then
					String.Replace(sDriver, "\\", "");
					Dialog.Message("", 1);
					ComboBox.AddItem("ComboBox1", "Disco extraíble ("..sDriver..")", sDriver);
				else
				Dialog.Message("", 2);
					ComboBox.AddItem("ComboBox1", sDrives.Label.." ("..sDriver..")", sDriver);
				end
		end
end

De cualquier forma agradezco que quisieras ayudar abood1987

[abood1987]

are you read this On Help File ? :

Drive.GetInformation

If an error occurs, nil is returned. You can use Application.GetLastError to determine whether this action failed, and why.

Drive.GetInformation

Please Read all Action Help For this Or Ok as you Like

[FRAPIDS]

Gracias.

[a.jalvarez]

gracias..

[mario147]

gracias :d

[riky1986]

Gracias por el aporte se ve interezante

[mack911]

ok, nada

[xxsolracxx]

gracias

[rockgame42]

Muchas gracias lo voy a probar

[rockgame42]

gracias

[samirmax]

THANKSSS

[hitec]

thanks