IBM Lotus Symphony
|
Devuelve una cadena de variante que representa la vía de acceso actual de la unidad especificada.
![]() |
Esta instrucción de ejecución no funciona actualmente como se documenta. |
CurDir [(Text As String)]
Cadena
Text: cualquier expresión de cadena que especifique una unidad existente (por ejemplo, "C" para la primera partición de la primera unidad de disco duro).
Si no se especifica ninguna unidad o si la unidad es una cadena de longitud cero (""), CurDir devuelve la vía de acceso de la unidad actual. Lotus® Symphony™ Basic notifica un error si la sintaxis de la descripción de la unidad no es correcta, la unidad no existe o si la letra de la unidad aparece después de la letra definida en el archivo CONFIG.SYS con la instrucción Lastdrive.
Esta función no distingue entre mayúsculas y minúsculas.
Sub ExampleCurDir
Dim sDir1 as String , sDir2 as String
sDir1 = "c:\Test"
sDir2 = "d:\private"
ChDir( sDir1 )
msgbox CurDir
ChDir( sDir2 )
msgbox CurDir
end sub