>************************************ >FUNCTION AddSourceConnection >************************************ >* >* Add a source connection to the package >* > >LOCAL oConnection AS DTS.Connection2 > >oConnection = goPackage.Connections.New("VFPOLEDB") >WITH oConnection > .Name = "Source Connection" > .ID = 1 > .Reusable = .t. > .ConnectImmediate = .f. > .DataSource = "\\ServerName\SomeDir\" > .ConnectionTimeout = 60 > .UseTrustedConnection = .f. > .UseDSL = .f. >ENDWITH > >goPackage.Connections.Add(oConnection) >RELEASE oConnection > >RETURN