ASP要求UTF-8トランスコーディング機能
関数utf2gb(ボディ) 薄暗いObjstream セットObjstream = Server.CreateObjectに(" adodb.stream " ) objstream.Charset = " 2312 " objstream.Type = 2 objstream.Mode = 3 objstream.Open objstream.WriteText体 objstream.Position = 0 objstream .Charset = " UTF-8 " objstream.Type = 2 utf2gb = objstream.ReadText objstream.Close セット objstream = 何も エンド機能