[ 0kr4M @ 04.01.2005. 10:44 ] @
Radim galeriju slika i uz malu pomoc nasao sam kod za kreiranje direktorija. Dio tog koda (za kreiranje direktorija) izgleda: MkDir("C:\ServerFolder\"). Shvatio sam kada obrisem cijelu galeriju slika da ju samo maknem iz baze podataka a slike (ili neki drugi fajlovi) ostaju na serveru a i njih bi hto obrisati jer nastaje guzva, a i slike koje su obrisane iz baze ne mogu biti prikazane na stranici. Imam isti problem kada zelim obrisati pojedinu sliku. Zamiso mi je bila da obrisem cijeli direktorij. Kako sam pocetnik u programiranju ne znam kako bi izbrisao direktorij ili file preoko aspx stranice, a sve je pisano u VBu.

Zanima me kod ili neki primjer, kako da obrisem cijeli direktorij ili odredjeni file. Jedini uvjet je da ti primjeri budu pisani u VBu.

tnx,
0kr4M :-)
[ bunker @ 04.01.2005. 11:27 ] @
za pocetak, citaj. bar MSDN. direktorijum ne mozes brisati pre nego sto ga ispraznis


Note This example shows how to use one of the overloaded versions of Delete. For other examples that might be available, see the individual overload topics.

Code:

Imports System
Imports System.IO

Public Class Test
    Public Shared Sub Main()
        ' Specify the directories you want to manipulate.
        Dim path As String = "c:\MyDir"
        Dim subPath As String = "c:\MyDir\temp"

        Try
            ' Determine whether the directory exists.
            If Directory.Exists(path) = False Then
                ' Create the directory.
                Directory.CreateDirectory(path)
            End If

            ' Determine whether the directory exists.
            If Directory.Exists(subPath) = False Then
                ' Create the directory.
                Directory.CreateDirectory(subPath)
            End If

            'This operation will not be allowed because there are subdirectories.
            Console.WriteLine("I am about to attempt to delete {0}", path)
            Directory.Delete(path, True)
            Console.WriteLine("The Delete operation was successful.")

        Catch e As Exception
            Console.WriteLine("The process failed: {0}", e.ToString())
        End Try
    End Sub
End Class