Liz
22 de Enero del 2004

Hola a todos
les cuento que necesito calcular el espacio en disco desde un programa en VB 5 para saber si puedo guardar el /los archivos de backup de una Base de datos SQL Server. No se si tengo que usar una api de windows o algo asi.
Espero sus respuestas
Muchas gracias

sdemingo
22 de Enero del 2004

Hola Liz,

no hace falta usar API:

Private Sub Form_Load()

Dim espacioLibre As Double
Dim unidad As Object
Dim fs As Object
Dim strUnidad As String

strUnidad = "C:"
Set fs = CreateObject("Scripting.FileSystemObject")
Set unidad = fs.GetDrive(fs.GetDriveName(strUnidad))
espacioLibre = unidad.FreeSpace
MsgBox espacioLibre & " bytes"

End Sub

Saludos
sdemingo
http://boards.melodysoft.com/sdemingo

Liz
22 de Enero del 2004

Muchisimas gracias!!!
Lo voy a probar