Visual Basic - Obtener capacidad de un disco duro

Códigos Visual Basic

El ejemplo muestra como obtener la capacidad de un dico duro previamente especificado. En primer lugar debemos crear un modulo Proyecto > Agregar modulo e introducir el codigo para el modulo Posteriormente agregar el codigo al formulario Debemos especificar la letra del disco duro c: que aparece en la Linea 8

Tutores.org

Inicio > Visual Basic

Visitas: 18,343 - 08/05/2004 23:28:46

CODIGO

// Codigo ofrecido por Tutores.org

' --------- MODULO
Declare Function GetDiskFreeSpace Lib "kernel32" Alias "GetDiskFreeSpaceA" _
(ByVal lpRootPathName As String, lpSectorsPerCluster As Long, lpBytesPerSector _
As Long, lpNumberOfFreeClusters As Long, lpTtoalNumberOfClusters As Long) As Long
' --------- FORMULARIO
Private Sub Form_Load()
result = GetDiskFreeSpace("c:", lspc, lbps, lnofc, ltnoc)
If result = 0 Then MsgBox "Ocurrió un error!"
MyCapacity = lspc * lbps * ltnoc
MyFree = lspc * lbps * lnofc
MyUsed = MyCapacity - MyFree
MsgBox "Capacidad: " & MyCapacity & " Bytes"
MsgBox "Libre: " & MyFree & " Bytes"
MsgBox "Usado: " & MyUsed & " Bytes"
End Sub

ENLACE AL CODIGO

Si quieres enlazar desde tu pagina a este codigo

<a title="Tutores.org - Obtener capacidad de un disco duro" href="http://www.tutores.org/codigo/1066/" target="_blank">Obtener capacidad de un disco duro</a>

COMENTARIOS

Aun no existe ningun comentario para este Codigo.

INSERTAR COMENTARIO

Usuario:
Email:
Comentario:
	Codigo Seguridad
	Antes de enviar un comentario... Todos los comentarios son revisados personalmente Todo comentario que no haga relacion al codigo mostrado en esta pagina sera eliminado Usuarios registrados tienen preferencia en recibir respuestas de ayuda!! Ademas de poder insertar Imagenes,Enlaces y otras propiedades del editor. Por favor, insertar los comentarios descriptivos.