trattobasso (Normal User)
Pro
 
Messaggi: 89
Iscritto: 02/05/2007
|
Ciao a tutti e prima di tutto buone feste.
Sto cercando (inutilmente come il solito) di eseguire un copia file descritto concettualmente pių o meno come segue.
- textbox per inserire il nome della persona
- open file dialog per catturare il nome del file
- il percorso di destinazione dovrebbe essere cosė composto:
cartella predefinita presente sul disco+cartella da creare prelevando il nome dalla textbox + nome del file
Quello che concettualmente e praticamente non riesco a capire č come indicare il percorso sopra descritto.
Ovviamente per copiare il file faccio cosė:
Codice sorgente - presumibilmente Plain Text |
(My.Computer.FileSystem.SpecialDirectories.MyDocuments & "\cartella\cartella2........................................................."),Microsoft.VisualBasic.FileIO.UIOption.OnlyErrorDialogs, FileIO.UICancelOption.DoNothing)
|
Ciao
|
|
|
GN (Member)
Guru
Messaggi: 772
Iscritto: 30/04/2011
|
Se ho capito bene cosa vuoi fare, cosė dovrebbe funzionare:
Codice sorgente - presumibilmente VB.NET |
Dim dir As String = My.Computer.FileSystem.SpecialDirectories.MyDocuments & "\" & TextBox1.Text My.Computer.FileSystem.CreateDirectory(dir) Dim info as New IO.FileInfo(OpenFileDialog1.FileName) My.Computer.FileSystem.CopyFile(OpenFileDialog1.FileName, dir & "\" & info.Name)
|
|
|
|
NR2 (Normal User)
Newbie
Messaggi: 18
Iscritto: 26/06/2010
|
puoi provare anche cosi
Codice sorgente - presumibilmente VB.NET |
If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then Dim cartella As String = My.Computer.FileSystem.SpecialDirectories.MyDocuments + "\" + TextBox1.Text MkDir(cartella) My.Computer.FileSystem.CopyFile(OpenFileDialog1.FileName, cartella + "\" + OpenFileDialog1.SafeFileName) End If
|
|
|
|
