[Veritas-bu] drive status check

[Bair, Christopher]

I use the following in a vbscript:

 

Set fso = CreateObject("Scripting.FileSystemObject")

Set WShell = CreateObject("WScript.Shell")

wshell.Run "cmd /c" & " tpconfig -l>c:\DriveStats.txt", 1, True

 

Set ts = fso.OpenTextFile("c:\DriveStats.txt")

 

Do While Not ts.AtEndOfStream

  aLine = ts.Readline

  strLoc = InStr(1, aLine, "dlt2")

  if (strLoc > 0) then

    VerDriveNum = Trim(Mid(aLine, 17, 1))

    RobDriveNum = Trim(Mid(aLine, 29, 1))

    DriveStatus = Trim(Mid(aLine, 32, 7))

    wscript.echo VerDriveNum & " " & RobDriveNum & " "& DriveStatus & "
" & ReportTime

  end if                

Loop

 

ts.Close

  _____  

From: Khan Imran A [mailto:Imran.a.Khan at uk.fujitsu.com] 
Sent: Friday, August 27, 2004 7:14 AM
To: veritas-bu at mailman.eng.auburn.edu
Subject: [Veritas-bu] drive status check

 

Hi, 

 

Is there a NetBackup command that can be used in a script to check the
status of robot and /or tape drives prior to backup commencing 

 

Environment is Windows 2003 with NetBackup v5.1

 

 

Kind Regards,

 

Imran

-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://mailman.eng.auburn.edu/pipermail/veritas-bu/attachments/20040827/511f448e/attachment.html