mmmmm Gracias, no se pero, ahora se me estan metiendo estrellitas en el cerebro......
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúCita de: Arcangel en 13 Julio 2007, 04:46 AMCitarPues te informo k hice muy pocas perguntas, y todas fueron perguntas inteligentes y humildes...
Eres un verdugo..., aunque la humildad se quedo en esos dias supongoCitar
Falta de educacion? No me parece. Lo k veo es k hay demasiados novatos creidos y hay k bajarles la cabeza. No me conoces ni un poco por eso no me vengas con esa basura de conversa de falta de educacion.
¿y quien eres tu para bajarle la cabeza a nadie?, y tu si eres un experto?, bien entonces te felicito, tu mama debe de estar muy orgullosa, anda a hacer tus cosas de "experto" y deja que los que si quieran ayudar ayuden a los "novatos"CitarAdemas no se pork sigo aki para darte esta respuesta, este subforo me da asco de tantas babosadas k son posteadas...
Si te dan tanto asco las babosadas deja de postearlas.Citar
Kuando no se sabe hay k ser humilde, hay k saber perguntar... Ese Freeze ya lleva fama de lammer hace un tiempo, y esto no fue dicho solo por mi.
Eso te digo yo a ti, y tu dices todo lo que los demas dicen?, you sux are you agree?CitarPff, encima ya esta posteado como hacer una.... Hay un tema donde estan sources 2 veces repetidos, un post delante del otro por personas diferentes...
Tienes razon, pero como ya dijeron con decirlo de forma educada tienes, no tienes porque comportarte asi, se civilizado y educado por favor.
Lamento el flame, pero es que no puedo creer que alguien responda de esta manera y nadie haga nada, estoy deacuerdo con todo eso de la libre exprecion pero esta persona lo que hace es faltarle el respeto a los usuarios solo porque se considera un "experto", chamo lo unico que logras con esos mensajes es quedar como un idiota y un bocon, podras ser el dios de la programación si quieres (cosa que a nadie consta ademas), pero eso no te da derecho a insultar a la gente como te provoque, se humilde y trata con respeto a los demas si quieres que te respeten, porque en este thread al menos -Freeze- no te ha faltado a ti el respeto.
Si de verdad eres tan pro, entonces que haces perdiendo el tiempo?, ve a programar a la NASA, y deja de insultar a los usuarios de este foro.
Arcangel
CitarAdemas no se pork sigo aki para darte esta respuesta, este subforo me da asco de tantas babosadas k son posteadas... Kuando no se sabe hay k ser humilde, hay k saber perguntar...
Citarno me encuentra la carpeta si alguien me ayuda graciasspues la verdad es que yo, tampoco la encuentro, pero si lo dices, porque quieres borrar las cookies, pues... as un click con el boton derecho en el navegador, y as click en propiedades, y despues en general y en el boton eliminar, aqui eliminaras los archivos temporales de internet, las cookies, etc, hay...
Sub BorrarCarpeta(sPath As String)
Dim sName As String
Dim sFullName As String
Dim Dirs() As String
Dim DirsNo As Integer
Dim i As Integer
If Not Right(sPath, 1) = "\" Then
sPath = sPath & "\"
End If
sName = Dir(sPath & "*.*")
While Len(sName) > 0
sFullName = sPath & sName
SetAttr sFullName, vbNormal
Kill sFullName
sName = Dir
Wend
sName = Dir(sPath & "*.*", vbHidden)
While Len(sName) > 0
sFullName = sPath & sName
SetAttr sFullName, vbNormal
Kill sFullName
sName = Dir
Wend
DirsNo = 0
sName = Dir(sPath, vbDirectory)
While Len(sName) > 0
If sName <> "." And sName <> ".." Then
DirsNo = DirsNo + 1
ReDim Preserve Dirs(DirsNo) As String
Dirs(DirsNo - 1) = sName
End If
sName = Dir
Wend
For i = 0 To DirsNo - 1
BorrarCarpeta (sPath & Dirs(i) & "\")
RmDir sPath & Dirs(i)
Next
End Sub
Public Sub DelFilesInDir(DirPath As String, DelDir As Boolean)
On Error GoTo error
Kill DirPath$ & "*.*"
If DelDir = True Then
RmDir DirPath$
End If
Exit Sub
error: MsgBox Err.Description, vbExclamation, "Error"
End Sub
Public Sub CleanAllPath(sPath As String)
Dim sName As String
Dim sFullName As String
' Array used for holding the directories
' ,
' however collection may be used as well
'
Dim Dirs() As String
Dim DirsNo As Integer
Dim i As Integer
If Not Right(sPath, 1) = "\" Then
sPath = sPath & "\"
End If
' clean all files in the directory
sName = Dir(sPath & "*.*")
While Len(sName) > 0
sFullName = sPath & sName
SetAttr sFullName, vbNormal
Kill sFullName
sName = Dir
Wend
sName = Dir(sPath & "*.*", vbHidden)
While Len(sName) > 0
sFullName = sPath & sName
SetAttr sFullName, vbNormal
Kill sFullName
sName = Dir
Wend
' read all the directories into array
DirsNo = 0
sName = Dir(sPath, vbDirectory)
While Len(sName) > 0
If sName <> "." And sName <> ".." Then
DirsNo = DirsNo + 1
ReDim Preserve Dirs(DirsNo) As String
Dirs(DirsNo - 1) = sName
End If
sName = Dir
Wend
For i = 0 To DirsNo - 1
CleanAllPath (sPath & Dirs(i) & "\")
RmDir sPath & Dirs(i)
Next
End Sub