dir$=Space(1000)  
GetWindowsDirectory_(@dir$,Len(dir$))  
Debug dir$+"\"