// Change the Chinese characters in the input string into Unicode (UTF8), other characters constant Function Toutf8 (Szinput) {VAR WCH, X, UCH = "", Szret = "