如何修改信使服务的开始内容？？？

Question

各大侠：
    当使用“ net send ip地址 信息内容”命令后，目标电脑上屏幕会出现信使服务的信息，但第一行的信息一直为“在某年某月某日 几时几分几秒从某某到目标电脑的ip地址的消息”，如何将发送方的电脑标识进行更改？如何将目标电脑的ip地址显示成指定的汉字？如何检测当前的电脑是否启动了信使服务？
    请各位赐教，谢谢!

Answer 1

我看了一些软件，如凶宝宝等，都能更改发送者的签名，是怎样实现的？____________________________________________________________不知道，可能是修改了msgsvc.dll文件

Answer 2

我也很想知道，帮你顶。不知是不是api

Answer 3

在局域网内可用对方的计算机名代替ip地址。
net send ComputerName 信息内容

Answer 4

我做了可以修改自己计算机名的的小工具，现在没时间传。
很简单的，就是一个api，需要写上自己的名称，这个名称怎样写无所谓。等我有时间了，贴上来。

Answer 5

function NetMessageBufferSend(servername: LPCWSTR; msgname: LPCWSTR;
  fromname: LPCWSTR; buf: Pointer; buflen: DWORD): DWORD; stdcall; external 'netapi32.dll' name 'NetMessageBufferSend';function sendmsg(destIP,msg:string; SourceIP : String = '549'):dword;
var fromname: PWideChar;
    DestWideChar: PWideChar;
    MessagetextWideChar: PWideChar;
begin
    try
      GetMem(MessagetextWideChar, Length(Msg) * SizeOf(WideChar) + 1);
      GetMem(DestWideChar, 20 * SizeOf(WideChar) + 1);
      GetMem(fromname,20*sizeof(widechar)+1);
      StringToWideChar(Msg, MessagetextWideChar, Length(Msg) * SizeOf(WideChar) + 1);
      StringToWideChar(DestIP, DestWideChar, 20 * SizeOf(WideChar) + 1);
      StringToWideChar(SourceIP, fromname, 20 * SizeOf(WideChar) + 1);
      Result := NetMessageBufferSend(nil, DestWideChar,fromname,MessagetextWideChar, Length(Msg) * SizeOf(WideChar) + 1)
    finally
      freemem(DestWideChar,0);
      freemem(MessagetextWideChar,0);
      freemem(fromname,0);
    end;
end;function SendMsgWithReturn( TargetIP, Msg : String;  SourceIP : String = '549' ): String;
const
  NERR_BASE         = 2100;
  NERR_NameNotFound = NERR_BASE + 173;
  NERR_NetworkError = NERR_BASE + 36;
  NERR_Success      = 0;
var
  Res: Longint;
begin
  Result := '未知错误';
  if TargetIP = '' then Exit;
  Res := SendMsg( TargetIP, Msg, SourceIP );
  case Res of
    ERROR_ACCESS_DENIED    : Result := '权限不够';
    ERROR_INVALID_PARAMETER: Result := '参数错误';
    ERROR_NOT_SUPPORTED    : Result := '网络不支持消息';
    NERR_NameNotFound      : Result := '用户名未找到';
    NERR_NetworkError      : Result := '网络硬件错误';
    NERR_Success           : Result := '发送成功';
    {
    ERROR_ACCESS_DENIED    : Result := 'user does not have access to the requested information.';
    ERROR_INVALID_PARAMETER: Result := 'The specified parameter is invalid.';
    ERROR_NOT_SUPPORTED    : Result := 'This network request is not supported.';
    NERR_NameNotFound      : Result := 'The user name could not be found.';
    NERR_NetworkError      : Result := 'A general failure occurred in the network hardware.';
    NERR_Success           : Result := 'Message sent!';
    }
  end;
end;

Answer 6

修改SourceIP : String = '549'
就可以了