easy way to switch *default input language*?

My German girlfriend and I want an easy way to switch between

German and English as the *default input language*, as you do

with more hassle from the control panel "text services and

input languages" menu. The language bar switchis easy

but only affects the current window. I need something similar

on the desktop to set the default for all future windows I open. There

must be a way to do this using VB script and perhaps toggling a

registry switch. Does anyone know how?