You got more than that. Did you change the organization name? What line did the error happen? Did you run it on a member server of the domain where the Exchange server is installed? What debugging did YOU do? ________________________________ From: Sadanand K. Prabhakar [mailto:sadanand@xxxxxxxxxxxxxxx] Sent: Monday, September 05, 2005 10:35 AM To: [ExchangeList] Subject: [exchangelist] RE: Internet file formats (file extensions) http://www.MSExchange.org/ Hi, It didn't work. I got the error message "There is no such object on the server." ________________________________ From: Michael B. Smith [mailto:michael@xxxxxxxxxx] Sent: Friday, September 02, 2005 7:20 PM To: [ExchangeList] Subject: [exchangelist] RE: Internet file formats (file extensions) http://www.MSExchange.org/ That was kinda fun. Just change strOrganization for your Exchange environment. Const strOrganization = "Blue Ridge Internetworks" Set objRootDSE = GetObject ("LDAP://RootDSE";) strConfigNC = objRootDSE.Get ("configurationNamingContext") Set objRootDSE = Nothing strDN = "CN=Internet Message Formats,CN=Global Settings,CN=" & _ strOrganization & ",CN=Microsoft Exchange," & _ "CN=Services," & strconfigNC Set obj = GetObject ("LDAP://"; & strDN) str = obj.Get ("msExchMIMETypes") i = 0 str1 = "" For k = 1 To Lenb (str) If 0 = Ascb(Midb(str, k, 1)) Then If 0 < Len (str1) Then 'wscript.echo str1 wscript.echo "MIMEType - " & Left (str1, InStr (str1, ";") - 1) Wscript.echo "Extension - " & Right (str1, Len (str1) - InStr (str1, ";")) wscript.echo " " i = i + 1 End If str1 = "" Else str1 = str1 & chr(Ascb(Midb(str, k, 1))) End If Next If 0 < Len (str1) Then wscript.echo str1 End If wscript.echo i & " total mappings present." Set obj = Nothing ________________________________ From: Sadanand K. Prabhakar [mailto:sadanand@xxxxxxxxxxxxxxx] Sent: Friday, September 02, 2005 12:23 AM To: [ExchangeList] Subject: [exchangelist] RE: Internet file formats (file extensions) http://www.MSExchange.org/ from Exchange 2000 "Global Settings" --> "Internet Message Formats" ________________________________ From: Michael B. Smith [mailto:michael@xxxxxxxxxx] Sent: Friday, September 02, 2005 5:42 AM To: [ExchangeList] Subject: [exchangelist] RE: Internet file formats (file extensions) http://www.MSExchange.org/ from what? ________________________________ From: Sadanand K. Prabhakar [mailto:sadanand@xxxxxxxxxxxxxxx] Sent: Thursday, September 01, 2005 11:21 AM To: [ExchangeList] Subject: [exchangelist] Internet file formats (file extensions) http://www.MSExchange.org/ Hi, Could some one help me in getting "MIME content type" and "Associated Extension" from a VB Script? Thanks & Regards Sadanand