OK What have I done wronge?
Thanks
John Fuhrman
Code:
Set objSQLDataBaseCat = New ADOX.Catalog
cnn.Open "Provider = SQLNCLI10;" & _
"Data Source = strServer;" & _
"Initial Catalog = strDatabase;" & _
"Integrated Security = SSPI;"
Set objSQLDataBaseCat.ActiveConnection = cnn
Thanks
John Fuhrman