Ti posto il codice:
Private Declare Auto Function GetPrivateProfileString Lib "kernel32.dll" _
(ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal lpDefault As String, _
ByVal lpReturnedString As String, ByVal nSize As Integer, ByVal lpFileName As String) As Integer
Sub ReadINI()
SourceFolder = My.Application.Info.DirectoryPath
CompletePath = SourceFolder & "\" & "config.ini"
sRetVal = GetPrivateProfileString("parametri", "DefaultPage", "", RtnStr, Len(RtnStr), CompletePath)
strHostName = System.Net.Dns.GetHostName()
strIPAddress = System.Net.Dns.GetHostEntry(strHostName).AddressLi st(0).ToString()
urlDefault = Trim(Left(RtnStr, sRetVal) + "?LocalIPAddress=" + strIPAddress + "&LocalHostName=" + strHostName)
MsgBox(urlDefault )
End sub
E' corretto???
Grazie

Rispondi quotando