This is the code that I have I need to be able to put the proxy that is detected into the download string. I left out the Else statement because it doesnt matter but if someone can help I would be greatful.Code:Dim key As Microsoft.Win32.RegistryKey key = Microsoft.Win32.Registry.CurrentUser.OpenSubKey("Software\Microsoft\Windows\CurrentVersion\Internet Settings", True) Dim Proxy As String = CType(key.GetValue("ProxyServer"), String) Dim Enable As String = CType(key.GetValue("ProxyEnable"), String) If Enable = 1 Then 'Gets Time Dim StartTime As Decimal StartTime = TimeOfDay.Minute & "." & TimeOfDay.Second Dim wc As New System.Net.WebClient() Dim wp As New System.Net.WebProxy(Proxy) wc.DownloadFile("http://www.online-solutions.org/flash/player/flashplayer7_netscape.exe", _ "C:\flashplayer7_netscape.exe") 'Gets time Dim EndTime As Decimal EndTime = TimeOfDay.Minute & "." & TimeOfDay.Second ''Deletes the file 'filesys.DeleteFile("c:\newf1.zip") Dim TimeIt As Integer If EndTime - StartTime = 0 Then MessageBox.Show("Error") End Else 'Calculates the download rate and stores it in a variable TimeIt = 668 / (EndTime - StartTime) End If End If
Thanks




Reply With Quote