General information
Category:
Forms & Form designer
Naomi
I visited the link, and I saw the code below to put into beforeopentables method
As I have many forms, is there a way to grab all forms as objects
and run the code below to set all their DE.s ?
Moises
>>FUNCTION SetDBCPath
>>LPARAMETERS poFormDE,pcDBCPath,pcDBCName
>>LOCAL lcDBCName, lcFilePath, lnNumCursors, lnNdx
>>lcDBCName = FORCEEXT(pcDBCName,"DBC")
>>lcFilePath = ADDBS(pcDBCPath) + lcDBCName
>>lnNumCursors = AMEMBERS(lcProperties,poFormDE,2)
>>FOR lnNdx=1 TO lnNumCursors
>> IF UPPER(LEFT(lcProperties[lnNdx],6)) = "CURSOR"
>> IF ATC(lcDBCName,poFormDE.&lcProperties[lnNdx]..database) > 0
>> poFormDE.&lcProperties[lnNdx]..database = lcFilePath
>> ENDIF
>> ENDIF
>>ENDFOR
>>ENDFUNC
Previous
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only