NetFileEnum в 9x

← →
cypher (2002-02-17 17:01) [0]

Прототип NetFileEnum для Win 9x такой

extern API_FUNCTION
NetFileEnum(
const char FAR * pszServer,
const char FAR * pszBasePath,
short sLevel,
char FAR * pbBuffer,
unsigned short cbBuffer,
unsigned short FAR * pcEntriesRead,
unsigned short FAR * pcTotalAvail
);

Если у меня второй параметр (pszBasePath) равен NULL, то все работает как нада. А когда подставляю какое-нить значение, то pcEntriesRead всегда равен 0. Подскажите, где ошибка?

var
FNetShare : PAnsiString;
begin
....
FNetShare := PAnsiString("C:\SHARE");
NetFileEnum95(ServerNameA, PChar(FNetShare), 50, @FileInfo, Sizeof(FileInfo), EntriesRead, TotalAvail));
if EntriesRead>0 then begin
.....
end;

Может я строку передаю неправильно??? =)

NetFileEnum в 9x Найти похожие ветки