Thread obsoleto Destinazione Salvataggio File VB6

[vipri]

Salve ragazzi.

Avevo provato a fare un downloander che scaricasse un determinato file sul desktop.

Ma non riesco a trovare la stringa per fare una cosa tipo:

C:\NOME UTENTE IN USO DA CHI APRE L'EXE\Desktop\NOMEFILE

Potete aiutarmi? :gururun:

 

[osi94]

Ciao Vipri,
usa il componente Inet.
Ti allego un progetto di esempio che scarica un immagine.

 

[R3tr0s]

Metti questo nella dichiarazione del Codice:

Private Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long

Poi Questo Inseriscilo normalmente nel codice

Function getNomeUser() As String
Dim strString As String
Dim lunghezzaStringa As Long
lunghezzaStringa = 32
strString = String(lunghezzaStringa, " ")
GetUserName strString, lunghezzaStringa
strString = Left(strString, lunghezzaStringa)
getNomeUser = strString
End Function

Ora devi solo Richiamare la Funzione così:

Dim utente As String
utente = getNomeUser
utente = Mid(nome_utente, 1, Len(nome_utente) - 1)

poi per salvarlo fai così

"C:\blablabla" + utente + "\Desktop\blablabla"

^^

 

[vipri]

Ciao R3tr0

Noto che quando metto

Perfavore, Entra oppure Registrati per vedere i codici!

Esce scolamente

Perfavore, Entra oppure Registrati per vedere i codici!

Inoltre ho un problema...

Come faccio a fare una cosa tipo:

Praticamente se c'è più di un account nel pc la stringa è

Perfavore, Entra oppure Registrati per vedere i codici!

Quando invece l'account è uno solo

Perfavore, Entra oppure Registrati per vedere i codici!

 

[EeeWindows7]

Io metto come root il desktop,in pratica col savefiledialog.
Moolto meglio ;)