---

Benötige bitte Hilfe zu folgendem Problem:
Wie kann ichaus VB mit der Smarteam API ein bestimmtes PRojekt finden (über CN_DESCRIPTION Eintrag) und als Object zur Weiterverarbeitung ansprechen ?
Möchte Objekte via VB einem bestimmten Project zuordnen (LinkOneLevel), hab aber noch wenig programmiert, und weiß daher nicht, wie ich zu meinem Project komme (ohne das eine Eingabe notwendig ist, aufruf des Views mit Projectauswahl kenne ich, Script muß aber ohne Interaktion laufen)
Danke Bettina

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hi Bettina,

schau mal :

{Session ist die smSession die in meinem Projekt global definiert war.}

'**********************************************************

Private Sub Command22_Click()

Dim Query As SmApplic.ISmQuery
Dim QueryDefinition As SmApplic.ISmQueryDefinition
Dim DokuClass As SmApplic.ISmClass
Dim QueryRecord As SmRecord

Dim count As Integer

' Objecte erzeugen
Set Query = Session.ObjectStore.NewQuery
Set QueryDefinition = Query.QueryDefinition

' Klassen ID holen
Set DokuClass = Session.MetaInfo.SmClassByName("Projects")

' Query Definieren
QueryDefinition.Roles.Add DokuClass.ClassId, "F"
QueryDefinition.Where.Add "", "TDM_DESCRIPTION", "=", "CATPro 2004", False, "F"
Query.Run

MsgBox "Anzahl der gefundenen Datensätze :" & Query.RecordCount

If Query.RecordCount > 0 Then
Set SmProjectObject = Session.ObjectStore.ObjectFromData(Query.QueryResult.GetRecord(0), True)
End If

MsgBox "fertig"

End Sub

'**********************************************************

Wenn Du das Projekt hast, kannst Du mit
http://ww3.cad.de/foren/ubb/Forum126/HTML/000159.shtml

weiter machen (wenn's auch auf den Desktop soll). Jedoch musst Du dann noch die 'Nothing's entsprechend definieren.

Gruß
Christian

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Danke sehr, dachte mir das es über Query geht, nur hab ich bislang noch nichts damit gemacht.
Aber dank deiner Hilfe glaube ich jetzt die Query auch zu verstehen.
lg
Bettina

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP