getting the Real name of CDs from RR

[Ken Ray]

On 12/30/04 9:38 PM, "Alejandro Tejada" <capellan2000 at yahoo.com> wrote:

> But in this machine still does not works...
> this means i had to backup all files
> (just the kind of software i'm building now...)
> and reinstall. :-((

Did you try the Win98 version I'd posted this morning? If not, here it is
again:

function GetCDName pLetter
  set the hideConsoleWindows to true
  if the shellCommand is "cmd" then
    put shell(pLetter & " & dir") into temp
    if line 1 of temp is empty then delete line 1 of temp
    return last word of line 1 of temp
  else
    -- Win98, etc.
    put pLetter & cr & "dir" into url("file:c:/temp.bat")
    put shell("c:\temp.bat") into tResult
    delete file "c:/temp.bat"
    return last word of line 6 of temp
  end if
end GetCDName

HTH,

Ken Ray
Sons of Thunder Software
Web site: http://www.sonsothunder.com/
Email: kray at sonsothunder.com