Forum Discussion
rajesh_chidamba
10 years agoOccasional Contributor
Hi All
Thanks for all your Reply. I found the answer and it solved my problem. Here is the code snippet. its Simple :-)
This would reset all the values that I have in persistent variable list. so can enter new variable values all the time
Function Sample()
intvalue = Project.Variables.VariableCount
For i= 0 to intvalue-1
strvariablesname = Project.Variables.GetVariableName(i)
Project.Variables.VariableByName(strvariablesname) = ""
Next
End Function
This Function would remove all the variables in the persistent variable section, hope this helps for other newbie's too.
Function Sample2()
intvalue = Project.Variables.VariableCount
For i= 0 to 100
If Cint(Project.Variables.VariableCount) = 0 Then Exit For
strvariablesname = Project.Variables.GetVariableName(i)
Project.Variables.RemoveVariable strvariablesname
Next
End Function
Thanks again for all your reply.
Thanks
RC
Thanks for all your Reply. I found the answer and it solved my problem. Here is the code snippet. its Simple :-)
This would reset all the values that I have in persistent variable list. so can enter new variable values all the time
Function Sample()
intvalue = Project.Variables.VariableCount
For i= 0 to intvalue-1
strvariablesname = Project.Variables.GetVariableName(i)
Project.Variables.VariableByName(strvariablesname) = ""
Next
End Function
This Function would remove all the variables in the persistent variable section, hope this helps for other newbie's too.
Function Sample2()
intvalue = Project.Variables.VariableCount
For i= 0 to 100
If Cint(Project.Variables.VariableCount) = 0 Then Exit For
strvariablesname = Project.Variables.GetVariableName(i)
Project.Variables.RemoveVariable strvariablesname
Next
End Function
Thanks again for all your reply.
Thanks
RC
Related Content
Recent Discussions
- 23 hours agoMW_Didata