# AppleScript to remove a specific Wi-Fi network
-- Set the network name you want to remove
set networkName to "WW Norton"
-- Get the hardware port for Wi-Fi (usually 'en0' or 'Wi-Fi')
set wifiDevice to do shell script "networksetup -listallhardwareports | awk '/Wi-Fi/{getline; print $2}'"
-- Remove the specific network
try
do shell script "networksetup -removepreferredwirelessnetwork " & wifiDevice & " " & quoted form of networkName
display dialog "Successfully removed " & "WW Norton" & " from preferred networks." buttons {"OK"} default button "OK"
end try
set wifiNetworkName to "WW Norton"
-- Typically 'en0' or 'en1' - run 'networksetup -listallhardwareports' in Terminal to confirm
set airportDevice to "en0"
try
do shell script "networksetup -removepreferredwirelessnetwork " & airportDevice & " " & quoted form of wifiNetworkName
display dialog "Network '" & "WW Norton" & "' has been forgotten."
on error errMsg
display dialog "Error: " & errMsg
end try
-- Turn Wi-Fi off
do shell script "networksetup -setairportpower " & wifiDevice & " off"
-- Pause for a moment
delay 1
-- Turn Wi-Fi back on
do shell script "networksetup -setairportpower " & wifiDevice & " on"