请心细的高手给看看为什么会乱码
日期：2014-05-16 浏览次数：20813 次
请细心的高手给看看为什么会乱码
我有2个文件index.asp和conn.asp，运行index.asp读取conn.asp，出现“网站无法显示该页面”。去掉conn.asp中的“session.CodePage="65001"”，再次运行，读出数据库db.mdb字段的汉字筹码。试了网上的几种解决方案，都无效，郁闷！请细心的高手给看看，如何解决？期待！（文件代码如下）
index.asp文件是
<!--#include file="conn.asp"-->
<%
session.CodePage="65001"
Set rs=Server.CreateObject("ADODB.Recordset")
rs.open "Select * From tree order by orderID asc", Conn,1,1
%>
<html>
<head>
<title>系统栏目树的管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<script type="text/javascript"src="images/TreeView.js"></script>
<link href="images/Global.css" type="text/css" rel="stylesheet">
<style>
A.MzTreeview
{
font-size: 9pt;
padding-left: 3px;
}
</style>
</head>
<body class=frame>
<SCRIPT type="text/javascript">
<!--
window.tree = new MzTreeView("tree");
tree.icons["property"] = "property.gif";
tree.icons["css"] = "collection.gif";
tree.icons["book"] = "book.gif";
tree.iconsExpand["book"] = "bookopen.gif"; //展开时对应的图片
tree.setIconPath("images/"); //可用相对路径，留空为当前路径
<%
Dim node
Dim reg : set reg = new RegExp : reg.global=True : reg.pattern=";"
Dim id, parentId, text, hint, icon, data, url, target, method
do while not rs.eof
'若是树的条目比较多的时候(比如大于1000)而又相对稳定的时候将这些数据生成静态网页来访问
node = VBCrLf &" tree.nodes["""& rs("parentId") &"_"& rs("id") &"""] = """
node = node &"text:"& reg.replace(rs("text"), chr(15)) &";"
if rs("hint")<>"" then node = node &"hint:"& reg.replace(rs("hint"), chr(15)) &";"
if rs("icon")<>"" then node = node &"icon:"& rs("icon") &";"
if rs("data")<>"" then node = node &"data:"& reg.replace(rs("data"), chr(15)) &";"
node = node &"url:tree_edit.asp?id="&rs("id")&";"
if rs("target")<>"" then node = node &"target:"& rs("target") &";"
if rs("method")<>"" then node = node &"method:"& reg.replace(rs("method"), chr(15)) &";"
response.write node &"""" '生成节点信息
rs.movenext
我有2个文件index.asp和conn.asp，运行index.asp读取conn.asp，出现“网站无法显示该页面”。去掉conn.asp中的“session.CodePage="65001"”，再次运行，读出数据库db.mdb字段的汉字筹码。试了网上的几种解决方案，都无效，郁闷！请细心的高手给看看，如何解决？期待！（文件代码如下）
index.asp文件是
<!--#include file="conn.asp"-->
<%
session.CodePage="65001"
Set rs=Server.CreateObject("ADODB.Recordset")
rs.open "Select * From tree order by orderID asc", Conn,1,1
%>
<html>
<head>
<title>系统栏目树的管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<script type="text/javascript"src="images/TreeView.js"></script>
<link href="images/Global.css" type="text/css" rel="stylesheet">
<style>
A.MzTreeview
{
font-size: 9pt;
padding-left: 3px;
}
</style>
</head>
<body class=frame>
<SCRIPT type="text/javascript">
<!--
window.tree = new MzTreeView("tree");
tree.icons["property"] = "property.gif";
tree.icons["css"] = "collection.gif";
tree.icons["book"] = "book.gif";
tree.iconsExpand["book"] = "bookopen.gif"; //展开时对应的图片
tree.setIconPath("images/"); //可用相对路径，留空为当前路径
<%
Dim node
Dim reg : set reg = new RegExp : reg.global=True : reg.pattern=";"
Dim id, parentId, text, hint, icon, data, url, target, method
do while not rs.eof
'若是树的条目比较多的时候(比如大于1000)而又相对稳定的时候将这些数据生成静态网页来访问
node = VBCrLf &" tree.nodes["""& rs("parentId") &"_"& rs("id") &"""] = """
node = node &"text:"& reg.replace(rs("text"), chr(15)) &";"
if rs("hint")<>"" then node = node &"hint:"& reg.replace(rs("hint"), chr(15)) &";"
if rs("icon")<>"" then node = node &"icon:"& rs("icon") &";"
if rs("data")<>"" then node = node &"data:"& reg.replace(rs("data"), chr(15)) &";"
node = node &"url:tree_edit.asp?id="&rs("id")&";"
if rs("target")<>"" then node = node &"target:"& rs("target") &";"
if rs("method")<>"" then node = node &"method:"& reg.replace(rs("method"), chr(15)) &";"
response.write node &"""" '生成节点信息
rs.movenext
免责声明： 本文仅代表作者个人观点，与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。
