---- 隨 著Win95 操 作 系 統(tǒng) 的 普 及， 計(jì) 算 機(jī) 之 間 的 通 信 已 經(jīng) 成 為 大 多 數(shù) 應(yīng) 用 程 序 開(kāi) 發(fā) 的 要 求， 這 其 中 的 主 要 原 因 是Win95 不 僅 僅 能 夠 支 持 大 多 數(shù) 硬 件， 而 且 為 硬 件 的 操 作 提 供 了 方 便 的 編 程 接 口（API），Win95 的 應(yīng) 用 程 序 接 口（API） 提 供 的 通 信 手 段 大 致 分 為 以 下 幾 類： １ 基 于TCP/IP 協(xié) 議 的Winsock API， 可 實(shí) 現(xiàn) 局 域 網(wǎng) 上 或 互 聯(lián) 網(wǎng) 上 的 微 機(jī) 通 信； ２ 基 于 進(jìn) 程 之 間 的 通 信 技 術(shù)： 動(dòng) 態(tài) 數(shù) 據(jù) 交 換（ Ｄ Ｄ Ｅ）； ３ 基 于 直 接 電 纜 連 接 的 通 信 技 術(shù)， 可 直 接 操 作 串 行 口、 并 行 口 以 及 遠(yuǎn) 紅 外 線 接 口； ４ 基 于 電 話 線 路 的 通 信 應(yīng) 用 程 序 接 口（ Ｔ Ａ Ｐ Ｉ/Telephony API）， 可 方 便 地 控 制 調(diào) 制 解 調(diào) 器； 從 目 前 的 發(fā) 展 狀 況 看 來(lái)， 調(diào) 制 解 調(diào) 器 已 經(jīng) 成 為 遠(yuǎn) 距 離 通 信 的 一 種 重 要 工 具， 為 此Microsoft 及Intel 公 司 聯(lián) 合 開(kāi) 發(fā) 了TAPI 這 樣 一 個(gè) 編 程 接 口， 而 且， 使 用API 函 數(shù) 編 制 的 程 序 段 既 適 用 于Borland C++ 編 譯 器， 同 時(shí) 也 能 插 入Visual C++ 程 序 中 編 譯 運(yùn) 行， 作 為Win95 的 應(yīng) 用 程 序 編 制 人 員， 學(xué) 會(huì) 使 用TAPI 編 程 操 作 調(diào) 制 解 調(diào) 器 通 過(guò) 電 話 線 路 進(jìn) 行 通 信 這 一 技 術(shù) 是 很 有 必 要 的。 下 面 就TAPI 編 程 進(jìn) 行 討 論：
---- 通 過(guò) 使 用lineInitialize 函 數(shù) 初 始 化TAPI.DLL 得 到TAPI 使 用 句 柄 的 指 針hTapi， 請(qǐng) 注 意 參 數(shù) 中 回 調(diào) 函 數(shù) 的 定 義（ 所 有 提 及 函 數(shù) 的 用 法 均 可 從BC++5.0 及Visual C++5.0 的 幫 助 中 獲 得）； 通 過(guò) 調(diào) 用lineOpen 函 數(shù)（ 用 到 參 數(shù)hTapi） 獲 得 線 路 句 柄hLine； 再 利 用lineGetID( 用 到 參 數(shù)hLine) 獲 取 調(diào) 制 解 調(diào) 器 句 柄hModem
---- 2 配 置 線 路（ 可 選）
----
---- 調(diào) 用SetCommConfig( 用 到hModem) 改 變 調(diào) 制 解 調(diào) 器 的 設(shè) 置
---- 3 撥 號(hào)（ 由 呼 叫 方 執(zhí) 行）
---- 使 用lineMakeCall 函 數(shù)( 用 到hLine) 進(jìn) 行 撥 號(hào)， 完 成 后 獲 得 呼 叫 句 柄hCall（ 呼 叫 方 的 呼 叫 句 柄）
---- 4 應(yīng) 答 鏈 接（ 由 被 呼 叫 方 執(zhí) 行）
---- 被 呼 叫 的 一 方 的 回 調(diào) 函 數(shù) 得 到LINECALLSTATE_OFFERING 消 息 時(shí), 調(diào) 用lineAnswer 函 數(shù) 實(shí) 現(xiàn) 自 動(dòng) 應(yīng) 答( 呼 叫 句 柄hCall 由 回 調(diào) 函 數(shù) 的 參 數(shù) 給 出)
---- 5 數(shù) 據(jù) 通 信（ 雙 方）
---- 當(dāng) 回 調(diào) 函 數(shù) 收 到LINECALLSTATE_CONNECTED 消 息 后， 請(qǐng) 先 清 除 接 收 緩 沖 區(qū)， 可 以 使 用 函 數(shù) 為WriteFile 及ReadFile 函 數(shù) 進(jìn) 行 數(shù) 據(jù) 交 換， 注 意 參 數(shù)hFile 為 調(diào) 制 解 調(diào) 器 句 柄hModem
---- 6 掛 機(jī)（ 某 一 方）
---- 通 信 完 畢 任 何 一 方 都 可 以 調(diào) 用 函 數(shù)lineDrop(hCall,NULL,0) 來(lái) 停 止 呼 叫， 該 函 數(shù) 還 發(fā) 送LINECALLSTATE_IDLE 消 息 給 回 調(diào) 函 數(shù)
---- 7 關(guān) 閉 線 路（ 雙 方）
---- 通 信 雙 方 的 回 調(diào) 函 數(shù) 在 收 到LINECALLSTATE_IDLE 消 息 時(shí) 都 應(yīng) 該 調(diào) 用 函 數(shù)lineDeallocateCall(hCall) 釋 放 相 應(yīng) 呼 叫 占 用 的 資 源； 當(dāng) 回 調(diào) 函 數(shù) 收 到LINECALLSTATE_DISCONNECTED 消 息 時(shí) 請(qǐng) 使 用lineClose(hLine) 釋 放 由lineOpen 分 配 的 資 源， 調(diào) 用lineShutDown(hTapi) 釋 放 為 線 路 設(shè) 備 分 配 的 資 源
---- 我 們 的 通 信 應(yīng) 用 程 序 通 過(guò)TAPI 操 作Modem 撥 號(hào)、 應(yīng) 答、 鏈 接、 掛 機(jī) 控 制 電 話 呼 叫， 在 編 制DOS 應(yīng) 用 程 序 的 時(shí) 候， 我 們 經(jīng) 常 使 用Hayes 兼 容 的AT 命 令 集 來(lái) 完 成 這 些 操 作， 由 于 各 調(diào) 制 解 調(diào) 器 廠 家 對(duì) 該 命 令 集 都 做 了 各 自 的 擴(kuò) 展， 因 而， 我 們 的DOS 應(yīng) 用 程 序 一 般 只 能 操 作 一 小 部 分 調(diào) 制 解 調(diào) 器， 而 各 廠 家 都 提 供Windows 驅(qū) 動(dòng) 程 序， 所 以， 使 用TAPI 編 制 的 應(yīng) 用 程 序 能 夠 操 作 絕 大 多 數(shù) 調(diào) 制 解 調(diào) 器； 圖 中 的 通 信API 是 應(yīng) 用 程 序 發(fā) 送、 接 收 數(shù) 據(jù) 的 編 程 接 口。
---- 1 頭 文 件 中 應(yīng) 該 包 括:
---- #include < tapi.h >
---- 請(qǐng) 注 意 工 程 文 件 的 屬 性 應(yīng) 該 是Windows 32 位 應(yīng) 用 程 序
---- 2 通 信 所 涉 及 到 的 一 些 全 局 變 量 定 義 及 類 型 定 義:
char RecBuf[20]，buf[20]// 緩 沖 區(qū)
DWORD Error; // 錯(cuò) 誤 碼
COMSTAT Status; // 狀 態(tài) 碼
DWORD NumLine; // 允 許 使 用 的 線 路 設(shè) 備 數(shù)
LINECALLPARAMS para;// 呼 叫 參 數(shù)
TmyDecFrame * pwin=NULL;// 主 窗 口 指 針
HLINEAPP myhTapi;// 線 路 應(yīng) 用 程 序 句 柄
HLINE myhLine;// 線 路 句 柄
HANDLE myhModem;// 調(diào) 制 解 調(diào) 器 句 柄
HCALL myhCall;// 呼 叫 句 柄
typedef struct tagModemID{
HANDLE hModem;
char ModemName[1];
}ModemID;
---- 3 下 面 為 獲 取 調(diào) 制 解 調(diào) 器 句 柄 的 函 數(shù) 定 義
---- 因 為 每 個(gè) 調(diào) 制 解 調(diào) 器 的 標(biāo) 志 字 符 串 長(zhǎng) 度 不 一， 所 以 函 數(shù) 中 用 到 了 可 變 長(zhǎng) 度 的 字 符 串， 處 理 方 法 是 先 為 字 符 串 指 針 分 配sizeof(VARSTRING) 大 小 的 空 間， 再 利 用 該 空 間 容 納 調(diào) 用LineGetID 時(shí)Windows 返 回 的 信 息， 根 據(jù) 返 回 信 息 判 斷 所 需 空 間 大 小 重 新 分 配 空 間， 再 次 調(diào) 用LineGetID 就 可 以 取 得 完 整 的 標(biāo) 志 字 符 串。
void GethModem(HLINE hLine)
{ ModemID far *mid;
VARSTRING * str;
LONG lid;
DWORD size;
char mark=1;
str=(VARSTRING *)malloc(sizeof(VARSTRING));
if(!str)
return NULL;
str- >dwTotalSize=sizeof(VARSTRING);
do
{ if((lineGetID(myhLine,0,NULL,LINECALLSELECT_LINE,str,
"comm/datamodem")==0)&&(str- >dwTotalSize < str- > dwNeededSize))
{ dwSize=str- >dwNeededSize;
free(str);
str=(VARSTRING *)malloc(dwSize);
if(!str)
{ myhModem=NULL;
mark=2;
}
str- >dwTotalSize=dwSize;
}
else mark=0;
}while(mark==1);
if(mark==0)
{ mid=(ModemID far *)((LPSTR)str+str- >dwStringOffset);
myhModem=mid- >hModem;
}
free(str);
}
---- 4 在 主 窗 口 初 始 化 函 數(shù) 中 加 入 對(duì) 線 路 的 初 始 化 過(guò) 程:
pwin=this;// 獲 得 主 窗 口 指 針
while(lineInitialize(&myhTAPI,GetModule()- >GetInstance(),
(LINECALLBACK)MakeProcInstance((FARPROC) lpfnCallback,
GetModule()- >GetInstance()), "TRY",&NumLine )==LINEERR_REINIT)
{ sleep(1);// 延 遲 };
Error=lineOpen(hTAPI,0,&HLine,0x10004,0,0,LINECALLPRIVILEGE_MONITOR+
LINECALLPRIVILEGE_OWNER,LINEMEDIAMODE_DATAMODEM,NULL);
if(Error!=0)
{ sprintf(buf,"%lx",Error);
MessageBox(buf,0,MB_OK); }
else
{ GethModem(myhLine);// 取 得myhModem 的 值
if(myhModem!=NULL)
{ para.dwBearerMode=LINEBEARERMODE_VOICE;
para.dwMediaMode=LINEMEDIAMODE_DATAMODEM;
para.dwTotalSize=sizeof(LINECALLPARAMS);
Error=lineMakeCall(myhLine,&myhCall,"8880751",0,¶);
If(Error!=0)
{ sprintf(buf,"%lx",Error);
MessageBox(buf,0,MB_OK); }
}
}
}
---- 5 呼 叫 方 回 調(diào) 函 數(shù) 的 定 義
void far pascal TMyDecFrame::lpfnCallback
(DWORD hDevice, DWORD dwMsg,
DWORD dwCallbackInstance,
DWORD dwParam1, DWORD dwParam2,
DWORD dwParam3)//
參數(shù)定義同lineCallbackFunc函數(shù)中的參數(shù)定義
{ int Rec_num=0;
switch(dwParam1)
{ case LINECALLSTATE_CONNECTED:
DWORD len;
ClearCommError(myhModem,&Error,&Status);
Rec_num=Status.cbInQue;
ReadFile(myhModem,RecBuf,Rec_num,&len,0);
//至此已經(jīng)為數(shù)據(jù)通信做好了前期準(zhǔn)備,可設(shè)立標(biāo)志
WriteFile(myhModem,"Success",7,&len,0);
ReadFile(myhModem,RecBuf,8,&len,0);
pwin->MessageBox(RecBuf,0,MB_OK);
break;
case LINECALLSTATE_IDLE:
lineDeallocateCall(myhCall);
break;
case LINECALLSTATE_DISCONNECTED:
lineClose(myhLine);
lineShutDown(myhTapi);
break;
}
}
---- 6 被 叫 方 回 調(diào) 函 數(shù) 的 定 義
void far pascal TMyDecFrame::lpfnCallback(DWORD hDevice, DWORD dwMsg,
DWORD dwCallbackInstance, DWORD dwParam1, DWORD dwParam2,
DWORD dwParam3)
{ int Rec_num=0;
switch(dwParam3)
{ case LINECALLPRIVILEGE_OWNER:
myhCall=(HCALL)hDevice;
Break;
}//只有對(duì)呼叫具有私有特權(quán)的調(diào)用者才能應(yīng)答呼叫,
在此獲得呼叫句柄
switch(dwParam1)
{ case LINECALLSTATE_CONNECTED:
DWORD len;
ClearCommError(myhModem,&Error,&Status);
Rec_num=ComS.cbInQue;
ReadFile(myhModem,RecBuf,Rec_num,&len,0);// 清 除 接 收 緩 沖 區(qū)
ReadFile(myhModem,RecBuf,7,&len,0);
WriteFile(myhModem,"Received",8,&len,0);
pwin- >MessageBox(RecBuf,0,MB_OK);
break;
case LINECALLSTE_OFFERING:
lineAnswer(myhCall,NULL,0);
break;// 完 成 自 動(dòng) 應(yīng) 答
case LINECALLSTATE_IDLE:
lineDeallocateCall(myhCall);
break;
case LINECALLSTATE_DISCONNECTED:
lineClose(myhLine);
lineShutDown(myhTapi);
break;
}
}
typedef struct _OVERLAPPED { // o
DWORD Internal;
DWORD InternalHigh;
DWORD Offset;
DWORD OffsetHigh;
HANDLE hEvent;
} OVERLAPPED；
---- 我 們 定 義OVERLAPPED myOVLP;
---- 我 們 只 用 到 了 其 中 的hEvent 成 員， 其 他 成 員 均 置0；hEvent 設(shè) 置 為CreateEvent（NULL，TRUE，F(xiàn)ALSE，NULL） 產(chǎn) 生 的 事 件 句 柄； 然 后 如 下 調(diào) 用WriteFile(myhModem,"Received",8,&len,&myOVLP);
---- 函 數(shù) 將 立 即 返 回， 此 后， 只 要GetOverlappedResult 函 數(shù) 返 回TRUE， 寫(xiě)操作就 算 完 成 了。