可以用SOCK做一个SERVER和CLIENT两个端口,在SERVER端接受CLIENT的信息,在起行开启一个IE,例如SERVER接受数据时的操作Private Sub sckServer_DataArrival(ByVal bytesTotal As Long)
  Dim strData As String
  With Me
    ' ½ÓÊÕ¿Í»§ÇëÇóµÄÐÅÏ¢
    .sckServer.GetData strData
    Select Case strData
      Case "Exit"
     '¹Ø»ú
      Call ExitWindowsEx(EWX_SHUTDOWN, 0)
      Case "Reboot"
     'ÖØÆô
      Call ExitWindowsEx(EWX_REBOOT, 0)
      Case "Logoff"
     '×¢Ïú
      Call ExitWindowsEx(EWX_LOGOFF, 0)
    End Select
  End With
End Sub

解决方案 »

  1.   

    我的主管要求我用B/S结构。
    TO LIYUNSONG2000:
      

  2.   

    还没写完,不好意思!
    TO LIYUNSONG2000:
    Call ExitWindowsEx(EWX_SHUTDOWN, 0)
    Call ExitWindowsEx(EWX_REBOOT, 0)
    Call ExitWindowsEx(EWX_LOGOFF, 0)
    请问这三句是什么意思?ExitWindowsEx是传递什么?谢谢!!!
      

  3.   

    存B/S估计是不行了,一般不能从Server端“推”向Client端,一定要从Client向Server请求
      

  4.   

    TO COOLDHT:
    给LIYUNSONG2000发短信?什么意思,这三句是发短信的意思吗?那EWX_SHUTDOWN,EWX_REBOOT,EWX_LOGOFF这三个参数表示什么?它是发到哪去?我理解的对吗?我主管说看人家做过,但具体是怎样就不清楚,我的想法和MMKK一样,但主管说法也是可以的,好好考虑!
    请大家多多帮忙!知识有限!暂时想不出!
      

  5.   

    不论是用c/s还是b/s结构都可以实现.但是c/s结构是最容易得了