ich habe die Funktion _NetShareDel geschrieben und
versuche sie jetzt zu laufen zu bringen!
Doch es hat sich ein Fehler eingeschlichen denn
ich bekomme immer einen ReturnWert von '53'.
Frage:
Hat jemand schon das Problem mit NetShareDel gelöst? Oder kann mir jemand sonst weiterhelfen?
Besten Dank fuer die Informationen?
Aufruf:
nvResult = _NetShareDel("CHAE809C", "Test");
//--------------------------------------------------------------------
prototype LONG netapi32.NetShareDel(POINTER, POINTER, LONG);
//------------------------------------------------------------------
prototype _NetShareDel(STRING,STRING);
function _NetShareDel(szCompName, szNetName)
STRING szDLL, szDLL2;
_WIDESTRING POINTER sCompName,sNetName;
LONG nReturn;
begin
szDLL = WINSYSDIR ^ "netapi32.DLL";
szDLL2 = WINSYSDIR ^ "kernel32.DLL";
nReturn = UseDLL ( szDLL );
if (nReturn < 0) then
MessageBox("Unable to load netapi32.DLL", SEVERE);
exit;
endif;
nReturn = UseDLL ( szDLL2 );
if (nReturn < 0) then
MessageBox("Unable to load kernel32.DLL", SEVERE);
exit;
endif;
sCompName = &szCompName;
sNetName = &szNetName;
nReturn = NetShareDel(&sCompName,&sNetName,NULL);
UnUseDLL ( szDLL );
UnUseDLL ( szDLL2 );
return nReturn;
end;