由此可見，如果能學會編寫ASP組件就能結合ASP的長處編寫出強大的網頁�？上У氖�，筆者在市面上很少看到有專門講如何用VC++來制作ASP組件的書籍。一般VC書籍只講一些寫Windows窗口程序或再加上編寫普通的動態鏈接庫。而ASP書籍更是只談ASP中內置組件的使用方法。其實，如果要真正掌握編寫ASP組件的機制，要牽涉到大量的COM技術的知識。而一些講COM技術的書是很深奧的，且很少能結合有用的實例。為此，筆者想借此文以最簡單的方法向大家介紹編寫過程。所謂簡介，正說明將不涉及COM知識的具體細節，僅給出實現方法。
一、建立工程
打開VC++6.0，選擇New Projects中的ALT COM AppWizard, 并輸入好工程名（如MyStudio），記住該工程名將成為ASP組件名的一部分（其實可以修改，但很麻煩），在下一頁上選擇Server Type 為DLL，并可考慮在Support MFC前打勾（想必使用MFC編程的人不少）。按Finish結束。在生成的代碼中有四個標準的導出函數注冊DLL的，我們不必關心。
二、創建COM對象（新建ATL活動模版庫類）
在菜單上選擇Insert New Class,并新建一個ATL Class,如取名為CmyComponent，你會發現在接口表中出現了一個ImyComponent，以后創建該接口的方法和屬性就可以在ASP中使用了。把Aggregatable選項去掉，我們不需要它。保持其他不變。
三、添加接口方法
在ClassView中，右擊ImyComponent,在出現的菜單中按Add Method。如圖，在Method Name中可寫上方法名如InitMyComp。在Parameters中寫上方法的參數如[in]int Number1,[out,retbal]int* Number2。這里要特別說明的是參數的寫法。
1.對于傳入的參數必須在參數前加上[in]，然后可跟上如int n或float f等。且每個傳入參數前都必須寫明。
2.對于調用方法的返回，不再是該方法名前的類型（因為所有這些方法都返回HRESULT，即表明是否調用成功），所以使用傳出的參數，在參數前必須加上[out,retval],然后可跟上如int* n 或者float* f等（如果返回的是int 或float 類型值時）。且每個方法僅限于返回一個這樣的參數。在函數體中可如寫上如“*Number2=Number1;”，表示把輸入參數作為傳出參數。
3.對于最常用的字符串參數在此我們使用BSTR str而不是通常的char* 或CString，所以在參數中需要寫作[in]BSTR str 或[out,retval]BSTR* str。需要特別注意與CString的轉換。如新建一個函數StrConv([in]BSTR bstr1,[out,retval]BSTR* bstr2)，在函數體中可寫上如：
CString str;
str=bstr1;
str=str.Left(str.GetLength()-1);
*bstr2=str.AllocSysString();
4.對于想把一個ASP對象作為參數的方法（如Request對象），可以使用[in]Iunkown *pIUnk，在函數體內，可用如下語句：(具體請查閱MSDN中的相關類的內容)
IRequest* pIRequest;
HRESULT hr = pIUnk->QueryInterface(IID_IRequest, reinterpret_cast<LPVOID*>(&pIRequest));
Long m_lDataSize;
HRESULT hr = pIRequest->get_TotalBytes(&m_lDataSize);
if (FAILED(hr))
return hr;
if (m_lDataSize == 0L)
{
return S_OK;
}
COleVariant varBytesToRead;
COleSafeArray sarrayBytes;
varBytesToRead = m_lDataSize;
sarrayBytes.CreateOneDim(VT_UI1, m_lDataSize);
hr = pIRequest->BinaryRead(&varBytesToRead, &sarrayBytes);
if (FAILED(hr))
{
sarrayBytes.Clear();
return hr;
}
…
5.對于不定個數參數，可使用SAFEARRAY，但使用方法較為復雜�？梢栽趨抵休斎肴缦碌膬热輀in]SAFEARRAY array，并按Attribute…按鈕，在Name中選擇vararg。按確定后修改idl文件在把[in]SAFEARRAY array改為[in]SAFEARRAY(VARIANT) array。然后再打開MyComponent.h文件把該函數的參數SAFEARRAY array改為SAFEARRAY* array。再打開MyComponent.cpp文件修改參數，在函數體內使用COleSafeArray類實現該參數的控制，如“COleSafeArray SArray(array,VT_BSTR)”，具體操作可查閱MSDN中的該類的成員函數。
四、添加接口屬性
在ClassView中，右擊ImyComponent,在出現的菜單中按Add Property。如圖，在Property中可選擇屬性類型如float，在下面可寫上屬性名如MyFloat。保持其他不變。這里需要說明的是在生成的put_MyFloat和get_MyFloat函數體中的書寫。
不妨舉個小例：
1.在CMyComponent 中添加成員變量m_myFloat
2.在put_MyFloat 中寫上：m_myFloat=newVal;
3.在get_MyFloat中寫上：*pVal=m_myFloat
有成員變量也是它優于ISAPI的一個地方，在ISAPI中要在網頁間傳遞信息，只能通過URL參數或者是Cookie來實現，因為每次調用都是一次新的鏈接，無法在網頁之間仍然是同一次調用DLL,所以設置成員變量意義不大，只在一次調用中有用。而那兩種方法都只能傳遞很有限的字符，除非利用創建服務器端臨時文件（此方法很不好）。再說，ASP中的Session對象本身就是很好的存儲信息的對象。
至此，我們創建了一個非常簡單的沒有什么功能的ASP組件，意在說明如何制作。下面，我們書寫一個簡單的ASP網頁，來看看如何使用。網頁如下：
<%@ Language=VBScript %>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<BODY>
<%
Set Obj=Server.CreateObject("MyStudio.MyComponent")
j=Obj.InitMyComp(5)
Response.Write(j)
%>
<p>
<%
Obj.MyFloat=3.9
j=Obj.MyFloat
Response.Write(j)
%>
<p>
<%
str1="abcd"
str2=Obj.StrConv(str1)
Response.Write(str2)
%>
</BODY>
</HTML>
顯示結果為：
5
3.9
abc
也許，你現在還看不到編寫ASP組件的巨大魅力。但是，如果你正在編寫搜索引擎，文件上傳，自動回復，等等的高級網頁制作，你若能夠充分的利用VC++的優越編程手段，就不必在CGI，ISAPI中苦苦掙扎，可以比較方便的編寫這些功能。比方說用戶想在你的網頁上搜索幾個著名新聞網站上當前的重要新聞，你就可以使用ASP組件在后臺實時的打開各網站獲得信息，篩選匹配后顯示給用戶。又比方說，當注冊用戶告知他的email地址，你就可以利用ASP組件自動給新注冊用戶發出確認信函，用最快的方式讓用戶去確認并使注冊成功……其實，你一定還有很多新的想法可以在網頁上得以實現，趕快行動吧。
http://www.ccw.com.cn/htm/app/aprog/01_2_13_4.asp
文章來源于領測軟件測試網 http://www.kjueaiud.com/
