Shell.NameSpace-Methode
Erstellt ein Folder-Objekt für den angegebenen Ordner und gibt es zurück.
Syntax
retVal = Shell.NameSpace(
vDir
)
Shell.NameSpace( _
ByVal vDir As Variant _
) As Folder
Parameter
-
vDir [in]
-
Typ: Variant
Der Ordner, für den das Folder-Objekt erstellt werden soll. Dies kann eine Zeichenfolge sein, die den Pfad des Ordners oder einen der ShellSpecialFolderConstants-Werte angibt. Beachten Sie, dass die in ShellSpecialFolderConstants gefundenen Konstantennamen in Visual Basic, aber nicht in VBScript oder JScript verfügbar sind. In diesen Fällen müssen die numerischen Werte an ihrer Stelle verwendet werden.
Rückgabewert
JScript
Typ: Ordner**
Objektverweis auf das Folder-Objekt für den angegebenen Ordner. Wenn der Ordner nicht erfolgreich erstellt wurde, gibt dieser Wert NULL zurück.
VB
Typ: Ordner**
Objektverweis auf das Folder-Objekt für den angegebenen Ordner. Wenn der Ordner nicht erfolgreich erstellt wurde, gibt dieser Wert NULL zurück.
Beispiele
Das folgende Beispiel zeigt die Verwendung von NameSpace . Die ordnungsgemäße Verwendung wird für JScript, VBScript und Visual Basic angezeigt.
Jscript:
<script language="JScript">
function fnShellNameSpaceJ()
{
var objShell = new ActiveXObject("shell.application");
var objFolder;
var ssfWINDOWS = 36
objFolder = objShell.NameSpace(ssfWINDOWS);
if (objFolder != null)
{
alert(objFolder.Title);
}
}
</script>
Vbscript:
<script language="VBScript">
function fnShellNameSpaceVB()
dim objShell
dim objFolder
set objShell = CreateObject("shell.application")
set objFolder = objShell.NameSpace("C:\\")
if (not objFolder is nothing) then
alert(objFolder.Title)
end if
set objFolder = nothing
set objShell = nothing
end function
</script>
Visual Basic:
Private Sub fnShellNameSpaceVB()
Dim objShell As Shell
Dim objFolder As Folder
Set objShell = New Shell
Set objFolder = objShell.NameSpace(ssfPERSONAL)
If (Not objFolder Is Nothing) Then
Debug.Print objFolder.Title
End If
Set objFolder = Nothing
Set objShell = Nothing
End Sub
Anforderungen
Anforderung | Wert |
---|---|
Unterstützte Mindestversion (Client) |
Windows 2000 Professional, Windows XP [nur Desktop-Apps] |
Unterstützte Mindestversion (Server) |
Windows 2000 Server [nur Desktop-Apps] |
Header |
|
IDL |
|
DLL |
|