06-08-2023
03:31 AM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
06-08-2023
03:31 AM
hello everyone,
I don't get what is wrong with this code, I have tried everything it ocurred to me...and nothing works.
I have tried the code from @WCrihfield but it just keeps prompting the error.
I tried to add ifs before, and to change every single line to something else (with my really poor ilogic knowledge).
Right now I'm just trying to skip the case if there is not a date in the parameter of the autocad block but for some reason it doesn't work. (It really is not what I wanted to do, but right now, i'll be ok with anything)
Case "SH_DATE_MODIF"
Dim dRevDate As Date
Dim cero As Integer
cero = "0"
Try : oCProp.value("FECHA REVISION") = cero : Catch : End Try
Try : oCProp = oCProps.Item("FECHA REVISION") : Catch : End Try
If oCProp.Value = cero
GoTo siguiente
Else
Try : oCProp = oCProps.Item("FECHA REVISION")
Catch : oCProp = oCProps.Add(sValue , "FECHA REVISION") : End Try
If oCProp.Value <> sValue Then Try : oCProp.Value = sValue : Catch : End Try
End If
siguiente :
It prompts "reference to an object not established as instance of an object"
I tried to put it as an string as well but nothing
It must be something really simple, but I don't see the problem