欢迎来到Doc100.Net免费学习资源知识分享平台!
您的位置:首页 > 程序异常 >

asp+access数据库二级联动ajax返回数据ie下乱码有关问题

更新时间: 2014-01-05 00:56:14 责任编辑: Author_N1

 

ASP+ACCESS数据库二级联动Ajax返回数据IE下乱码问题
附上所有文件代码,找了好多天真心不知道哪里出了问题,在谷歌浏览器下是正常的,但是在IE下在第二级菜单option就是乱码口口口那种东西了....求高手解决啊。。代码要怎么修改

index.asp

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp" -->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>成绩查询</title>
<script language="javascript" type="text/javascript" src="Ajax.js"></script>
</head>

<body>
<br />
<form name="myform" action="result.asp" method="post">
  <select name="BId" onChange="getoId(this.value,'');">
    <option value="">选择课程性质</option>
<%
        Dim oRs,oSQL
        Set oRs = server.CreateObject("adodb.recordset")
        oSQL = "Select * From score Where oId = 0 Order by id asc"
        oRs.Open oSQL,Conn,1,1
        If (oRs.EOF And oRs.BOF) Then
            Response.Write("<option value="""">选择课程性质</option>")
        Else
            Do While Not oRs.EOF
                Response.Write("<option value="""&oRs(0)&""">"&oRs(1)&"</option>")
            oRs.MoveNext
            Loop
        End If
        oRs.Close:Set oRs = Nothing
        %>
  </select>
  <span id="SmClass"></span>
  <input name="" type="submit"  value="查询"/>
</form>
</body>
</html>



------------------------------------------------

result.asp

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp" -->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>成绩查询</title>
<script language="javascript" type="text/javascript" src="Ajax.js"></script>
<link href="../css/result.css" rel="stylesheet" type="text/css" />
</head>

<body>
<br />
<form name="myform" action="result.asp" method="post">
  <select name="BId" onChange="getoId(this.value,'');">
    <option value="">请选择课程性质</option>
<%
        Dim oRs,oSQL
        Set oRs = server.CreateObject("adodb.recordset")
        oSQL = "Select * From score Where oId = 0 Order by id asc"
        oRs.Open oSQL,Conn,1,1
        If (oRs.EOF And oRs.BOF) Then
            Response.Write("<option value="""">请选择课程性质</option>")
        Else
            Do While Not oRs.EOF
                Response.Write("<option value="""&oRs(0)&""">"&oRs(1)&"</option>")
            oRs.MoveNext
            Loop
        End If
        oRs.Close:Set oRs = Nothing
        %>
  </select>
  <span id="SmClass"></span>
  <input name="" type="submit"  value="查询"/>
</form>
<%
Score = Request.Form("Score")
Response.Write("<div class=""score_title"">")
Response.Write("所查课程的成绩:</div>")
Response.Write("<div class=""score_value"">")
Response.Write("<span style=""font-size:200px"">")
Response.Write(""&Score&"</span>分</div>")
%>
</body>
</html>


上一篇:上一篇
下一篇:下一篇

 

随机推荐程序问答结果

 

 

如对文章有任何疑问请提交到问题反馈,或者您对内容不满意,请您反馈给我们DOC100.NET论坛发贴求解。
DOC100.NET资源网,机器学习分类整理更新日期::2014-01-05 00:56:14
如需转载,请注明文章出处和来源网址:http://www.doc100.net/bugs/t/1561/
本文WWW.DOC100.NET DOC100.NET版权所有。