You cannot save the values of the global variables from run to run.
As for looping through global variables:
Dim objPackage
Set objPackage = DTSGlobalVariables.Parent
For each objGlVar in objPackage.GlobalVariables
Set objGVProperties = objGlVar.Properties
strName = objGVProperties("Name").Value
strValue = objGVProperties("Value").Value
' your stuff can be inserted
' here
NEXT