Locks on a shapefile

09-20-2012 02:16 PM
New Contributor
I'm lost trying to get small routines to work. This works in 9 but bums with locking errors in 10. Any ideas where I can look to see a non highly technical explanation of how to handle locks in 10 using vb.net?
   Public Sub Dissolve_ByDisposition(ByVal inputname As String, ByVal tmpPath As String)

        Dim pGP As Object
        pGP = CreateObject("esriGeoprocessing.GPDispatch.1")
        pGP.OverwriteOutput = True
        On Error GoTo EH
        pGP.Workspace = tmpPath
        ' note: the inputs can also be objects; however the output must be a string.
        pGP.Dissolve(tmpPath & "\" & inputname & ".shp", tmpPath & "\" & inputname & "_dissolve", "DISP_NUM")
        Exit Sub
        MsgBox(pGP.GetMessages(), vbOKOnly, "Check Dissolve_ByDisposition")
    End Sub

Please don't laugh at the error trap. I know try is the next thing to learn.
0 Kudos
0 Replies