Objeto Drives

esther
01 de Octubre del 2003
Hola a todos, os pido ayuda sobre los objetos drive.
Tengo una aplicación que tiene que comprobar si un directorio y un arichivo introducido por el usuario existen. El código que intento ejecutar es el siguiente:
Set fl =CreateObject("Scripting.FileSystemObject")

If fl.FolderExists(bd.Recordset("plt_min")) Then
Set dir = fl.GetDrive(bd.Recordset("plt_min"))
If Not dir.IsReady Then

Os explico, todo funciona correctamente hasta que hago el set dir, me dice que el argumento o llamada a procedimeinto no es valido, he intentado especificarle un path, pero también me da error.

Lo que prentendo es mirar si existe y si es valido.

sdemingo
01 de Octubre del 2003
En el Set tienes te falta el GetDriveName:

Set dir = fl.GetDrive(fl.GetDriveName(bd.Recordset("plt_min")))

Un saludo
sdemingo