Hola novatillo, jejeje...salvo un par, aquí más o menos tenemos todos el mismo título.
A ver. Primero mete estos 2 controles (el primero es el botón "examinar", y el segundo el botón para guardar, que yo he puesto como un imagebutton, pero que puede ser cualquier tipo de botón).
<INPUT id="File1" type="file" name="File1" runat="server">
<asp:imagebutton id="btnguardar" runat="server" ImageUrl="iconos\guardar.jpg"></asp:imagebutton>
Luego pones el siguiente código:
If Not File1.PostedFile Is Nothing And File1.PostedFile.ContentLength > 0 Then
Dim fn As String = System.IO.Path.GetFileName(File1.PostedFile.FileNa me)
Dim varidentificador As String
varidentificador = lblidentificadorrecuperado.Text
' con esto le estoy diciendo que la ruta que me tiene que guardar es la de mi aplicación, pero dentro de una carpeta llamada "subir", y con el nombre que es especifico en "varidentificador" (esto último es el nombre que le vas a dar a la carpeta que se crea con 'CreateDirectory'
Dim Ruta As String = Server.MapPath("Subir\") & varidentificador
Dim directorio As DirectoryInfo = Directory.CreateDirectory(Ruta)
'fn es el nombre del archivo que capturas, y que conservará el nombre al guardarlo
Dim SaveLocation As String = Server.MapPath("Subir") & "\" & varidentificador & "\" & fn
Try
File1.PostedFile.SaveAs(SaveLocation)
Catch Exc As Exception
lblfichero.Visible = True
lblfichero.Text = "Error: " & Exc.Message
End Try
Espero que te sirva.
