欧美鲁鲁_啦啦啦啦在线观看_日韩精品短视频_玩偶姐姐作品在线观看_天天综合天天做天天综合_国产综合图区

luoyingdong
級別: 略有小成
精華主題: 0
發帖數量: 158 個
工控威望: 306 點
下載積分: 1203 分
在線時間: 103(小時)
注冊時間: 2011-06-27
最后登錄: 2025-05-07
查看luoyingdong的 主題 / 回貼
樓主  發表于: 2011-06-29 14:24
這個程序可以用Visual Studio或EVC(Win CE)編譯,實際在Wince系統RUN過OK,有問題的可以回覆告知。
下方范例程序可以直接讀取D0000的值。
我是這個論壇的新人,不知道如何將文件上傳,我可以將完整專案文件上傳給大家參考,包刮PLC端Ethernet設定方法。


       WSADATA            wsaData;
    SOCKET            udpcmdSock;
    SOCKADDR_IN        saRecv, saSend;
    int                iLen,err,nSize;
    unsigned char    szToUdpCommand[80],szUdpResponse[100];
    struct    timeval        tv;
    fd_set    ReadFds;        //資料可讀取
    fd_set    WriteFds;        //資料可寫入
    fd_set    Exceptfds;        //錯誤檢出
    int        iRetCode;
    CString str1,str2;

    if(WSAStartup(0x0202,&wsaData) == SOCKET_ERROR)
    {
         MessageBox(_T("Startup Failure;"),_T("AMI"),MB_ICONERROR|MB_OK);
         WSACleanup();
         return;
    }

    udpcmdSock = socket ( AF_INET, SOCK_DGRAM, 0 );
    if ( INVALID_SOCKET == udpcmdSock)
    {
        MessageBox(_T("socket error;"),_T("AMI"),MB_ICONERROR|MB_OK);
        WSACleanup();
        return;
    }
    // bind to a local socket and an interface.
    saRecv.sin_family = AF_INET;
    saRecv.sin_addr.s_addr = htonl ( INADDR_ANY );
    //saSend.sin_addr.s_addr = inet_addr("172.16.50.220");
    saRecv.sin_port = htons ( 3939 );
    err = bind ( udpcmdSock, (SOCKADDR *) &saRecv, sizeof (SOCKADDR_IN) );
    if ( err==SOCKET_ERROR  )
    {
        MessageBox(_T("bind error;"),_T("AMI"),MB_ICONERROR|MB_OK);
        closesocket( udpcmdSock );
        WSACleanup();
        return;;
    }

    saSend.sin_family = AF_INET;
    saSend.sin_addr.s_addr = inet_addr("172.16.50.222");   // htonl ( INADDR_BROADCAST );
    saSend.sin_port = htons ( 3941 );
    iLen=21;
    szToUdpCommand[0]=0x50;        //SubHeader.bL
    szToUdpCommand[1]=0x00;        //SubHeader.bH
    szToUdpCommand[2]=0x00;        //NetworkNo
    szToUdpCommand[3]=0xFF;        //PCNo
    szToUdpCommand[4]=0xFF;        //IONo.bL
    szToUdpCommand[5]=0x03;        //IONo.bH
    szToUdpCommand[6]=0x00;        //StationNo
    szToUdpCommand[7]=0x0C;        //Length.bL 12 byte
    szToUdpCommand[8]=0x00;        //Length.bH
    szToUdpCommand[9]=0x10;        //Timer.bL
    szToUdpCommand[10]=0x00;    //Timer.bH
    szToUdpCommand[11]=0x01;    //Command.bL
    szToUdpCommand[12]=0x04;    //Command.bH
    szToUdpCommand[13]=0x00;    //SubCommand.bL bit0=0 -> word unit
    szToUdpCommand[14]=0x00;    //SubCommand.bH
    szToUdpCommand[15]=0x00;    //AddressL
    szToUdpCommand[16]=0x00;    //AddressNULL
    szToUdpCommand[17]=0x00;    //AddressH
    szToUdpCommand[18]=0xA8;    //DeviceCode D
    szToUdpCommand[19]=0x01;    //Points.bL    1 points
    szToUdpCommand[20]=0x00;    //Points.bH

    str1.Format(_T("L=%d,SBuf="),iLen);
    for(int i=0;i<iLen;i++) str1.AppendFormat(_T("%02hX "),(BYTE)szToUdpCommand);
    GetDlgItem(IDC_STATIC1)->SetWindowTextW(str1);

    //--- send command to PLC ---
    err = sendto ( udpcmdSock,(char*)szToUdpCommand,iLen,0,
        (SOCKADDR *) &saSend,sizeof ( SOCKADDR_IN ));
    if (  err==SOCKET_ERROR  )
    {
        MessageBox(_T("sendto error"),_T(""),MB_ICONERROR|MB_OK);
        closesocket( udpcmdSock );
        WSACleanup();
        return;
    }

