FSO ile sunucudaki dosyayı kopyalama

Bu dersimizde fso ile sunucudaki dosyalarımızı bir yerden bir başka yere kopyalayacağız. Bunu daha iyi anlatmak için örnek uygulama hazırlayalım. Bu örnekte VBScript dili kullanılmıştır.

Kod:

<%
Option explicit
Dim strFile
strFile=request.querystring(“file”)
Set conexion= server.createobject(”adodb.connection”)
Set rs=server.createobject(”adodb.recordset”)
strSql=”select * from downloads where file=’” & strFile &”‘”
conexion.open YourStringConnection
rs.open strSql,conexion,1,3
rs(”counter”)=cint(rs(”counter”))+1
rs.Update
rs.Close
Set rs=nothing
conexion.Close
Set conexion=nothing
response.redirect “downloads/winxp/”&strfFile
%>