IIsMimeMap

IIsMimeMap 개체를 사용하여 웹 서버에서 사용되는 상속된 MIME(Multipurpose Internet Mail Extensions) 매핑을 설정합니다.

IIsMimeMap 개체는 ADSI 컨테이너 개체가 아니라 ADSI 개체입니다.

ADsPath

IIS://MachineName/MIMEMAP

여기서 MachineName은 임의의 이름 또는 "LocalHost"일 수 있습니다.

구문

varReturn = object.Method

인수

varReturn

이 메서드로부터 반환 값을 받는 변수입니다.

object

대개 이전 GetObject 실행 결과로서 IIsMimeMap 개체를 포함하는 변수입니다.

Method

선택한 개체 메서드입니다.

속성

메타베이스 속성

메서드

코드 예

<% 
  Dim MimeMapObj, aMimeMap, MMType, MMExtension, i, aMimeMapNew() 
  Const ADS_PROPERTY_UPDATE = 2 
'Get the mimemap object. 
  Set MimeMapObj = GetObject("IIS://LocalHost/MimeMap") 
'Get the mappings from the MimeMap property. 
  aMimeMap = MimeMapObj.GetEx("MimeMap") 
' Display the mappings. 
  ShowMM(MimeMapObj) 
' Add a new mapping. 
  i = UBound(aMimeMap) + 1 
  Redim Preserve aMimeMap(i) 
  Set aMimeMap(i) = CreateObject("MimeMap") 
  aMimeMap(i).Extension = ".jnq" 
  aMimeMap(i).MimeType = "junque/my-junque" 
  MimeMapObj.PutEx ADS_PROPERTY_UPDATE, "MimeMap", aMimeMap 
  MimeMapObj.SetInfo 
' Display the mappings. 
  ShowMM(MimeMapObj) 
'Delete a mapping by copying to a new map array. 
  i = 0 
  For Each MMItem in aMimeMap 
    If MMItem.Extension <> ".jnq" Then 
      Redim Preserve aMimeMapNew(i) 
      Set aMimeMapNew(i) = CreateObject("MimeMap") 
      aMimeMapNew(i).Extension = MMItem.Extension 
      aMimeMapNew(i).MimeType = MMItem.MimeType 
      i = i + 1 
    End If 
  Next 
  MimeMapObj.PutEx ADS_PROPERTY_UPDATE, "MimeMap", aMimeMapNew 
  MimeMapObj.SetInfo 
'Display the mappings. 
  ShowMM(MimeMapObj) 
'Subroutine to display the mappings in a table. 
  Sub ShowMM(MMObj) 
  aMM = MMObj.GetEx("MimeMap") 
'Set up table to display mappings. 
  Response.Write "<HR><TABLE BORDER><CAPTION><B>MIME Maps</B></CAPTION>" 
  Response.Write "<TR><TH>Type</TH><TH>Extension</TH>" 
'Display the mappings in the table. 
  For Each MM in aMM 
    Response.Write "<TR><TD>" & MM.MimeType & "</TD>" 
    Response.Write "<TD>" & MM.Extension & "</TD></TR>" 
  Next 
  Response.Write "</TABLE>" 
  End Sub 
%> 
 

© 1997-2001 Microsoft Corporation. All rights reserved.