可运行成功的代码如下
<html>
<head>
<title>复制文件</title>
<%
dim fos
Set fos=Server.CreateObject("Scripting.FileSystemObject")
fos.CopyFile "I:\a.txt","i:\new\a1.txt"
%>
</head>
<body>
</body>
</html>
这样也就是只要打开这个页面就将I:\a.txt复制为到i:\new\a1.txt了.
然后我想加一个按钮,在页面中按下按钮后在进行文件的复制操作,修改的代码如下:
<html>
<head>
<title>复制文件</title>
<%
Sub button1_OnClick
dim fos
Set fos=Server.CreateObject("Scripting.FileSystemObject")
fos.CopyFile "I:\a.txt","i:\new\a1.txt"
End Sub
%>
</head>
<body>
<form>
<input type="button" name="button1" value="按下去">
</form>
</body>
</html>
然后就运行不成功了.
请大家告诉我(应该都比我强多了吧,我才学第三天).我修改后的代码错误在哪里?为什么不行.
而这段在客户端运行的代码却没错误 | 
