كود: Dim winPath As String winPath = Environ$("windir")
Dim winPath As String winPath = Environ$("windir")