Articles

  • Uploading and Download Files
    Date: March 28, 2012     Views:7361
  • It used to take a whole class of functions to accomplish what can now be done with a few lines of code.
    	If My.Computer.Network.Ping("www.google.com", 1000) Then
      		MsgBox("Server pinged successfully.")
    	Else
      		MsgBox("Ping request timed out.")
    	End If
    
    	My.Computer.Network.DownloadFile _
        	("http://www.google.com/downloads/SomeFile.txt", _
        	"C:DocumentsSomeFile.txt")
    
    	My.Computer.Network.UploadFile( _
    	"C:DocumentsSomeFile.txt", _
    	"http://www.google.com/uploads/")