[Volrath]

Estoy haciendo un programita en VB.net para borrar archivos .LCK y el PDOXUSRS.NET, en caso de que ocurra un problema con el sistema principal y dichos archivos queden tomados. Como se habran dado cuenta, utiliza base de datos PARADOX.

aca les dejo el codigo

Imports System.IO
Imports System.Security
Imports system.Security.Permissions


Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim mensaje As Integer
        mensaje = MsgBox("Antes de realizar esta operación, TODAS las terminales que utilizen los sistemas deben estar cerradas", MsgBoxStyle.OkCancel, "Importante")
        If mensaje = 1 Then
            Dim ruta As String
            Dim rutaRoot As String
            ruta = Directory.GetCurrentDirectory()
            rutaRoot = Directory.GetDirectoryRoot(ruta).Trim()
            'MsgBox(ruta)
            'MsgBox(rutaRoot)
            ' MsgBox(rutaRoot)
            Dim files() As String = Directory.GetFiles(rutaRoot, "*.lck", SearchOption.AllDirectories)
            Dim largo As Integer = files.GetLength(0)
            'MsgBox(largo)
            Dim i As Integer
            i = 0
            For i = 0 To largo - 1
                Me.lblFiletoDelete.Text = files(i)
                File.Delete(files(i))
            Next
            Dim files2() As String = Directory.GetFiles(rutaRoot, "PDOXUSRS.NET", SearchOption.AllDirectories)
            Dim largo2 As Integer = files2.GetLength(0)
            'MsgBox(largo2)
            Dim j As Integer
            j = 0
            For j = 0 To largo2 - 1
                File.Delete(files2(j))
            Next
            MsgBox("Operación Completada", MsgBoxStyle.Information)
        End If
    End Sub

End Class

Eh notado que el problema básicamente se genera cuando pasa por la carpeta de system volume information, y el error que me da es el siguiente:

System.Security.Permissions.FileIOPermission, mscorlib,
Version=2.0.50727, Culture=neutral, PublicKeyToken=b77a5c561934e089

Desde ya agradecido a todo aquel que me pueda brindar una soloución, ya que hace poco que toy programando en VB.NET y soy bastante newbie en el tema ^^U