Smart Cart的CasEstablishContext函式傳送失敗 |
尚未結案
|
MVP2000
一般會員 ![]() ![]() 發表:13 回覆:16 積分:5 註冊:2007-04-03 發送簡訊給我 |
使用CasEstablishContext為什麼我都會安裝失敗??
phContext 的說明 Receives a handle to the established resource manager context. This handle can now be supplied to other functions attempting to do work within this context.. [code cpp] //--------------------------------------------------------------------------- #include #pragma hdrstop #include "Unit1.h" #include //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; //------------------------------ LONG eMsg; LONG rMsg; LONG iGrop; LONG result; DWORD ReaderNameLength; //讀取使用者名字長度 SCARDCONTEXT hContext; LPCTSTR szReaderName; LPCTSTR szGroupName; //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject *Sender) { //CasAddReaderToGroup把讀取者加入到群組 iGrop = CasAddReaderToGroup(hContext, szReaderName, szGroupName ); //CasEstablishContext安裝文件函式 eMsg = CasEstablishContext(SCARD_SCOPE_SYSTEM, //使用者或系統 0, 0, &hContext); if (eMsg != SCARD_S_SUCCESS) //創建上下文是否成功 { Memo1->Lines->Add("安裝文件失敗"); return ; } Memo1->Lines->Add("安裝文件成功"); // Find out ReaderNameLength //mszReaders值如果等於NULL 則輸出使用者長度 在於ReaderNameLength result = CasListReaders(hContext, NULL, NULL, &ReaderNameLength); //CasReleaseContext釋放文件函式 rMsg = CasReleaseContext(hContext); } //--------------------------------------------------------------------------- [/code]
------
May I ask you something ? 編輯記錄
MVP2000 重新編輯於 2008-05-08 21:52:41, 註解 無‧
|
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |