Ciao a tutti...
avrei un problema con una connessione a un server per recupeerare dei file...
il codice che vadoa utilizzare è il seguente:
codice:Private Declare Auto Function LogonUser Lib "advapi32.dll" (ByVal lpszUsername As [String], _ ByVal lpszDomain As [String], ByVal lpszPassword As [String], _ ByVal dwLogonType As Integer, ByVal dwLogonProvider As Integer, _ ByRef phToken As IntPtr) As BooleanlogonEffettuatoConSuccesso = Truecodice:Dim tokenHandle As New IntPtr Dim proceduraEffettuataConSuccesso = True Dim logonEffettuatoConSuccesso As Boolean = LogonUser(Me.username, Me.domain, Me.password, 9, 0, tokenHandle) Dim wid As New WindowsIdentity((tokenHandle)) If logonEffettuatoConSuccesso Then Using wid.Impersonate Dim di As New IO.DirectoryInfo(path) Dim listaFileDirectory As IO.FileInfo() = di.GetFiles("*.txt") End Using End If
ma quando si esegue:
da questo errore:codice:Dim listaFileDirectory As IO.FileInfo() = di.GetFiles("*.txt")
Il nome di rete specificato non è più disponibile.

Rispondi quotando