62,268
社区成员
发帖
与我相关
我的任务
分享大侠们帮忙查下看有语句上才错误没~
<%
function rC()
dim gpage
gpage=request.cookies("fzfs")("cpage")
rC=gpage
end function
dim url
url=rC()
if url="" then
url="/admin/enter.asp"
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<script>
function b(){
var url='<%=rC()%>';
window.location.href=url;}
function BackPre(){
setTimeout("b()",3000);
}
</script>
</head>
<body>
<%
dim txt,fs
txt=request("indexdata")
if (txt="") then
response.Write("更新数据时出现网络错误，请检查网络连接")
response.End()
end if
'response.Write(txt)
f=server.MapPath("../index0.html")
set fso=server.CreateObject("scripting.filesystemobject")
set w=fso.CreateTextFile(f,true)
w.write txt
w.close
'response.Write(server.MapPath("../index0.html"))
response.Write("首页index0.html生成...3秒后返回<script>BackPre();</script>")
'得到操作的来源
%>
<span id="loadifo"></span>
<br>
<div id="prolist"></div>
</body>
</html>
function rC()
dim gpage
gpage=request.cookies("fzfs")("cpage")
rC=gpage
end function
dim url
url=rC()
if url="" then
url="/admin/enter.asp"
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<script>
function b(){
var url='<%=rC()%>';
window.location.href=url;}
function BackPre(){
setTimeout("b()",3000);
}
</script>
</head>
<body>
<%
dim txt,fs
txt=request("indexdata")
if (txt="") then
response.Write("更新数据时出现网络错误，请检查网络连接")
response.End()
end if
'response.Write(txt)
f=server.MapPath("../index0.html")
set fso=server.CreateObject("scripting.filesystemobject")
set w=fso.CreateTextFile(f,true)
w.write txt
w.close
'response.Write(server.MapPath("../index0.html"))
response.Write("首页index0.html生成...3秒后返回<script>BackPre();</script>")
'得到操作的来源
%>
<span id="loadifo"></span>
<br>
<div id="prolist"></div>
</body>
</html>
...全文
请发表友善的回复…
发表回复