/*********** receive response from Mit PLC ***********/
    tv.tv_sec = 2;//sec.
    tv.tv_usec = 0; //u-sec
    // The fd sets should be zeroed out before using them to prevent errors.
    FD_ZERO(&ReadFds);
    FD_ZERO(&WriteFds);
    FD_ZERO(&Exceptfds);
    //FD_CLR(udpcmdSock, &ReadFds );
    FD_SET(udpcmdSock, &ReadFds );

    iRetCode = select(0,&ReadFds,NULL,NULL,&tv);
    if (iRetCode == SOCKET_ERROR) {
        MessageBox(_T("select error"),_T(""),MB_ICONERROR|MB_OK);
        closesocket( udpcmdSock );
        WSACleanup();
        return;
    }

    if (FD_ISSET(udpcmdSock, &ReadFds)==0)//OnReceive
    {
        MessageBox(_T("Time Out !"),_T(""),MB_ICONERROR|MB_OK);
        closesocket( udpcmdSock );
        WSACleanup();
        return;
    }//OnReceive
    
    nSize = sizeof ( SOCKADDR_IN );
    err = recvfrom ( udpcmdSock, (char*)szUdpResponse,100, 0,
        (SOCKADDR FAR *) &saRecv, &nSize );
    if (err  ==  SOCKET_ERROR)
    {
        MessageBox(_T("recvfrom error"),_T(""),MB_ICONERROR|MB_OK);              
        closesocket( udpcmdSock );
        WSACleanup();
        return;
    }
    MessageBox(_T("recvfrom OK"),_T(""),MB_OK);

    str2.Format(_T("L=%d,RBuf="),err);
    for(int i=0;i<err;i++)    str2.AppendFormat(_T("%02hX "),(BYTE)szUdpResponse);
    GetDlgItem(IDC_STATIC2)->SetWindowTextW(str2);

    if ( udpcmdSock!=INVALID_SOCKET ){
        closesocket(udpcmdSock);
    }
    WSACleanup();

Fred Lo
luoyingdong
級別: 略有小成
精華主題: 0
發帖數量: 158 個
工控威望: 306 點
下載積分: 1203 分
在線時間: 103(小時)
注冊時間: 2011-06-27
最后登錄: 2025-05-07
查看luoyingdong的 主題 / 回貼
1樓  發表于: 2011-06-29 14:26
不知是否有上傳成功
Fred Lo
ak_42bl520
努力創造未來
級別: 略有小成
精華主題: 0
發帖數量: 121 個
工控威望: 215 點
下載積分: 627 分
在線時間: 99(小時)
注冊時間: 2008-10-29
最后登錄: 2012-11-02
查看ak_42bl520的 主題 / 回貼
2樓  發表于: 2011-06-29 15:15
樓主可以把文件 發我一份嗎
郵箱:power_2005shi@126.com
luoyingdong
級別: 略有小成
精華主題: 0
發帖數量: 158 個
工控威望: 306 點
下載積分: 1203 分
在線時間: 103(小時)
注冊時間: 2011-06-27
最后登錄: 2025-05-07
查看luoyingdong的 主題 / 回貼
3樓  發表于: 2011-06-29 15:29
發郵件給2樓了,請注意接收
Fred Lo
rosephy
級別: 略有小成
精華主題: 0
發帖數量: 117 個
工控威望: 281 點
下載積分: 434 分
在線時間: 78(小時)
注冊時間: 2008-08-29
最后登錄: 2024-12-31
查看rosephy的 主題 / 回貼
4樓  發表于: 2011-06-29 15:35
樓主高人,可否拜你為師哦,如果可以的話請加我QQ:1302714379
iteerh
級別: 家園常客

