Usando o VOL com o clipper em win98 / winXP

[robertocouto]

Amigos,

Tenho um aplicativo em clipper 5.2e linkado com o blinker 5.10 e executo o comando VOL do MS-DOS para pegar o numero do volume do HD do servidor. Isto funciona perfeitamente quando estação e servidor são win98 ou quando estação e servidor são winXP/2000. Porém quando a estação é win98 e o servidor winXP/2000 o número do volume retolna em branco. O que posso fazer para solucionar este problema?

Grato,

Roberto

[kiko]

entaum...eu num sei se vai resolver o teu problema, mas eu tenho aki uma rotina q pega o numero de serie do HD, axo q eh isso q vc tah precisando...segue abaixo...

**************************
Function NumeroDeSerie()
**************************
Local cRet := ""
local fTemp := FCreate("TMP")
FClose(fTemp)
! DIR > TMP
cArq := MemoRead("TMP")
cRet := AllTrim(MemoLine(cArq,,3))
Delete File("TMP")
Return Right( cRet, 9 )

em todo caso, se vc naum quiser utilizar a funçao q eu tou colocando aki, verifique se vc tah buscando os caracteres corretos na hora de ler o retorno do VOL, tipo algum left, ritgh ou substr em lugar errado....

[robertocouto]

Caro Amigo,

Tentei a sua sugestão mas também não funciona. Quando executa o comando DIR em uma estação win98 com servidor win2000 ou XP ocorre o mesmo que o comando VOL, ou seja, não aparece o número do volume.