Como modifico este código
Uso este código en asp para subir un archivo *.mdb que se encuentra en la carpeta base de mi disco c: ahora bien la pregunta es como puedo modicarlo para que busque el archivo y lo suba directamente
Muchísimas Gracias
<%
Dim upl, NewFileName
Set upl = Server.CreateObject("ASPSimpleUpload.Upload")
If Len(upl.Form("File1")) > 0 Then
NewFileName = "/login/" & upl.ExtractFileName(upl.Form("File1"))
If upl.SaveToWeb("File1", NewFileName) Then
Response.Write("Se Cargo con Exito.")
Else
Response.Write("No subiste nada.")
End If
End If
%>
<html><head><title>Upload Base de Logins</title></head>
<body>
<form method="POST" action="Up.Asp" enctype="multipart/form-data">
Selecionar Base a Subir a la Carpeta Login:
<input type="file" name="File1" size="30">
<input type="submit" name="submit" value="Subir">
</form>
</body>
</html>
Muchísimas Gracias
<%
Dim upl, NewFileName
Set upl = Server.CreateObject("ASPSimpleUpload.Upload")
If Len(upl.Form("File1")) > 0 Then
NewFileName = "/login/" & upl.ExtractFileName(upl.Form("File1"))
If upl.SaveToWeb("File1", NewFileName) Then
Response.Write("Se Cargo con Exito.")
Else
Response.Write("No subiste nada.")
End If
End If
%>
<html><head><title>Upload Base de Logins</title></head>
<body>
<form method="POST" action="Up.Asp" enctype="multipart/form-data">
Selecionar Base a Subir a la Carpeta Login:
<input type="file" name="File1" size="30">
<input type="submit" name="submit" value="Subir">
</form>
</body>
</html>
