UC知道asp转换成html时有的中文是乱码,有的中文正常,是怎么回事?
来源：百度知道 编辑：UC知道 时间：2024/09/22 14:23:04
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%server.ScriptTimeout=1000%>
<%
set conn=server.CreateObject("adodb.connection")
connstr="provider=microsoft.Jet.OLEDB.4.0;data source="&server.MapPath("../App_Data/urls.mdb")
conn.open connstr
%>
<%
set rs=server.CreateObject("adodb.recordset")
sql="select * from tbtotal"
rs.open sql,conn,1,1
if rs.eof then
else
path5="../asphtml"
do while not rs.eof
'filename=Replace(Replace(Replace(rs("addtime"),":",""),"-","")," ","")&".html"
filename="index"&".html"
url="http://localhost/ssrruu/index.asp?id="&rs("id")
Call createhtml(url,file
<%server.ScriptTimeout=1000%>
<%
set conn=server.CreateObject("adodb.connection")
connstr="provider=microsoft.Jet.OLEDB.4.0;data source="&server.MapPath("../App_Data/urls.mdb")
conn.open connstr
%>
<%
set rs=server.CreateObject("adodb.recordset")
sql="select * from tbtotal"
rs.open sql,conn,1,1
if rs.eof then
else
path5="../asphtml"
do while not rs.eof
'filename=Replace(Replace(Replace(rs("addtime"),":",""),"-","")," ","")&".html"
filename="index"&".html"
url="http://localhost/ssrruu/index.asp?id="&rs("id")
Call createhtml(url,file
Set MyTextFile=MyFileObject.CreateTextFile(path1)
找到这句话 把CreateTextFile改为OpenTextFile
然后在试试
不行的话在看看的你asp页面最上面得几句话是否被删除掉。
也就是新建一个asp页面 原有的标签，很多人愿意把他们删除掉。
动态看不出来，用创建和写入 也就是fso组件的时候却很容易看出那几句话的重要性，<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!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" />
着几句话，尤其是第一句，删除后很容易出现乱码，而且是在IE6中看不到IE7中看的到时乱码