New IIS Preview

Posted on October 11, 2016 by mike

I have a long love hate relationship with IIS and its iterations.

That said this looks awesome.

I setup a test that took like 5 min to setup. It does require an access token (that does expire).

More to come obviously.

 
Posted in ASP.NET, IIS, Microsoft, Web Development, Web Services | Leave a comment

Windows: Enable generation of 8.3 names

Posted on August 2, 2016 by mike

Windows: Enable generation of 8.3 NamesMichls Tech Blog

in newer Versios of Windows the generation of the DOS Style 8.3 names is disabled by default.

If you need this “feature” you can either enabled it globally on a system or on a per volumes basis.

Check the current state

D:\> fsutil.exe 8dot3name query
The registry state is: 2 (Per volume setting - the default).
D:\> fsutil.exe 8dot3name query D:
The volume state is: 1 (8dot3 name creation is disabled).
The registry state is: 2 (Per volume setting - the default).

Based on the above two settings, 8dot3 name creation is disabled on D:

To enable it for all volumes

D:\> fsutil 8dot3name set 0

Or for a specific volume

D:\> fsutil 8dot3name set D: 0

and to disable it

D:\> fsutil 8dot3name set D: 1

 
Posted in Uncategorized | Leave a comment

Trusted Sites Script

Posted on June 13, 2016 by mike

On Error Resume Next
Const HKEY_LOCAL_MACHINE = &H80000002
strComputer = “.”
Set objReg = GetObject(“winmgmts:” _
& “{impersonationLevel=impersonate}\\” & strComputer & _
“\root\default:StdRegProv”)

‘=== Set HKLM Only
strKeyPath = “SOFTWARE\Policies\Microsoft\Windows\CurrentVersion\Internet Settings”
strValueName = “Security_HKLM_only”
dwValue = 0
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue

strKeyPath = “SOFTWARE\Wow6432Node\Policies\Microsoft\Windows\CurrentVersion\Internet Settings”
strValueName = “Security_HKLM_only”
dwValue = 0
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue
‘=== Create ZoneMap
strKeyPath = “Software\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath

strKeyPath = “Software\Wow6432Node\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath

‘=== Set UNC as Intranet
strKeyPath = “SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings\ZoneMap”
strValueName = “UNCAsIntranet”
dwValue = 1
stValue = “”
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue

strKeyPath = “SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Internet Settings\ZoneMap”
strValueName = “UNCAsIntranet”
dwValue = 1
stValue = “”
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue

‘=== Create ZoneMap\Ranges
strKeyPath = “Software\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\Ranges”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath

strKeyPath = “Software\Wow6432Node\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\Ranges”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath

‘=== Create ZoneMap Domains
strKeyPath = “Software\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\Domains”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath

strKeyPath = “Software\Wow6432Node\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\Domains”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
‘=== Create IP Range
strKeyPath = “Software\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\Ranges”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath

strKeyPath = “Software\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\Ranges\Range1000”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath

strValueName = “*”
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,1
strValueName = “:Range”
objReg.SetStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,”10.1.1.1-10.1.254.254″

strKeyPath = “Software\Wow6432Node\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\Ranges”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath

strKeyPath = “Software\Wow6432Node\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\Ranges\Range1000”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath

strKeyPath = “Software\Wow6432Node\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\Ranges\Range1000”
strValueName = “*”
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,1
strValueName = “:Range”
objReg.SetStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,”10.1.1.1-10.1.254.254″

‘== IdahoTech.com
strKeyPath = “Software\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\Domains\idahotech.com”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
strValueName = “http”
dwValue = 1
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue

strKeyPath = “Software\Wow6432Node\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\Domains\idahotech.com”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
strValueName = “http”
dwValue = 1
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue

strKeyPath = “Software\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\EscDomains\idahotech.com”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
strValueName = “http”
dwValue = 1
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue

strKeyPath = “Software\Wow6432Node\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\EscDomains\idahotech.com”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
strValueName = “http”
dwValue = 1
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue

strKeyPath = “Software\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\Domains\idahotech.com”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
strValueName = “*”
dwValue = 1
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue

strKeyPath = “Software\Wow6432Node\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\Domains\idahotech.com”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
strValueName = “*”
dwValue = 1
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue

strKeyPath = “Software\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\EscDomains\idahotech.com”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
strValueName = “*”
dwValue = 1
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue

strKeyPath = “Software\Wow6432Node\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\EscDomains\idahotech.com”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
strValueName = “*”
dwValue = 1
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue

‘===== BioFireDX.com
strKeyPath = “Software\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\Domains\BioFireDX.com”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
strValueName = “http”
dwValue = 1
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue

strKeyPath = “Software\Wow6432Node\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\Domains\BioFireDX.com”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
strValueName = “http”
dwValue = 1
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue

strKeyPath = “Software\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\EscDomains\BioFireDX.com”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
strValueName = “http”
dwValue = 1
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue

strKeyPath = “Software\Wow6432Node\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\EscDomains\BioFireDX.com”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
strValueName = “http”
dwValue = 1
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue

strKeyPath = “Software\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\Domains\BioFireDX.com”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
strValueName = “*”
dwValue = 1
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue

strKeyPath = “Software\Wow6432Node\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\Domains\BioFireDX.com”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
strValueName = “*”
dwValue = 1
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue

strKeyPath = “Software\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\EscDomains\BioFireDX.com”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
strValueName = “*”
dwValue = 1
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue

strKeyPath = “Software\Wow6432Node\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\EscDomains\BioFireDX.com”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
strValueName = “*”
dwValue = 1
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue

‘====== iSAOS
strKeyPath = “Software\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\Domains\iSAOS”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
strValueName = “http”
dwValue = 1
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue

strKeyPath = “Software\Wow6432Node\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\Domains\iSAOS”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
strValueName = “http”
dwValue = 1
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue

strKeyPath = “Software\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\EscDomains\iSAOS”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
strValueName = “http”
dwValue = 1
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue

strKeyPath = “Software\Wow6432Node\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\EscDomains\iSAOS”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
strValueName = “http”
dwValue = 1
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue

strKeyPath = “Software\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\Domains\iSAOS”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
strValueName = “*”
dwValue = 1
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue

strKeyPath = “Software\Wow6432Node\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\Domains\iSAOS”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
strValueName = “*”
dwValue = 1
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue

strKeyPath = “Software\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\EscDomains\iSAOS”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
strValueName = “*”
dwValue = 1
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue

strKeyPath = “Software\Wow6432Node\Microsoft\Windows\CurrentVersion\Internet Settings\” _
& “ZoneMap\EscDomains\iSAOS”
objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
strValueName = “*”
dwValue = 1
objReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue

 
Posted in Uncategorized | Leave a comment