#12004/6/13 14:26:15
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
set fs=server.CreateObject("scripting.filesystemobject")
sourcefile=server.MapPath("/readwrite.asp")
targetfile=server.MapPath("/operatefile/wrtieread.asp")
on error resume next
fs.copyfile sourcefile,targetfile 'cpoy文件用copyfile方法拷贝文件
if error=53 then
response.Write"不存在" & sourcefile & "文件"
response.End
else if error=70 then
response.Write targetfile & "被锁定或为只读"
response.End
else if error<>0 then
response.Write"其他未值错误。错误编号=" & err.number
response.End
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>拷贝文件(copyfile)</title>
</head>
<body>
<font size="2">
<div align="center">
<%=SourceFile%>已经复制到<%=TargetFile%>!
</div>
</font>
</body>
</html>
提示我 <%=SourceFile%>已经复制到<%=TargetFile%>! 错误? 看了很长时间没有看出来。哪个兄台能否帮忙看一下?谢谢!