If Wp.Domain, '.net', STR_RIGHT 
   With Wp from RegExp >Wp< Page_location then
 ...
Else
 ...
;  