高手们 请问这段代码怎么改成后台的

Question

高手们 请问这段代码怎么改成后台的 答案如果可行 再加100分
CoInitialize(NULL);   
SHDocVw::IShellWindowsPtr   m_spSHWinds;   
if(m_spSHWinds.CreateInstance(__uuidof(SHDocVw::ShellWindows))   ==   S_OK)   
{   
IDispatchPtr   spDisp;   
long   nCount   =   m_spSHWinds->GetCount();   
for(long i =0;i<nCount;i++)   
{   
_variant_t   va(i,   VT_I4);   
spDisp   =   m_spSHWinds->Item(va);   
SHDocVw::IWebBrowser2Ptr   spBrowser(spDisp);   
if   (spBrowser   !=   NULL)   
{    IDispatchPtr   spDisp;   
if(spBrowser->get_Document(&spDisp)   ==   S_OK   &&   spDisp!=   0   )   
{   
MSHTML::IHTMLDocument2Ptr   spHtmlDocument(spDisp);   
MSHTML::IHTMLElementPtr   spHtmlElement;   
if(spHtmlDocument==NULL)   
continue;   

spHtmlDocument->get_body(&spHtmlElement);   
if(spHtmlDocument==NULL)   
continue;   
HRESULT   hr;   
MSHTML::IHTMLElementCollection*   pColl=NULL;   
hr=spHtmlDocument->get_all(&pColl);   
if(pColl!=NULL&&SUCCEEDED(hr))   
{   
long   lcount   =   0;   
pColl->get_length(&lcount);   
for(int   i=0;i<lcount;i++)   
{   
_variant_t   index;   
index.vt=VT_I4;   
index.intVal=i;   
IDispatchPtr   disp;   
disp=pColl->item(index,index);   
if(disp==NULL)   
hr=E_FAIL;   
else   
{   
MSHTML::IHTMLInputElementPtr   pInput(disp);   
if(pInput)   
{   
BSTR   bstrtype;   
pInput->get_type(&bstrtype);   
//printf(_bstr_t(bstrtype));
if(StrCmpW(bstrtype,L"text")==0)   
{
MSHTML::IHTMLElementPtr e(pInput);
_variant_t val;
val=e->getAttribute(_bstr_t(L"id"),0); if (wcscmp(val.bstrVal,L"one")==0){
pInput->put_value(_bstr_t("这是id=one"));
}
else if (wcscmp(val.bstrVal,L"two")==0){
pInput->put_value(_bstr_t("这是id=two"));
}
else{
pInput->put_value(_bstr_t("这是id不知道的"));
}
}   
SysFreeString(bstrtype);   
}   
}   

}   
pColl->Release();   
}   
}   

}   
}   

}   
else     
{   
printf("Shell   Windows   interface   is   not   avilable\n"); 
}   
CoUninitialize();