J
jrose
After many happy months of use, my custom form has suddenly decided
that "object does not support this property or method: oItem.FileAs".
Since this is a business app, we are getting help desk tickets. Any
ideas why this would suddenly quit working? the section of code goes
like this:
Public Function ReadSettings()
Dim oCurrentFolder
Set oCurrentFolder = Application.ActiveExplorer.CurrentFolder
Dim oSettingsFolder
Set oSettingsFolder = oCurrentFolder.Folders(sSettingsFolder)
Dim oItem
For Each oItem In oSettingsFolder.Items
If UCASE(oItem.FileAs) = UCASE(sSettingsField) Then
ReadSettings = oItem.Body
End If
Next
End Function
Thanks in advance for your help.
that "object does not support this property or method: oItem.FileAs".
Since this is a business app, we are getting help desk tickets. Any
ideas why this would suddenly quit working? the section of code goes
like this:
Public Function ReadSettings()
Dim oCurrentFolder
Set oCurrentFolder = Application.ActiveExplorer.CurrentFolder
Dim oSettingsFolder
Set oSettingsFolder = oCurrentFolder.Folders(sSettingsFolder)
Dim oItem
For Each oItem In oSettingsFolder.Items
If UCASE(oItem.FileAs) = UCASE(sSettingsField) Then
ReadSettings = oItem.Body
End If
Next
End Function
Thanks in advance for your help.