| W3SVC registry parameters from ASP. | |
|---|---|
Set S = CreateObject("RegEdit.Server")
'To get access to registry from ASP
S.LogonUser "Administrator", "", "Domain"
Response.Write "W3SVC registry parameters : <br>"
For Each Value In S.Keys("SYSTEM\CurrentControlSet\Services\W3SVC\Parameters").Values
Response.Write "<b>" & Value.Name & "</b> : " & Value & "<br>"
Next
S.RevertToSelf | |