以下连接服务器有什么问题，怎么总不成功(50分)

procedure TForm1.Button1Click(Sender: TObject);
var
ns: NETRESOURCE;
begin
ns.lpLocalName := nil;
ns.lpProvider := '';
ns.lpRemoteName := pchar('//192.168.0.150');
if WNetAddConnection2(ns,'','administrator',0)= 0 then
ShowMessage('success')
else
ShowMessage('fail');
end;