Mensajes

ya lo he conseguido el problema estaba que tu habias puesto

Código [Seleccionar] Expandir

kill file file1.path & "\" & file1.filename
 
y para que funcionara lo he puesto asi y ya va bien

Código [Seleccionar] Expandir

kill file1.path & "\" & file1.filename
PD: komo se haria esto para enviar y recibir la operaciuon de subir carpeta, bajar ,borrar,cambiar de disco atraves de un winsock?
es para una aplicacion (porke estais tods pensado que es para un troyano?? pos no es pa un troyano¡¡)
gracias por todo soplo

pos no, tmp me va

no pasa nada soplo supongo que entre tanta sabiduria de lenguajes te habras confundido jeje, voy a provarlo

me responde esto kuando lo quiero eliminar pulsando el command1 :   

Código [Seleccionar] Expandir

compile error:
            sub or fuction not defined

y si quiero borrar o ejecutar un archivo que kiera dandole a un boton, como se haria el path del archivo y de la accion??

joer pos si que  era mas simple de lo que yo pensaba jeje, gracias soplo

si¡¡ ya se que hay que decirles a los controles que hemos kambiado de directorio pero eske,nose no me sale,he porbado con pathy alguna invencion mia y eske sigue sin salirme

hola, no tengo ni la mas remota idea de komo se hace eso podriais poner el codigo?, no me aclaro kon los boxlist, drive list , y demas

ok muxas gracias

yo lo he hecho asi:

creo que es mas facil de entender para los mas inexpertos mi codigo, en lugar que el de m3ll1 (que tambien esta muy bien ehh, vi que m3ll1 habia hecho el ejercicio 3 y dije haber si yo tmb soy kapaz de hacerlo (sin mirar, porsupuesto)

Este es mi codigo:

formulario1:

Código [Seleccionar] Expandir

Private Sub Command1_Click()
On Error Resume Next
If Text2.Text = "" Then
MsgBox "Tienes Que escribir una contraseña", vbInformation, "Introduzca contraseña"
Else
Form2.Show
End If
End Sub


formulario2:

Código [Seleccionar] Expandir

Private Sub Command1_Click()
On Error Resume Next
If Form1.Text2.Text = Form2.txtconfirmada.Text Then
MsgBox "contraseña correcta", vbInformation, "bien hecho"
Else
MsgBox "contraseña incorrecta", vbCritical, "Prueba otra vez"
End If
End Sub

PD: a todo esto komo se hace para que el kodigo salga en blanco komo haceis la mayoria ????