IMPORT CONTACTS INTO EXCHANGE 2003

I have contacts from foreign domain in my AD forest domain that I want to import into my exchange 2003 organisation GAL. How can I achieve this process thru VBscripting.