Korzystając ze skryptów ASP (Active Server Pages) strony serwera można programowo kontrolować dostęp do plików .asp przez sprawdzanie adresów IP i uwierzytelnień Windows NT użytkowników. Więcej informacji dotyczących skryptów strony serwera można znaleźć w temacie Skrypty Active Server Pages.
Notka Poniższej procedury można użyć tylko do kontroli dostępu do określonej strony ASP, a nie do innych typów zawartości sieci Web.
Aby użyć ASP do kontroli dostępu<% AuthCred = Request.ServerVariables("LOGON_USER") IPAddr = Request.ServerVariables("REMOTE_ADDR") If IPAddr = "TU WSTAW ADRES IP!" Then 'Uwierzytelnij klienta 'Monituj użytkownika o prawidłową nazwę użytkownika systemu Windows NT i 'hasło If IsEmpty(AuthCred) or AuthCred = "" Then 'Jeśli informacje logowania użytkownika są nieprawidłowe lub jeśli 'użytkownik anuluje je, wyślij stan HTTP 401 do przeglądarki, która 'rozpozna odmowę dostępu do pliku. Response.Status = "401 Access Denied" Response.End End if Else 'Wyślij do przeglądarki stan HTTP 403 oznaczający, że dostęp do pliku 'jest zabroniony. Response.Write("403 Dostęp zabroniony") Response.End End if %>
TU WSTAW ADRES IP!