28,391
社区成员
发帖
与我相关
我的任务
分享本地测试没问题，传到服务器上出现乱码?
个人网站，在本地址测试没问题。
传到服务器上去后，网站地址:http://www.jhsybin.com/flash/ ，点"博客日志"（用的PJBlog3程序）后，主页就出乱码，关闭浏览器，再重新打开又正常了，但一点点"博客日志"又出来乱码。
如“站点日志”asp页面：http://www.jhsybin.com/flash/webNews.asp 点"博客日志"后，这个页面就有乱码。
“站点日志”asp代码如下，是不是这里代码有问题？
传到服务器上去后，网站地址:http://www.jhsybin.com/flash/ ，点"博客日志"（用的PJBlog3程序）后，主页就出乱码，关闭浏览器，再重新打开又正常了，但一点点"博客日志"又出来乱码。
如“站点日志”asp页面：http://www.jhsybin.com/flash/webNews.asp 点"博客日志"后，这个页面就有乱码。
“站点日志”asp代码如下，是不是这里代码有问题？
<%@ Language=VBScript %>
<!--#include file="webConn.asp" -->
<%
Dim PageSize
dim rs
PageSize=15
Dim i
Dim intPageCount
Dim intRecordCount
Dim page
if isempty(Request("Page")) then
Page=1
else
if isnumeric(request("page")) then
on error resume next
Page=clng(abs(Request("Page")))
if err.number<>0 then
Page=1
err.clear
end if
on error goto 0
else
Page=1
end if
end if
Response.ContentType = "text/xml"
Response.Expires = -1
Response.Write "<?xml version='1.0' encoding='GB2312'?>"
Response.Write "<threads "
Set rs=Server.CreateObject("ADODB.RecordSet")
rs.Open "select * from news order by id desc",con,3
intRecordCount=rs.RecordCount
if not (rs.EOF and rs.BOF) then
rs.PageSize=PageSize
intPageCount=rs.PageCount
if page>intPageCount then
page=intPageCount
end if
rs.AbsolutePage=Page
Response.Write "PageCount="""&intPageCount&""" RecordCount="""&intRecordCount&""" AdminLog="""&AdminLogFlag&""">"
for i=1 to pagesize
if rs.EOF then
exit for
end if
Response.Write "<message>"
Response.Write "<id>"
Response.Write rs("id")
Response.Write "</id>"
Response.Write "<date>"
Response.Write rs("date")
Response.Write "</date>"
Response.Write "<body><![CDATA["
Response.Write rs("content")
Response.Write "]]></body>"
Response.Write "</message>"
rs.MoveNext
NEXT
END IF
rs.Close
Set rs=nothing
Response.Write "</threads>"
%>
...全文
请发表友善的回复…
发表回复
sottboy123 2011-10-07
- 打赏
- 举报
<?xml version="1.0" encoding="gb2312"?>
改成：<?xml version="1.0" encoding="utf-8"?>
看会不会
改成：<?xml version="1.0" encoding="utf-8"?>
看会不会
xzf888 2011-10-07
- 打赏
- 举报
试着用记事本另存为UTF-8或GB2312试试,或着另新建一个ASP空白文件,把原来的代码复制过去,一般问题可解决,
静花水月冰 2011-10-07
- 打赏
- 举报
还是一样的，出来乱码。。。再说，浏览器本身默认UTF-8。
butcher2002 2011-10-07
- 打赏
- 举报
修改internet选项 - 高级 总以UTF-8发送网址
luoxiang123 2011-10-07
- 打赏
- 举报
是不是你浏览器默认是UTF-8呢。你看看。
静花水月冰 2011-10-07
- 打赏
- 举报
改成utf-8后，这个asp生成xml文件都不对了....
静花水月冰 2011-10-06
- 打赏
- 举报
不是吧，去掉还是一样显示乱码，你那没问题？我这怎么出来乱码：
亚细亚 2011-10-06
- 打赏
- 举报
测试你的网站，没问题！
亚细亚 2011-10-06
- 打赏
- 举报
你将<%@ Language=VBScript %>删除，试一试
