Javascript Popup page

="<a href=javascript:OpenPopUpPage("&CONCATENATE("'http://cp.aucklandtransport.govt.nz/team/prc/SuppliersPreQualification/Forms/AllItems.aspx?View={00FBD2D3-A8F6-4D5B-A51F-623E91EF656A}&FilterField1=Preferred%5Fx0020%5FSupplier%5Fx0020%5FLookup&FilterValue1=",IF(ISNUMBER(FIND(" ",TitleRemSpaces1)),REPLACE(TitleRemSpaces1,FIND(" ",TitleRemSpaces1),1,"%20"),TitleRemSpaces1)&"')>More..")

List data validation script to validate invalid characters

=AND(IF(ISERROR(FIND(",",Title)),TRUE),IF(ISERROR(FIND("&",Title)),TRUE),IF(ISERROR(FIND("!",Title)),TRUE),IF(ISERROR(FIND("@",Title)),TRUE),IF(ISERROR(FIND("~",Title)),TRUE),IF(ISERROR(FIND("#",Title)),TRUE),IF(ISERROR(FIND("$",Title)),TRUE),IF(ISERROR(FIND("%",Title)),TRUE),IF(ISERROR(FIND("^",Title)),TRUE),IF(ISERROR(FIND("*",Title)),TRUE),IF(ISERROR(FIND("(",Title)),TRUE),IF(ISERROR(FIND(")",Title)),TRUE),IF(ISERROR(FIND("-",Title)),TRUE),IF(ISERROR(FIND("=",Title)),TRUE),IF(ISERROR(FIND("+",Title)),TRUE),IF(ISERROR(FIND(":",Title)),TRUE),IF(ISERROR(FIND(";",Title)),TRUE),IF(ISERROR(FIND("<",Title)),TRUE),IF(ISERROR(FIND(">",Title)),TRUE),IF(ISERROR(FIND("?",Title)),TRUE),IF(ISERROR(FIND("'",Title)),TRUE),IF(ISERROR(FIND("{",Title)),TRUE),IF(ISERROR(FIND("}",Title)),TRUE),IF(ISERROR(FIND("[“,Title)),TRUE),IF(ISERROR(FIND(“]",Title)),TRUE),IF(ISERROR(FIND(".",Title)),TRUE),IF(ISERROR(FIND("/",Title)),TRUE),IF(ISERROR(FIND("",Title)),TRUE),IF(ISERROR(FIND("""",Title)),TRUE))​