Hola erbuson, una vez y no me canso de decirlo; gracias por la ayuda.
A ver, mi idea es que el programa en VB, junto con los archivos en BAT, se compriman con winrar en un RAR-EXE autoejecutable. El RAR-EXE enviará los BATS a "C:\" y el ejecutable del programa en VB al escritorio para autoejecutarlo. Una vez realizadas las del VB, éste junto con los BATS serán eliminados, dejando nuevamente el RAR-EXE como unico ejecutable.
Sé que el método es un poco chapuza, pero tampoco sé lo suficiente como para hacerlo de otra manera...
Luego, el código del VB es el siguiente:
Código:
Private Sub boton_Click()
Shell ("C:\arreglar_" & btn & ".bat")
End Sub
Private Sub z_Click(Index As Integer)
btn = "z"
End Sub
Private Sub d_Click(Index As Integer)
btn = "d"
End Sub
Private Sub e_Click(Index As Integer)
btn = "e"
End Sub
Private Sub f_Click()
btn = "f"
End Sub
Private Sub g_Click(Index As Integer)
btn = "g"
End Sub
Private Sub h_Click(Index As Integer)
btn = "h"
End Sub
Private Sub i_Click(Index As Integer)
btn = "i"
End Sub
Private Sub j_Click(Index As Integer)
btn = "j"
End Sub
Private Sub k_Click(Index As Integer)
btn = "k"
End Sub
Private Sub l_Click(Index As Integer)
btn = "l"
End Sub
Private Sub y_Click(Index As Integer)
btn = "y"
End Sub
Lo que el código indica es que en el formulario seleccionas un OptionButton (la casilla circular de elección), cada una representando una unidad lógica, y buscando su bat correspondiente en C:\.
Una vez el programa ejecute el bat, se ejecuta lo siguiente (voy a poner 1 bat aleatorio, pues tengo uno distinto por unidad):
Código:
@echo off
attrib -s -h -r f:\autorun.inf
del /F /S /Q f:\autorun.inf
mkdir f:\autorun.inf
attrib +s +h +r f:\autorun.inf
rmdir /Q /S f:\recycler
type recycler>>f:\recycler
attrib +s +h +r f:\recycler
No sé si así se ve más claro.
De nuevo gracias y un fuerte saludo.
PD: El fallo me lo da siempre, seguramente debo estar haciendo algo mal.