Página 1 de 1

Informações sobre Unidade e Diretorio do Sistema

Enviado: 27 Mar 2006 10:24
por lpsistemas
Consegui uma função para capturar o serial do hd, mas tem um problema, em rede eu preciso capturar o serial da unidade mapeada e não do drive C. Achei no NG do Clipper 5.3 a função DISKNAME mas quando compilo dá erro, como se não existisse a função, mas de acordo com o NG, a função é nativa do EXTEND.LIB. Mas da mesma forma tem muitas funções no NG do clipper 5.3 que não funcionam, quando compilo (dá erro).
Como faço para descobrir a unidade do sistema? (E:, F:, etc)? ou o diretorio corrente? ou o nome do sistema?

Obrigado...

Enviado: 28 Mar 2006 11:40
por Dudu_XBase
Bom dia.
Existem essas funções na lib CT ou CTP.lib (protegido)

DISKNAME()

Código: Selecionar todos

  
  DISKNAME()
 Determines the drive designator for the current drive

 Syntax

     DISKNAME() --> cDrive

 Returns

     DISKNAME() returns a letter that identifies the designator as the
     current drive.

 Description

     DISKNAME() determines the current drive designator for the construction
     of complete path names.

 Note

     þ  The designator does not contain a colon.

 Example

     Display the drive designator for the current drive:

     ? DISKNAME()      // Returns a "C" with most hard disk systems


 

DIRNAME ()

Código: Selecionar todos

  DIRNAME()
 Determines the name of the current directory

 Syntax

     DIRNAME([<cDrive>]) --> cDirectory

 Argument

     <cDrive>  Designates the drive for which the current directory is
     determined (a colon is unnecessary).  The default is the current drive.

 Returns

     DIRNAME() returns the current directory name on the <cDrive>.

 Description

     DIRNAME() determines the current directory name on the selected drive.
     You can use this function to construct complete access paths.

 Notes

     þ  The maximum length of the returned value is 65 characters.  If
        no drive designator is specified, the current drive is assumed.

     þ  If there is an invalid drive designation, DIRNAME() returns a
        null string.

 Examples

     þ  Display the current directory name:

        ? "Current Directory:  " + DIRNAME()

     þ  With a drive designator:

        ? DIRNAME("A")               // Current directory on Drive A:
  
  

Enviado: 28 Mar 2006 17:26
por lpsistemas
Valeu, funcionou sim. Pelo que eu entendi então algumas funções que no NG do Clipper dizem ser da lib extend não são na verdade. Eu deixei de usar muitas delas, pq a informação era que era da extend e não funcionavam. Mas agora que compilei usando a CT funcionou. Valeu.
Eu já até tinha criado uma outra forma de pegar essa informação:

Run CD>Info
wUnidade:=Remoread("Info.txt")

Simples, não?