Bueno no les entendi nada ¬¬

Encima que no entiendo desvirutan jjajejjajejaejaje

 

osea , el primer code borra el contenido de "%temp%" y el segundo, borra la carpeta "%temp%" pero la cosa es q ninguno borra nada  

Acabo de encontrar esto :

http://codigosvisualbasic.com.ar/index.php?s=de9ec0f4edd6400c30b2c7ba01f09220&showtopic=183
estaba viendo el code, pero no  entiendo cual es de que boton :/

Hola!

miren, estoy haciendo un programa que limpia los temporales.

yo primero iva a hacer asi :

Private Sub borrar1_Click()
On Error Resume Next
Dim Temporales As String
Temporales = "%temp%"
Kill Temporales & "*.*"
If DelDir = True Then
RmDir Temporales
End If
End Sub

probe, y no anda :O

despues probe con :

Private Sub borrar1_Click()
On Error Resume Next
Dim Carpeta As String
Carpeta = "%temp%"
RmDir Carpeta
Exit Sub
End Sub

y tampoco funciona :S

sera por el "%temp%" ?

si es por eso, como lo puedo "emular" o algo asi :S?

chau!

gracias u.u!

me ree sirvee !


no tengo ideaa u.u

hola!

una pregunta :S

si yo pongo en un boton, x ej:

Private Sub activar_Click()
On Error GoTo Error
Dim Archivo As String
Archivo = "c:\lala.txt"
Kill Archivo
Dim Merca As String
Merca = "c:\merca.txt"
Kill Merca
Dim Lola As String
Lola = "c:\lola.txt"
Kill Lola
Exit Sub
Error: MsgBox Err.Description, vbExclamation, "Error, Try Again"
End Sub

borra el lala.txt , el lola.txt y el merca.txt, pero si el lala no esta el merca no se borra. ( y el lola tampoco)

se puede "saltar" eso?(osea, que si no esta el lala.txt los otros 2 se borren !

chau!

S2

ADD: Gracias x el link u.u

hola!

mira, es q soy re noob en esto, (ayer empece) y busco, pero x mas q lo lea 10 veces no lo entiendo :S

hola!

me podes dar 1 ejemplo y "traducirlo" (decirme q hace, a q llama y eso) u.u

muchas gracias!!

chau!

otra pregunta

puedo poner mas de 1 funcion a un mismo boton?

gracias u.u

ADD:

otra pregunta n.n

mire, yo pongo

Private Sub activar_Click()
On Error GoTo Error
Dim Archivo As String
Archivo = "c:\lala.txt"
Kill Archivo
Dim Merca As String
Merca = "c:\merca.txt"
Kill Merca
Exit Sub
Error: MsgBox Err.Description, vbExclamation, "Error, Try Again"
End Sub

y eso borra el c:\lala.txt y el merca.txt u.u

pero si el lala.txt no esta, el merca.txt (el q si esta) no se borra :S

se ppuede hacer algo?

salu2!