asp utf 8 Í·ÎļþÊý¾Ý¿âÁª½Ó³Ø
<%@Language="VBScript" CodePage="65001"%>
<% option explicit%>
<% on error resume next %>
<% Session.CodePage="65001" %>
<% response.charset="utf-8" %>
<%
dim conn,connstr,sql,rs,rs2,rs3
connstr="dbq=" & server.MapPath("../data091003/data091003.mdb") & ";driver=
{microsoft access driver (*.mdb)};"
set conn=server.CreateObject("adodb.connection")
conn.Open connstr
set rs=server.CreateObject("adodb.recordset")
set rs2=server.CreateObject("adodb.recordset")
set rs3=server.CreateObject("adodb.recordset")
%>
Ïà¹ØÎĵµ£º
±¾È˵ı¾±¾ÉÏÊÇhome°æµÄXP£¬ÎÞ·¨Õý³£°²×°IIS£¬µ«ÊÇÍøÉϲ鵽¼¸Æª²©ÎÄ£¬ËµÊÇÄܰ²×°IIS£¬ÓÚÊǰ´ÕÕÉÏÃæµÄÃèÊöÇ××ÔÊÔÁËһϡ£
Æä´óÖ·½·¨ÈçÏ£º
¡¡1¡¢Ê×ÏÈ´ò¿ªCÅÌWindowsĿ¼ÖÐinfĿ¼ÏµÄsysoc.infÎļþ£¨¿ÉÒÔÔÚÔËÐÐÖÐÖ±½ÓÊäÈë“c:\windows\inf\sysoc.inf&rdqu ......
ÔÚ±à³Ì¹ý³ÌÖУ¬¾³£ÐèÒªÒ³ÃæÖ®¼äµÄ´«Öµ£»ÌرðÊÇÖÐÎÄ´«µÝµÄʱºò£¬¾³£³öÏÖÂÒÂëÏÖÏ󣬺ÜÊÇÓôÃÆ¡£ÏÂÃæÊÇÎÒÔÚÍøÉÏÕÒµ½µÄһЩ·½·¨£¬¹©´ó¼Ò²Î¿¼¡£
1.ÉèÖÃweb.configÎļþ¡££¨Ã»ÓÐÓùý£©
<system.web>
......
<globalization requestEncoding="gb2312" responseEncoding="gb2312" culture="zh-CN" fileEncoding="gb2 ......
×î½ü¹À¼ÆºÜ¶àÈ˶¼Åöµ½ºÍÎÒͬÑùµÄÎÊÌ⣬¾ÍÊÇÒòΪɨ»Æ¼°±¸°¸¹ÜÀí·Ç³£ÑÏ£¬Ò»¸öû±¸°¸Ö±½Ó¹Ø·þÎñÆ÷£¬Ò»¸ö»ÆÕ¾Ö±½Ó·â»ú·¿¡£ÏÖÔÚÍøÕ¾ËùÓÐÓòÃû±ØÐèͨ¹ý±¸°¸£¬ÒÔǰ»¹Ëɵ㡣µ«ÎÒÃÇ·þÎñÆ÷100¶à¸ö£¬×ܲ»ÄÜÒ»¸öÒ»¸ö¼ì²é°É£¬ÉÏÍøËÑÁËÏ£¬Óиö³ÌÐòÉÔºÏÊÊ£¬µ«µ¼³öµÄÊÇÍøÕ¾ÓòÃûÕ¾µãÃû£¬ÎÒÐÞ¸ÄΪµ¼³öÓòÃûÁÐ±í£¬Í¬Ê±½â¾öÁ˵¼³öÒ»¸öÕ¾µã°ó¶¨¶à¸ ......
Ê×ÏÈÌù´úÂ룺
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
Dim objDic
Dim arr(2)
arr(0) = 0
arr(1) = 1
arr(2) = 2
Set objDic = Server.CreateObject("Scripting.Dictionary")
objDic.Add "key",arr
Response.Write("ÕâÊÇÐÞ¸Ä֮ǰµÄÖµ£º" & objDic.Item("key")(0))
objDic.Item("key")(1) = ob ......