Red de conocimiento informático - Material del sitio web - Implementar cifrado de carpetas en vb

Implementar cifrado de carpetas en vb

Es relativamente simple. Puede usar un programa para modificar el nombre del archivo, como modificar el nombre de la carpeta original. {f456782-4c8b-57ff-00dd00786f6sw}. Si desea descifrar, debe usar Winrar.exe para descifrar.

Operaciones específicas: agregue un control DriveListBox, un control DirListBox y dos controles de botón a un formulario. Los botones son "Cifrar" y "Salir" respectivamente.

El código principal es el siguiente:

Private Sub Command2_Click()

Nombre Dir1.List(Dir1.ListIndex) As Dir1.List(Dir1.ListIndex) ) & " .{f456782-4c8b-57ff-00dd00786f6sw}"

End Sub

Subunidad privada1_Change()

Dir1.Path = Unidad1.Drive

Fin del subtítulo