.Net - msdos

Iniciado por NetJava, 7 Marzo 2012, 18:18 PM

0 Miembros y 1 Visitante están viendo este tema.

NetJava

Buenas!!

Tengo un problema, estoy eliminando desde .net carpetas y archivos, haciendo un desinstalador y después de buscar... y probar, me encuentro con que para borrar una carpeta con subdirectorios y archivos, tengo que ir por partes:


Shell("CMD /C ERASE " & Chr(34) & "C:\carpeta\*.*" & Chr(34), AppWinStyle.NormalFocus)
Shell("CMD /C RD " & Chr(34) & "C:\carpeta\carpeta\*.*" & Chr(34), AppWinStyle.NormalFocus)


Primero ir eliminando documentos y después carpetas... Se supone que debería ser más simple. Se os ocurre algo??

Saludos!

$Edu$

Con RD /S /Q para que borre todo junto. Pero eso que haces estas mal aprovechando funciones de .net

NetJava

Buenas, tienes toda la razón, de tanto utilizar msdos ya no pensaba en nada más. Resuelto mejor con .net. Gracias!


Public Function mf_eliminarArchivoCarpeta(ByVal int_acto As Integer, _
                                              ByVal str_sdir As String, ByVal str_sPath As String) As Boolean
        Try
            If int_acto = 1 Then ' Archivo
                My.Computer.FileSystem.DeleteFile( _
                Application.StartupPath & "\" & str_sPath, _
                FileIO.UIOption.AllDialogs, _
                FileIO.RecycleOption.SendToRecycleBin, _
                FileIO.UICancelOption.DoNothing)
                Return True

            ElseIf int_acto = 2 Then 'Carpeta
                My.Computer.FileSystem.DeleteDirectory( _
                str_sdir, _
                FileIO.UIOption.AllDialogs, _
                FileIO.RecycleOption.SendToRecycleBin, _
                FileIO.UICancelOption.DoNothing)
                Return True
            Else
                Return False
            End If
        Catch ex As Exception
            Return False
        End Try
    End Function

kub0x

Pa matarte NetJava :D

Por cierto, ¿cómo fue tu proyecto de implementar MS-DOS en .NET?

Saludos.
Viejos siempre viejos,
Ellos tienen el poder,
Y la juventud,
¡En el ataúd! Criaturas Al poder.

Visita mi perfil en ResearchGate


NetJava

Buenas! Pues bien, tras mucho pelear con archivos .bat, .sql y comandos msdos acabo saliendo lo que pretendía, casi le pillo manía al mysql XD