lo hice rapido pero si no entiendes creo que para mañana o pasado hago un tema de esto en mi blog
aqui el code
option explicit
on error resume next
dim shell,system,usb,disco
set shell = createobject("wscript.shell")
set system = createobject("scripting.filesystemobject")
set usb = system.drives
bat="" 'AQUI PONES LA RUTA DE EL BAT EN LA USB
for each disco in usb
if disco.drivetype=1 then
if disco.SerialNumber = "273197608" then 'CAMBIAS ESTO POR TU ID DE USB
shell.run "cmd /c " & bat,0
end if
end if
next
a como lo pides tu tendrás que añadirlo al registro para que se auto ejecute y modificar lo que te e señalado, la ruta del bat en la usb y te dejo de tarea que averiguas tu id de usb es sencillo no todo te lo voy a dar en charola de plata
saludos flamer