[VB] Ophalen van standaar windows dir

[Verwijderd]

Hoe kan ik in Visual Basic de locatie van de windowsdirectory ophalen? ik dacht iets in de trend van %*WINDIR% , hoe moet dit precies in Visual Basic?
Dank u bij voorbaat

[Verwijderd]

Zoek 's op www.allapi.net voor de API van de Windir. Dit is niet al te moeilijk, maar kost wat meer code dan %windir%

[Verwijderd]

Sorry, niet netjes van me...

Ajb:

Declare Function GetWindowsDirectory Lib "kernel32.dll" Alias "GetWindowsDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long

Dim windir As String, slength As Long

windir = Space(255)
slength = GetWindowsDirectory(windir, 255)
windir = Left(windir, slength)
Msgbox windir

[DigiK-oz]

Of :

FileSystemObject.GetSpecialFolder(WindowsFolder)

Moet je wel bij project->references de "Microsoft Scripting Runtime" aangevinkt hebben.

Kijk even in de help van VB en zoek op 'GetSpecialFolder', staan wat voorbeelden bij. Je kan hiermee ook je SYSTEM en je TEMP directory opvragen.

[Verwijderd]

Dank jullie,
Nu is mijn vraag, hoe kan ik de globale variable windir implementeren in:

Public Declare Function RegSjabloon Lib _
"c:\windows\system\sjablonen.dll" _
Alias "DllRegisterServer" () As Long

Het volgende geeft me een foutmelding dat ie een tekenreeks verwacht:
Public Declare Function RegSjabloon Lib _
windir&"\sjablonen.dll" _
Alias "DllRegisterServer" () As Long

Weet iemand de oplossing?
Dank u

[DigiK-oz]

Waarom wil je het hele pad meegeven ? Als je alleen de naam van je DLL geeft wordt deze gezocht als volgt:


If you do not specify a path for libname, Visual Basic will search for the file in the following order:

Directory containing the .exe file


Current directory


Windows system directory (often but not necessarily \Windows\System)


Windows directory (not necessarily \Windows)


Path environment variable

[Verwijderd]

Dank jullie zeer!