R: in un modulo metti la dichiarazione:
Public Declare Function GetSystemDirectory Lib "kernel32" Alias "GetSystemDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long
e la usi cosi`:
dim sysdir as string, lenbuffer as long, ret as long
lenbuffer=256
sysdir=string(lenbuffer,0)
ret=getsystemdirectory(sysdir,lenbuffer)
sysdir=left(sysdir,ret)
D: Ciao a tutti, scaricandomi il modulo contente la funzione API per recuperare informazioni sulla rete locale, al momento della chiamata della funzione API >incriminata VB mi da il seguente messaggio di errore:
Run-time error
453
Can't find entry point Netsertverenum for NetApi32.dll
R: Avresti dovuto prima controllare su MSDN: la funzione non e' supportata in win9x:
NetServerEnum
Requirements
Windows NT/2000: Requires Windows NT 3.1 or later.
Windows 95/98: Unsupported. <------------
Windows CE: Unsupported.
Header: Declared in lmserver.h.
Import Library: Use netapi32.lib.