Facing problem to Checkin and checkout file from starteam using vba

Question

Hi,
Im trying to checkin and checkout file in starteam through vba. I have imported the
StarTeamSDK104.dll in reference in vba project and tried to accomplish my task.
I am able to locate the file, but not able to checkout/checkin the file. I am not sure how to use checkin/checkout function in vba. I am getting an error at the checkout code(hichlighted in bold in the below code). Also I was able to
do it in java but i want it in vba.
Could someone help me on this.
Below is the code im using.
Sub ST_Test()
Dim strAddress As String
Dim nPort As Long
Dim strUser As String
Dim strPassword As String
Dim strProjectName As String
strAddress = "Sample Address"
nPort = 1234
strUser = "Sample Username"
strPassword = "Sample Password"
strProjectName = "Sample Project"
Dim Factory As New StServerFactory
Dim Server As StServer
Set Server = Factory.Create(strAddress, nPort)
Server.Connect
Server.logOn strUser, strPassword
Dim project As StProject
Set project = FindProject(Server, strProjectName)
Dim view As StView
Dim finder As StStarTeamFinder
Dim Folder As Stfolder
Set view = project.DefaultView
Set Folder = view.RootFolder
For Each chk In Folder.getItems(Server.TypeNames.File)
    Dim fileitem As StFile
    Set fileitem = chk
    If fileitem.Name = "Filename.txt" Then
        fileitem.checkout(0,False,True,False )
    End If
Next chk
End Sub

Answer 1

Hi,
As for the checkout method, please refer to the following link:
http://msdn.microsoft.com/en-us/library/office/aa223821(v=office.11).aspx
The syntax is:
expression.CheckOut(FileName)
Jaynet Zhang
TechNet Community Support