在Ws2_32.dll中。可以用winsock控件connect一下在读RemoteHostIP等。

解决方案 »

  1.   

    WNetGetUser VB声明 
    Declare Function WNetGetUser Lib "mpr.dll" Alias "WNetGetUserA" (ByVal lpName As String, ByVal lpUserName As String, lpnLength As Long) As Long 
    说明 
    获取一个网络资源用以连接的名字 
    返回值 
    Long,零表示成功。会设置GetLastError。如GetLastError是ERROR_EXTENDED_ERROR,则可用WNetGetLastError取得额外的错误信息 
    参数表 
    参数 类型及说明 
    lpName String,指定已连接资源的远程名称或本地名称。用vbNullString获取当前用户的名字 
    lpUserName String,用于装载用户名的一个字串缓冲区 
    lpnLength Long,lpUserName缓冲区的长度。如缓冲区不够大,则自动设为需要的缓冲区长度