Ordner per Sonderzeichen schützen mit XP

Dieses Thema im Forum "Windows XP / Server 2003/2008 / Vista" wurde erstellt von memostar, 17. September 2002.

Status des Themas:
Es sind keine weiteren Antworten möglich.
  1. memostar

    memostar Byte

    Registriert seit:
    14. Juli 2001
    Beiträge:
    65
    Hallo@all!

    Unter Windows 9x/ME konnte man Ordner einfach und schnell unter DOS per Sonderzeichne z.B. █ schützen, leider geht das nicht mehr unter WinXP hat jemand einen Tipp für mich, wie ich eine ähnlich simplen Schutz auch unter XP erreichen kann - ich möchte kein weiteren Benutzer einrichten.

    Vielen Dank
    [Diese Nachricht wurde von memostar am 17.09.2002 | 22:23 geändert.]
     
  2. kleinerhans

    kleinerhans Kbyte

    Registriert seit:
    14. Mai 2001
    Beiträge:
    228
    " & verz
    befehl="ren " & chr(34) & verz & chr(34) & " " & chr(34) & chr(223) & check.name & chr(34)
    b.writeline befehl
    liste=liste & chr(13) & chr(10) & verz
    else
    msgbox "Verzeichnis nicht vorhanden!"
    err.clear
    end if
    end if
    loop until verz=""
    end sub

    sub WinEnable()
    Set a = dat.CreateTextFile(w, True)
    frei=MyShell.popup("Alle Ordner freigeben?" & chr(13) & chr(10) & liste,,"",4)
    if frei = 6 then
    for x = 1 to n - 1
    nurname=ordner(x)
    do
    i=instr(nurname,"\")
    if i > 0 then nurname=mid(nurname,i+1)
    loop until i=0
    vorne=len(ordner(x))-len(nurname)
    befehl="ren " & chr(34) & left(ordner(x),vorne) & chr(223) & nurname & chr(34) & " " & chr(34) & nurname & chr(34)
    b.writeline befehl
    next
    end if

    if frei = 7 then
    for x = 1 to n - 1
    frei=MyShell.popup(ordner(x) & " freigeben?",,"",4)
    if frei=7 then a.writeline "\'" & ordner(x)
    if frei=6 then
    nurname=ordner(x)
    do
    i=instr(nurname,"\")
    if i > 0 then nurname=mid(nurname,i+1)
    loop until i=0
    vorne=len(ordner(x))-len(nurname)
    befehl="ren " & chr(34) & left(ordner(x),vorne) & chr(223) & nurname & chr(34) & " " & chr(34) & nurname & chr(34)
    b.writeline befehl
    end if
    next
    end if
    end sub
     
  3. Bond

    Bond Halbes Megabyte

    Registriert seit:
    17. November 2000
    Beiträge:
    875
    Warum nicht einfach zippen und Kennwort drauf?
    Dann sind die Daten schon ziemlich sicher, wenn Du\'s noch sicherer willst, benutzt Du PGP und zerschredderst die Daten so, das sie wirklich gut geschützt sind.
    Das ganze ist kostenlos und geht auch sehr schnell.
     
  4. leo88

    leo88 Halbes Megabyte

    Registriert seit:
    12. August 2002
    Beiträge:
    856
    Wie meinst du das?
     
Status des Themas:
Es sind keine weiteren Antworten möglich.

Diese Seite empfehlen