Metode Folder.GetDetailsOf
Mengambil detail tentang item dalam folder. Misalnya, ukuran, jenis, atau waktu modifikasi terakhirnya.
Sintaks
retVal = Folder.GetDetailsOf(
vItem,
iColumn
)
Parameter
-
vItem
-
Jenis: Varian
Item untuk mengambil informasi. Ini harus berupa objek FolderItem .
-
iColumn
-
Jenis: Bilangan bulat
Nilai Bilangan Bulat yang menentukan informasi yang akan diambil. Informasi yang tersedia untuk item bergantung pada folder tempat item ditampilkan. Nilai ini sesuai dengan nomor kolom berbasis nol yang ditampilkan dalam tampilan Shell. Untuk item dalam sistem file, ini bisa menjadi salah satu nilai berikut:
-
(0)
-
Mengambil nama item.
-
(1)
-
Mengambil ukuran item.
-
(2)
-
Mengambil jenis item.
-
(3)
-
Mengambil tanggal dan waktu item terakhir diubah.
-
(4)
-
Mengambil atribut item.
-
(-1)
-
Mengambil informasi tip info untuk item tersebut.
Nilai kembali
Jenis: BSTR*
String yang berisi detail yang diambil.
Keterangan
Catatan
Tidak semua metode diimplementasikan untuk semua folder. Misalnya, metode ParseName tidak diimplementasikan untuk folder Panel Kontrol (CSIDL_CONTROLS). Jika Anda mencoba memanggil metode yang tidak diratakan, kesalahan 0x800A01BD (desimal 445) akan muncul.
Contoh
Contoh berikut menggunakan GetDetailsOf untuk mengambil jenis file bernama Clock.avi. Penggunaan yang tepat ditampilkan untuk JScript, VBScript, dan Visual Basic.
Jscript:
<script language="JScript">
function fnGetDetailsOfJ()
{
var objShell = new ActiveXObject("shell.application");
var objFolder = new Object;
objFolder = objShell.NameSpace("C:\\WINDOWS");
if (objFolder != null)
{
var objFolderItem = new Object;
objFolderItem = objFolder.ParseName("clock.avi");
if (objFolderItem != null)
{
var objInfo = new Object;
objInfo = objFolder.GetDetailsOf(objFolderItem, 2);
}
}
}
</script>
Vbscript:
<script language="VBScript">
function fnGetDetailsOfVB()
dim objShell
dim objFolder
set objShell = CreateObject("shell.application")
set objFolder = objShell.NameSpace("C:\WINDOWS")
if (not objFolder is nothing) then
dim objFolderItem
set objFolderItem = objFolder.ParseName("clock.avi")
if (not objFolderItem Is Nothing) then
dim objInfo
objInfo = objFolder.GetDetailsOf(objFolderItem, 2)
end if
set objFolderItem = nothing
end if
set objFolder = nothing
set objShell = nothing
end function
</script>
Visual Basic:
Private Sub btnGetDetailsOf_Click()
Dim objShell As Shell
Dim objFolder As Folder
Set objShell = New Shell
Set objFolder = objShell.NameSpace("C:\WINDOWS")
If (Not objFolder Is Nothing) Then
Dim objFolderItem As FolderItem
Set objFolderItem = objFolder.ParseName("clock.avi")
If (Not objFolderItem Is Nothing) Then
Dim szItem As String
szItem = objFolder.GetDetailsOf(objFolderItem, 2)
End If
Set objFolderItem = Nothing
End If
Set objFolder = Nothing
Set objShell = Nothing
End Sub
Persyaratan
Persyaratan | Nilai |
---|---|
Klien minimum yang didukung |
Windows 2000 Professional, Windows XP [hanya aplikasi desktop] |
Server minimum yang didukung |
Windows 2000 Server [hanya aplikasi desktop] |
Header |
|
IDL |
|
DLL |
|