SUB Connect ( HostOrPath AS String [ , Port AS Integer ] )