主题:  纳闷,给点提示,谢谢!

dnaliang

职务:普通成员
等级:1
金币:1.0
发贴:193
#12004/6/14 10:23:56
copy.asp文件

<%
set fs=server.CreateObject("scripting.filesystemobject"
sourcefile=server.MapPath("/ezone/readwrite.asp"
targetfile=server.MapPath("/ezone/operatefile/writeread.asp"
'sourcefile=server.MapPath("/readwrite.asp"
'如果文件在c:/inetpub/wwwroot/根目录下就只要输入(/readwrite.asp),“/”不能少掉。
'targetfile=server.MapPath("/operatefile/wrtieread.asp"
on error resume next
fs.copyfile sourcefile, targetfile 'cpoy文件用copyfile方法拷贝文件
if err.number=53 then
response.Write"不存在" & sourcefile & "文件"
response.End
elseif err.number=70 then
response.Write targetfile & "被锁定或为只读"
response.End
elseif err.number<>0 then
response.Write"其他未值错误。错误编号=" & err.number
response.End
end if
%>
<html>
<head>
<meta content="3;url='operatefile.asp'" http-equiv="refresh">
<title>拷贝文件(copyfile)</title>
</head>
<body>
<%=SourceFile%> 已成功地复制到<%=TargetFile%>!
<br><br>3秒后返回!。。。
</body>
</html>

--------------------------------------------------------------------------------------------------------=====

exists.asp文件

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
set fs=server.CreateObject("scripting.filesystemobject"
sourcefile=server.MapPath("/ezone/operatefile/writeread.asp"
on error resume next
if fs.fileexists(sourcefile)=true then
response.Write sourcefile & "文件存在!"
response.End()
else
response.Write sourcefile & "文件不存在!"
response.End()
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta http-equiv="refresh" content="1 ;url='operatefile.asp'">
<title>判断文件是否存在(existsfile)</title>
</head>
<body>
1秒后自动返回。。。
</body>
</html>
--------------------------------------------------------------------------------------------------------------
为什么copy.asp文件中的,meta标签可以用(即能自动返回),而exists.asp文件的meta标签无效(即不能自动返回),而且其中的body中的内容都看不到。纳闷,看了半天看不原因,哪个朋友能够给予提示下。谢谢。



dnaliang

职务:普通成员
等级:1
金币:1.0
发贴:193
#22004/6/15 12:43:09
怎么在网页编码区没有人里,到这里也没有人里啊。我晕了。这是asp专区吗?