对页面中的某一个变量或部分代码段使用不同的的编码方式

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>  
<%  
    Response.CodePage=65001   
    Response.Charset="UTF-8"    
%>  
<!--#include file="md5.asp"-->  
<%  
   DIM A : A="中文"  
   Dim B   
  Response.write(A&"<br>")  
  B=md5(A)  
  Response.write(B&"<br>")  
     
  ' 开始改变编码方式  
  response.codepage=936  
  response.charset="GBK"     
  Response.write(A&"<br>")   
  B=md5(A)    
  Response.write(B&"<br>")  
      
      
  '恢复编码方式   
  response.codepage=65001  
  response.charset="utf-8"  
  Response.write(A&"<br>")  
  B=md5(A)  
  Response.write(B&"<br>")  
 %>