Nothing regarding this issue
whatsoever.
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Mulnick, Al
Sent: Wednesday, October 13, 2004 2:57 PM
To: '[EMAIL PROTECTED]'
Subject: RE: [ActiveDir] OT sorta: GetDrive() error
No relevant? Success or failure? Or just
success entries?
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Michael B. Smith
Sent: Wednesday, October 13, 2004 2:31 PM
To: [EMAIL PROTECTED]
Subject: RE: [ActiveDir] OT sorta: GetDrive() error
Oh, I'm sure it's an authentication
issue.
The initial logs I checked were on Aspen (the server to
which the connection is failing). I have now also checked on the client and
on the DCs and there are no relevant entries.
Aspen is not a DC.
Thanks,
Michael
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Rick Boza
Sent: Wednesday, October 13, 2004 12:27 PM
To: [EMAIL PROTECTED]
Subject: RE: [ActiveDir] OT sorta: GetDrive() error
Yup, that looks OK to me as well - assuming that box isn't
a DC, right?
Al's probably on the right track (as usual...~sigh~) -
could you be getting an 'access denied' somewhere along the line?
Where did you chek the event logs - anything in the security logs on the client running the script, the server Aspen, or the DC's?
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Michael B. Smith
Sent: Wednesday, October 13, 2004 11:31 AM
To: [EMAIL PROTECTED]
Subject: RE: [ActiveDir] OT sorta: GetDrive() error
Everything looks OK, as far as I can see. Aspen doesn't run
the computer browser service so it doesn't have a 1e record. Looks just like a
number of other servers records...
Thanks,
Michael
C:\>nbtstat -a aspen
Local Area Connection:
Node IpAddress: [192.168.100.118] Scope Id: []
Node IpAddress: [192.168.100.118] Scope Id: []
NetBIOS
Remote Machine Name Table
Name
Type
Status
---------------------------------------------
ASPEN <00> UNIQUE Registered
BRNETS <00> GROUP Registered
ASPEN <20> UNIQUE Registered
---------------------------------------------
ASPEN <00> UNIQUE Registered
BRNETS <00> GROUP Registered
ASPEN <20> UNIQUE Registered
MAC Address =
00-0B-CD-CB-E6-7B
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Rick Boza
Sent: Wednesday, October 13, 2004 9:53 AM
To: [EMAIL PROTECTED]
Subject: RE: [ActiveDir] OT sorta: GetDrive() error
Try using NBTSAT to see if you can discern any NetBios
issues...more useful tool for that than ping.
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Michael B. Smith
Sent: Wednesday, October 13, 2004 9:40 AM
To: [EMAIL PROTECTED]
Subject: RE: [ActiveDir] OT sorta: GetDrive() error
Yeah, I thought about that, but the server (aspen) is both
in WINS and in DNS. ping works fine (specify the netbios name, returns the DNS).
The script makes six attempts, so I'm certain it has long
enough.
There are no failures in the security log (and the accesses
are logged as success). Nothing relevant in the system or application log
whatsoever.
Thanks,
Michael
From:
[EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
On Behalf Of Mulnick, Al
Sent: Wednesday, October 13, 2004 9:17 AM
To: '[EMAIL PROTECTED]'
Subject: RE: [ActiveDir] OT sorta: GetDrive() error
Sent: Wednesday, October 13, 2004 9:17 AM
To: '[EMAIL PROTECTED]'
Subject: RE: [ActiveDir] OT sorta: GetDrive() error
Path not found? Are you getting an issue with netbios
name resolution for that? Maybe not returning fast enough for the
script?
How about the security and system logs for this one?
Anything there?
Al
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Michael B. Smith
Sent: Wednesday, October 13, 2004 9:00 AM
To: [EMAIL PROTECTED]
Subject: [ActiveDir] OT sorta: GetDrive() error
OK, I'm logged in as a Domain Admin and an
Enterprise Admin on our domain. My desktop
is a member of the domain.
I have one server,
which is a member of the domain, it is not a
DC, running Windows 2000 Server, sp4, that if I don't create a
mapped share (and authenticate separately) that the script below fails
with:
Error 0x4C occurred in GetDrive for: \\aspen\c$
Error 0x4c is error 76 in decimal, and means: "Path not found". But if I map anything to that server (C$, D$, IPC$), using my domain login, the script will then work fine.I've got 40+ servers where this works fine. Just this one doesn't.
Any one of you gurus have any ideas why this might be failing?
Thanks so much!
Michael
' Display info for
specified drive
Option
Explicit
Dim objFSO, objDrv, iLimit
Dim objFSO, objDrv, iLimit
On Error Resume
Next
' Get absolute path
name from command line, then get optional percentage available
If Wscript.Arguments.Count < 1 or Wscript.Arguments.Count > 2 Then
wscript.echo "drivespace.vbs UNC-path [percent-available]"
wscript.echo "EX: drivespace.vbs \\server\c$ 10"
Wscript.Quit(1)
End If
If Wscript.Arguments.Count < 1 or Wscript.Arguments.Count > 2 Then
wscript.echo "drivespace.vbs UNC-path [percent-available]"
wscript.echo "EX: drivespace.vbs \\server\c$ 10"
Wscript.Quit(1)
End If
If
Wscript.Arguments.Count > 1 Then
iLimit = CInt (Wscript.Arguments (1))
Else
iLimit = 101
End If
iLimit = CInt (Wscript.Arguments (1))
Else
iLimit = 101
End If
Set objFSO =
CreateObject ("Scripting.FileSystemObject")
ErrorReport "CreateObject"
ErrorReport "CreateObject"
' Get drive object
and display properties
IterateGetDrive WScript.Arguments (0)
IterateGetDrive WScript.Arguments (0)
With
objDrv
If ((.FreeSpace / .TotalSize) * 100) < iLimit Then
Wscript.Echo " Share :", Wscript.Arguments (0)
Wscript.Echo " % Free :", FormatPercent ((.FreeSpace / .TotalSize), 1)
Wscript.Echo " Bytes Available :", FormatNumber (.AvailableSpace, 0)
Wscript.Echo " Bytes Used :", FormatNumber ((.TotalSize - .FreeSpace), 0)
Wscript.Echo " Total Bytes :", FormatNumber (.TotalSize, 0)
Wscript.Echo " "
End If
End With
If ((.FreeSpace / .TotalSize) * 100) < iLimit Then
Wscript.Echo " Share :", Wscript.Arguments (0)
Wscript.Echo " % Free :", FormatPercent ((.FreeSpace / .TotalSize), 1)
Wscript.Echo " Bytes Available :", FormatNumber (.AvailableSpace, 0)
Wscript.Echo " Bytes Used :", FormatNumber ((.TotalSize - .FreeSpace), 0)
Wscript.Echo " Total Bytes :", FormatNumber (.TotalSize, 0)
Wscript.Echo " "
End If
End With
Set objFSO =
Nothing
Sub ErrorReport
(strErr)
'wscript.echo "in ErrorReport for: " & strErr
If Err.Number <> 0 Then
Wscript.Echo "Error 0x" & CStr (Hex (Err.Number)) & " occurred in " & strErr & " for: " & Wscript.Arguments (0)
If Err.Description <> "" Then
Wscript.Echo "Error description: " & Err.Description
End If
'wscript.echo "in ErrorReport for: " & strErr
If Err.Number <> 0 Then
Wscript.Echo "Error 0x" & CStr (Hex (Err.Number)) & " occurred in " & strErr & " for: " & Wscript.Arguments (0)
If Err.Description <> "" Then
Wscript.Echo "Error description: " & Err.Description
End If
set
objFSO = Nothing
wscript.quit (1)
End If
End Sub
wscript.quit (1)
End If
End Sub
' GetDrive() fails
inconsistently. I don't know why. So,
' iterate a few times to try to get the real answer.
Sub IterateGetDrive (strDrive)
Dim i
' iterate a few times to try to get the real answer.
Sub IterateGetDrive (strDrive)
Dim i
On Error
Resume Next
For i = 0 To
5
Err.Clear
Set objDrv = objFSO.GetDrive (strDrive)
If Err.Number = 0 Then
Exit Sub
End If
Next
ErrorReport "GetDrive"
End Sub
Err.Clear
Set objDrv = objFSO.GetDrive (strDrive)
If Err.Number = 0 Then
Exit Sub
End If
Next
ErrorReport "GetDrive"
End Sub