Pri. Windows Dir ?

winsysdir ???

SYSTEMROOT System directory (for example, c:\\winnt). This is the same as WINDIR.

WINDIR System directory (for example, c:\\winnt). This is the same as SYSTEMROOT.

Hmmm

Jeg mangler bare en kode så jeg kan finde PRI Win Dir:

filenavn = \"c:\\winnt\\system32\\kernel32.exe\"
result = Dir(filenavn)
If Len(result) = 0 Then
  MsgBox \"filen findes ikke\"
  Else
  MsgBox \"Filen findes\"
End If

Hvor der står c:\\winnt\\ der leder PC\'en jo kun i Win Dir\'et hvis man køre Windows 98 er det jo c:\\windows
Men hvis brugeren nu har installeret windows under et eller andet underligt navn så er den jo gal....

Truti

Private Sub Command1_Click()
    Dim fso As New FileSystemObject
    diret = fso.GetSpecialFolder(WindowsFolder)
    MsgBox (\"windows: \" & diret)
   
    diret = fso.GetSpecialFolder(SystemFolder)
    MsgBox (\"system: \" & diret)
   
    diret = fso.GetSpecialFolder(TemporaryFolder)
    MsgBox (\"Temp: \" & diret)
End Sub

disse linier giver dig de forskellige windows mapper....
(og det dur)

Compile Error:
User-defined type not defined

Jeg får fejl på den første linie:
\"Dim fso As New FileSystemObject\"

Truti

du skal huskeat der skal være en refernce til microsoft scripting runtime (for at bruge filesystemobject)

Virker Super Tak.

det er jo godt :)=