精華主題: 0
發帖數量: 623 個
工控威望: 803 點
下載積分: 17146 分
在線時間: 2373(小時)
注冊時間: 2006-10-25
最后登錄: 2025-07-19
查看iteerh的 主題 / 回貼
5樓  發表于: 2011-06-29 21:44
我也想要,.
iteerh@yahoo.tw
iteerh
級別: 家園常客

精華主題: 0
發帖數量: 623 個
工控威望: 803 點
下載積分: 17146 分
在線時間: 2373(小時)
注冊時間: 2006-10-25
最后登錄: 2025-07-19
查看iteerh的 主題 / 回貼
6樓  發表于: 2011-06-29 21:46
我也想要,謝謝,剛信箱不完整

iteerh@yahoo.com.tw
luoyingdong
級別: 略有小成
精華主題: 0
發帖數量: 158 個
工控威望: 306 點
下載積分: 1203 分
在線時間: 103(小時)
注冊時間: 2011-06-27
最后登錄: 2025-05-07
查看luoyingdong的 主題 / 回貼
7樓  發表于: 2011-06-30 07:47
已發出郵件給6樓,請查收
Fred Lo
iteerh
級別: 家園常客

精華主題: 0
發帖數量: 623 個
工控威望: 803 點
下載積分: 17146 分
在線時間: 2373(小時)
注冊時間: 2006-10-25
最后登錄: 2025-07-19
查看iteerh的 主題 / 回貼
8樓  發表于: 2011-07-07 20:51
已收到,謝謝你
callen1515
級別: 略有小成
精華主題: 0
發帖數量: 97 個
工控威望: 219 點
下載積分: 770 分
在線時間: 23(小時)
注冊時間: 2011-08-07
最后登錄: 2013-11-02
查看callen1515的 主題 / 回貼
9樓  發表于: 2011-09-16 13:37
高人,這個我是學不會了
zennin
級別: 探索解密
精華主題: 0
發帖數量: 63 個
工控威望: 183 點
下載積分: 762 分
在線時間: 78(小時)
注冊時間: 2011-08-07
最后登錄: 2025-05-27
查看zennin的 主題 / 回貼
10樓  發表于: 2011-10-04 20:37
我也要啊   397969850@qq.com
luoyingdong
級別: 略有小成
精華主題: 0
發帖數量: 158 個
工控威望: 306 點
下載積分: 1203 分
在線時間: 103(小時)
注冊時間: 2011-06-27
最后登錄: 2025-05-07
查看luoyingdong的 主題 / 回貼
11樓  發表于: 2011-10-05 12:25
郵件已發出,請查收
Fred Lo

主站蜘蛛池模板: 国产精品电影网 | 亚洲综合日韩久久成人AV | 特级毛片在线观看 | 亲子乱对白乱都乱了视频 | 午夜网址 | 天天爱天天做天天想 | 曰韩欧美中文字幕 | 欧美日韩精品一二三 | 国语自产精品视频在免费 | 国产免费亚洲高清 | 锵锵锵锵锵免费完整观看动漫最新章节 | 98色婷婷在线 | 久久中文久久字幕 | 男人日批 | 午夜影视啪啪免费体验区深夜 | 中文字幕日韩在线观看 | 91av视频在线看 | 免费人成xvideos在线视频 | 精品伦精品一区二区三区视频 | 在线中文字幕电影 | 熟睡中被义子侵犯在线播放 | 国内精品人妻在线中文字幕 | 草久视频免费观看 | 亚欧免费无码aⅴ在线观看 一二三四视频高清在线观看 | 999这里只有是极品 张娜英1v4财阀原视频怎么看 | 国产精品免费电影 | www视频在线免费观看 | 久操资源网 | 欧美182国产在线视频 | 天堂中文av | 日韩大学生毛片 | 正在播放东北夫妻内射 | 中字无码av高清在线播放 | 黄色片久久久 | 在线视频毛片 | 美丽的姑娘免费高清观看影视大全 | 午夜免费福利在线 | 亚洲大片精品免费 | 国产99久久九九精品 | 欧美性久久 | 免费av手机在线观看片 |