x=_GEMS_Input("EMAIL ADDRESS","Enter or update","none",50,0,"")
x=_GEMS_Input("EMAIL ADDRESS","Enter or update",$emailaddr,50,0,"")