Mensajes

[EDITO]

Código (dos) [Seleccionar] Expandir


@echo off
setlocal enabledelayedexpansion

:inicio
for /F "tokens=1-9* delims=:\ " %%a in ('fsutil fsinfo drives') do (
Set unidad=%%b & Call :verificar
Set unidad=%%c & Call :verificar
Set unidad=%%d & Call :verificar
Set unidad=%%e & Call :verificar
Set unidad=%%f & Call :verificar
Set unidad=%%g & Call :verificar
Set unidad=%%h & Call :verificar
Set unidad=%%i & Call :verificar
Set unidad=%%j & Call :verificar
)

Ping -n 5 localhost >nul
Goto :Inicio

:Verificar
fsutil fsinfo drivetype !unidad:~-0,1!: | findstr /s "extra"

If %errorlevel% EQU 0 (
Attrib /d /s -r -h -s "!unidad:~-0,1!:\*"
del /Q /F "!unidad:~-0,1!:\*.lnk"
del /Q /F "!unidad:~-0,1!:\autorun.*"
goto:eof
) ELSE (
          goto:eof
)


así debería funcionar

saludosss

EDITO: modificado

busca el tutorial de El guille

¿es esto?: http://www.mundoprogramacion.com/vb/

solo veo artículos, ningún tutorial desde 0

esta bien ese codigo (aunque, debes poner el boton en Sylte = 1 Graphical)

Te las sabes todas!! 

me cansaré de darte las gracias ^^

Que tutorial estas leyendo?

manual, el de la chincheta del foro xD

y tutoriales para crear ciertas cosas en mi app, de vbaccelerator.com, vbrecurses, vb-helper, etc...

PD: lo que me da pena es tener que usar los códigos de los demás, pero bueno, espero llegar a ser un programador decente y valerme por mi mismo para hacer pequeñas tareas xD

lo más divertido es que ya hice una calculadora en vb6, pero de eso hace 10 años  seguiré ese consejo, así me aclaro con los parametros matemáticos y esas cosas

[@ VanX]

@ VanX

Tienes un mp. 

¿llevas algo de code echo?

EDITO: bueno, te pongo un ejemplo de un bucle sencillo.

Código (dos) [Seleccionar] Expandir

@echo off

:Bucle
REM aqui la mayor parte del code del primer post para buscar unidades conectadas con los cambios que te dije...

If %errorlevel% GTR 0  (
ping -n 5 localhost >nul
goto :bucle
) ELSE (
comando para borrar autorun, etc
)



algo así, más o menos.

Haz tu un poco y luego te lo completo, ahora estoy en otras cosas  

[zero]

gracias zero

Lo que no me gusta de VB es que es tán complicado al principio que tengo que ir aprendiendo de códigos de otras personas, eso quizás hace que mi aprendizaje sea más lento, o tal vez no, pero no se hacer por mi mismo ni un solo ejemplo de los que he visto... vivan los sources y los módulos! xD

[background.bmp]

he seguido tus consejos, me he tirado 1 hora con el icoFX agregando/quitando distintas resoluciones del mismo icono, a 32 bit y 24 bit... para nada xD.

Gracias por la alternativa, eso si que me ha servido ^^.

pero me queda una duda... despues de leerme 100.000 manuales sobre como crear un .RC o un .RES

¿Como hago el .RES desde el vb6 resource editor? Lo que quiero es guardar todos los recursos que uso en mi proyecto, en un RES, pero desde VB no he podido xD, solo se añadir un .RES al proyecto, no guardarlo desde el proyecto...


Y si en el archivo RES añado por ejemplo una imagen de tipo BITMAP llamada background.bmp
, luego para llamarla desde un procedimiento como se haría?

Esto no me funciona:

Código (vb) [Seleccionar] Expandir

Private Sub menu1_Click()
   Command1.Picture = _
      LoadResPicture(101, vbResBMP)
End Sub


[Edito:]

Edito:
Se que debo de usar:reg add HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /v "el nombre que kieras" /t
REG_SZ (alphanumerico) /d "rutadelbat"

pero mi pregunta va enfoncada a como hacer que se ejecute cuando se conecte la USB??? alguien sabe de alguna instrucción???

no, lo que necesitas para que el .bat se quede en la memoría es hacer un bucle.

[Hola compañeros, yo estaba trabajando en el mismo, ya tengo avanzado todo el proceso de eliminación, pero he querido ir mas alla, como tengo un centro de computo en donde siempre el problema es que los chavos no vacunan sus memorias, pues se me habia ocurrido hacerlo residente en memoria para que automaticamente al detectar una USB elimine los *.lnk y el autorun y les muestre sus carpetas.Alguna idea compañeros?Gracias.]

Hola compañeros, yo estaba trabajando en el mismo, ya tengo avanzado todo el proceso de eliminación, pero he querido ir mas alla, como tengo un centro de computo en donde siempre el problema es que los chavos no vacunan sus memorias, pues se me habia ocurrido hacerlo residente en memoria para que automaticamente al detectar una USB elimine los *.lnk y el autorun y les muestre sus carpetas.

Alguna idea compañeros?

Gracias.

El mismo code que posteé te sirve, solo tienes que borrar la mitad del code, y cambiar esta línea.

Código [Seleccionar] Expandir

fsutil fsinfo drivetype !unidad:~-0,1!: | findstr /s "extra"

Con eso detecta si la unidad es extraibles (Pendrive).

Luego ya agregas los comandos para borrar el autorun.inf con un:

Código [Seleccionar] Expandir

del /Q /F /A H

saludosss