谁知道,代码!

解决方案 »

  1.   

    hehe
    007元素怎么跑这里来了
    这篇文章应该发到20cn的阿
      

  2.   

    不过你说得好像不太可能
    网卡是PCI
    即插即用,不能控制到电源
      

  3.   

    我觉得通过网站不可能实现,用自举芯片可以实现远端控制,如果不用自举芯片,那么通过winsock编程可以控制关机,但开机好像不行。
      

  4.   

    我搞过无盘工作站。 呵呵, 这个不是很清楚,正如楼上所说, 网卡应该具备远程唤醒功能。 思考ing....
      

  5.   

    下面的程序可以实现远程开机(俺的网卡不支持,所以俺没有办法调试)unit Unit1;interfaceuses
      Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
      Dialogs, StdCtrls, IdBaseComponent, IdComponent, IdUDPBase, IdUDPClient;type
      TForm1 = class(TForm)
        Button1: TButton;
        Edit1: TEdit;
        IdUDPClient1: TIdUDPClient;
        procedure Button1Click(Sender: TObject);
      private
        { Private declarations }
      public
        { Public declarations }
      end;var
      Form1: TForm1;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
    var 
      Data, temp: string; 
      k, n: integer; 
    begin 
      Data := '';
      for k := 0 to 5 do
      begin 
        Data := Data + Chr(StrToInt('$FF'));  // 6x add a FF / 6x ein FF hinzufügen 
      end;
      temp := StringReplace(Edit1.Text, '-', '', [rfReplaceAll]); 
      for k := 0 to 15 do 
      begin 
        temp := StringReplace(Edit1.Text, '-', '', [rfReplaceAll]); 
        for n := 0 to 5 do 
        begin 
          // 16x add Target-Mac-Adress / 16x die Ziel-Macadresse hinzufügen 
          Data := Data + Chr(StrToInt('$' + temp[1] + temp[2])); 
          Delete(temp, 1, 2); 
        end;
      end;  IdUDPClient1.Send('255.255.255.255',80,Data);
    end;end.
      

  6.   

    IdUDPClient1.Send('255.255.255.255',80,Data);
    这一句报错啊!
      

  7.   

    1。网卡要支持远程开机
    2。在BIOS内允许网卡唤醒
    3。用软件(如AMD公司发布的Magic Packet 1.0)向此网卡发送唤醒信息(要用到MAC地址,IP地址是不行的)
    http://school.enet.com.cn/document/20020225/2002022511011301.shtml
    http://www.alphaweb.com.cn/netpub14.htm