AMSSpecialist

Publicado: **20 Jul 2014 03:08**

thanks

Publicado: **20 Jul 2014 22:29**

grxias

Publicado: **21 Jul 2014 19:49**

excelente bro

Publicado: **23 Jul 2014 09:53**

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

Publicado: **24 Jul 2014 15:31**

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

Publicado: **26 Jul 2014 05:25**

gracias

Publicado: **26 Jul 2014 08:49**

¡Hi Marsupi68!
Ya he revisado el código, encontré algunos errores pero ninguno provoca el error que menciona en la imagen 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.

Publicado: **26 Jul 2014 11:55**

dowsher escribió:¡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

Publicado: **26 Jul 2014 17:28**

abood1987 escribió:
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

Publicado: **27 Jul 2014 03:08**

are you read this On Help File ? : Imagen

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

Gracias.

gracias..

gracias :d

Publicado: **14 Sep 2014 03:59**

Gracias por el aporte se ve interezante

Publicado: **20 Sep 2014 02:43**

ok, nada

Publicado: **24 Oct 2014 20:24**

gracias

Muchas gracias lo voy a probar

gracias

THANKSSS

Publicado: **25 Feb 2015 21:57**

thanks

AMSSpecialist

Recover Files USB Virus de Accesos Directos

Re: Recover Files USB Virus de Accesos Directos

Re: Recover Files USB Virus de Accesos Directos

Re: Recover Files USB Virus de Accesos Directos

Re: Recover Files USB Virus de Accesos Directos

Re: Recover Files USB Virus de Accesos Directos

Re: Recover Files USB Virus de Accesos Directos

Re: Recover Files USB Virus de Accesos Directos

Re: Recover Files USB Virus de Accesos Directos