clsMiningModelRole
Not
Bu özellik Microsoft SQL Server'ın bir sonraki sürümünde kaldırılacaktır. Yeni geliştirme işlerinde bu özelliği kullanmayın ve bu özelliği kullanmakta olan uygulamaları mümkün olduğunca erken bir zamanda değiştirin.
Bir nesnenin ClassType clsMiningModelRole karar destek nesneleri (dso) belirli bir uygulaması sağlar Role arabirim için veri madenciliği modelleri.Bu nesne derlemeleri, yöntemleri ve özellikleri yoluyla sağlar Role arabirim.
Nesneleri kullanmak ClassType clsMiningModelRole yönetmek için küme bir araştırma modeli ve içinde bunlar erişebilir it. şekilde erişebilen kullanıcılar,Bir araştırma modeli rolü bir ad, açıklama, üst nesne, bir sınıf türü, kullanıcıların listesini ve bir izin küme vardır.Her izin, bir anahtar ve ilgili bir izin ifade vardır.
İçinde veritabanı rolleri oluşturmak düzey (veritabanı rolleri) ve bunları veri madenciliği modelleri (araştırma modeli rolleri) araştırma modeli ile ilişkili rolleri topluluğu için ekleyerek atayabilirsiniz.
Veritabanı rolü veritabanından 's kaldırarak kaldırmak koleksiyon rolü nesneleri.Bunu yaptığınızda, sistem otomatik olarak ilgili araştırma modeli rolleri madenciliği modelinden 's kaldırır koleksiyon rolü nesneleri.
Araştırma modeli rolü madenciliği modelinden 's kaldırarak kaldırmak koleksiyon rolü nesneleri.Bunu yaptığınızda, karşılık gelen veritabanı rolü etkilenmez.Güncelleştirmek veya işleme kadar ancak araştırma modeli rol tanımı etkin kalır küp.
Örnekler
If dsoDb.DataSources("DMTest") Is Nothing Then
Set dsoDs = dsoDb.DataSources.AddNew("DMTest")
dsoDs.ConnectionString = "provider=Microsoft.Jet.OLEDB.4.0;data source=d:dmtest2.mdb"
dsoDs.Update
End If
'Create a new mining model role.
If dsoDb.Roles("DMDev") Is Nothing Then
Set dsoRole = dsoDb.Roles.AddNew("DMDev")
dsoRole.UsersList = "DOMAIN\SomeUser"
dsoRole.Update
End If
'Check to see whether the mining model exists.
If Not dsoDb.MiningModels("CustSalesRel") Is Nothing Then
'Delete it if it does.
dsoDb.MiningModels.Remove "CustSalesRel"
End If
'Now create the model afresh.
Set dsoDmm = dsoDb.MiningModels.AddNew("CustSalesRel")
'Add a new datasource for the model
dsoDmm.DataSources.AddNew "DMTest"
'Add a data mining role to the new mining model.
Set dsoRole = dsoDmm.Roles.AddNew("DMDev")