與TCP客戶端一樣 伺服器程式啟動時需要介面初始化 不管伺服器在初始化時 還應該同時完成套接字的建立以及地址繫結等處理工作

class CTCPDlg : public CDialog
{
// Construction
public:
    CTCPDlg(CWnd* pParent = NULL);    // standard constructor
SOCKET s,s1; //定義套接字控制代碼
sockaddr_in addr,add1; //定義套接字地址結構變數
CString str,str1;
int n;
// Dialog Data
    //{{AFX_DATA(CTCPDlg)
    enum { IDD = IDD_TCP_DIALOG };
        // NOTE: the ClassWizard will add data members here
    //}}AFX_DATA

    // ClassWizard generated virtual function overrides
    //{{AFX_VIRTUAL(CTCPDlg)
    protected:
    virtual void DoDataExchange(CDataExchange* pDX);    // DDX/DDV support
    //}}AFX_VIRTUAL

// Implementation
protected:
    HICON m_hIcon;

    // Generated message map functions
    //{{AFX_MSG(CTCPDlg)
    virtual BOOL OnInitDialog();
    afx_msg void OnSysCommand(UINT nID, LPARAM lParam);
    afx_msg void OnPaint();
    afx_msg HCURSOR OnQueryDragIcon();
    afx_msg void OnSocket(WPARAM wParam,LPARAM lParam);
    afx_msg void OnSend();
    //}}AFX_MSG
    DECLARE_MESSAGE_MAP()
};
 

在對話方塊初始化函式中建立套接字並且將套接字繫結到本地地址

BOOL CTCPDlg::OnInitDialog()
{
    CDialog::OnInitDialog();

    // Add "About..." menu item to system menu.

    // IDM_ABOUTBOX must be in the system command range.
    ASSERT((IDM_ABOUTBOX & 0xFFF0) == IDM_ABOUTBOX);
    ASSERT(IDM_ABOUTBOX < 0xF000);

    CMenu* pSysMenu = GetSystemMenu(FALSE);
    if (pSysMenu != NULL)
    {
        CString strAboutMenu;
        strAboutMenu.LoadString(IDS_ABOUTBOX);
        if (!strAboutMenu.IsEmpty())
        {
            pSysMenu->AppendMenu(MF_SEPARATOR);
            pSysMenu->AppendMenu(MF_STRING, IDM_ABOUTBOX, strAboutMenu);
        }
    }

    // Set the icon for this dialog.  The framework does this automatically
    //  when the application's main window is not a dialog
    SetIcon(m_hIcon, TRUE);            // Set big icon
    SetIcon(m_hIcon, FALSE);        // Set small icon
    
    // TODO: Add extra initialization here
    addr.sin_family=AF_INET; //初始化套接字地址結構
    addr.sin_port=htons(80); //指定埠
    addr.sin_addr.S_un.S_addr=INADDR_ANY;
    s=::socket(AF_INET,SOCK_STREAM,0);
    ::bind(s,(sockaddr*)&addr,sizeof(addr)); //繫結本地地址
    ::listen(s,5);//監聽埠
    ::WSAAsyncSelect(s,this->m_hWnd,WM_SOCKET,FD_ACCEPT|FD_READ);
    GetDlgItem(IDC_TEXT)->EnableWindow(false);//禁用訊息顯示框
//    GetDlgItem(IDC_SENDTEXT)->SetWindowText("客戶端，你好！");
    GetDlgItem(IDC_ADDR)->SetWindowText("伺服器監聽已經啟動！");
//        GetDlgItem(IDC_TEXT)->SetWindowText("已經有1個客戶端連線上伺服器了 \r\n 客戶端1說：你好！");
        
    GetDlgItem(IDC_TEXT)->GetWindowText(str);
        str+="\r\n";
        GetDlgItem(IDC_SENDTEXT)->GetWindowText(str1);
        str+=str1;
            GetDlgItem(IDC_TEXT)->SetWindowText(str);
    return TRUE;  // return TRUE  unless you set the focus to a control
}