ＳＱＬ行转列经典算法PK WebBrowser挂接事件一二

      use WebMange
      declare @k nvarchar(100) 
      select waitui.Url,WaiTui.KeyWords,TimeRank.Time,TimeRank.KeyWordsId,timerank.rank into #temp from
      WaiTui,TimeRank where TimeRank.KeyWordsId=waitui.ID
      DECLARE @j NVARCHAR(4000)  
      SELECT top 5 @j = ISNULL(@j + ',','') +  QUOTENAME(time)
      FROM  (select distinct time from #temp as b) as a  order by a.Time desc
      Declare @h NVARCHAR(4000) 
      SET @h=' select * from  (select * from #temp) as t  pivot  (  max(t.rank)  for t.time in ('+@j+')  ) as r'  
      EXEC( @h) 

      drop table #temp

-------------------------------

      以上行转列实行从大到小变量行转换成变量列的过程。研究周期（两天）

      --------------------------------------一下webbrowser 控件自动化实例

       HRESULT hr1,hr2,hr3,hr4,hr5,hr6,hr7,hr8,hr9,hr10;
    TDocHostUIHandlerImpl   *FDocHostUIHandler; 
FDocHostUIHandler=new TDocHostUIHandlerImpl();
    IOleObject *spOleObj=NULL;
    CComPtr<IWebBrowser2> m_spWebBrowser;
    hr1=CoCreateInstance(CLSID_WebBrowser, NULL, CLSCTX_INPROC, IID_IWebBrowser2, (void**)&m_spWebBrowser);
    hr2=m_spWebBrowser->QueryInterface(IID_IOleObject, (void**)&spOleObj);
    CControlContainer * pContainer = NULL;
pContainer = new CControlContainer(NULL);
    hr3=spOleObj->SetClientSite(pContainer);
    if (FAILED(hr3)) goto exit1;
    /*RECT rcClient;
    GetClientRect(&rcClient);*/
    hr10=spOleObj->DoVerb(OLEIVERB_SHOW, 0, pContainer, 0,0,0);
    if (FAILED(hr10)) goto exit1;
    //容器拦截浏览器事件的注

   DWORD dwCookie = 0;
/* IConnectionPointContainer* pCPC = NULL;
IConnectionPoint* pCP  = NULL;
m_spWebBrowser->QueryInterface(IID_IConnectionPointContainer,(void**)&pCPC);
pCPC->FindConnectionPoint(DIID_DWebBrowserEvents2,&pCP);
pCP->Advise( (IUnknown*)(void*)pContainer,&dwCookie);*/

    ------------------

    注释的和没注释的全额相等，后者经过Atl封装变得简单易用------------------

//DIID_HTMLElementEvents2
     AtlAdvise(m_spWebBrowser,(IUnknown*)(void*)pContainer, DIID_DWebBrowserEvents2,&dwCookie);
m_spWebBrowser->Navigate(L"http://www.baidu.com", NULL, NULL, NULL, NULL);

//导航到启动页
exit1:
if (spOleObj) spOleObj->Release();
if (pContainer) pContainer->Release();
 设置控件高宽度
    RECT rcClient;
rcClient.left=0;
rcClient.bottom=500;
rcClient.right=1000;
rcClient.top=0;
    IOleInPlaceObject * pInPlaceObject;
spOleObj->QueryInterface(IID_IOleInPlaceObject,(void**)&pInPlaceObject);
pInPlaceObject->SetObjectRects(&rcClient,&rcClient);

行转列问题总结

1、行转列

---1、最简单的行转列
/*   

问题：假设有张学生成绩表(tb)如下:
姓名 课程 分数
张三 语文 74
张三 数学 83
张三 物理 93
李四 语文 74
李四 数学 84
李四 物理 94

想变成(得到如下结果)： 
姓名 语文 数学 物理 
李四 74   84   94
张三 74   83   93
*/
--测试用
IF OBJECT_ID('[tb]') IS NOT NULL DROP TABLE [tb]
GO
create table tb(姓名 varchar(10) , 课程 varchar(10) , 分数 int)
insert into tb values('张三' , '语文' , 74)
insert into tb values('张三' , '数学' , 83)
insert into tb values('张三' , '物理' , 93)
insert into tb values('李四' , '语文' , 74)
insert into tb values('李四' , '数学' , 84)
insert into tb values('李四' , '物理' , 94)
go

--SQL SERVER 2000 动态SQL,指课程不止语文、数学、物理这三门课程。(以下同)
declare @sql varchar(8000)
set @sql = 'select 姓名 '
select @sql = @sql + ' , max(case 课程 when ''' + 课程 + ''' then 分数 else 0 end) [' + 课程 + ']'
from (select distinct 课程 from tb) as a
set @sql = @sql + ' from tb group by 姓名'
exec(@sql) 
--通过动态构建@sql，得到如下脚本
select 姓名 as 姓名 ,
  max(case 课程 when '语文' then 分数 else 0 end) 语文,
  max(case 课程 when '数学' then 分数 else 0 end) 数学,
  max(case 课程 when '物理' then 分数 else 0 end) 物理
from tb
group by 姓名

--SQL SERVER 2005 动态SQL。
declare @sql varchar(8000)
select @sql = isnull(@sql + '],[' , '') + 课程 from tb group by 课程
set @sql = '[' + @sql + ']'
exec ('select * from (select * from tb) a pivot (max(分数) for 课程 in (' + @sql + ')) b')
--得到SQL SERVER 2005 静态SQL。
select * from (select * from tb) a pivot (max(分数) for 课程 in (语文,数学,物理)) b

--查询结果
/*
姓名         数学          物理          语文          
---------- ----------- ----------- ----------- 
李四         84          94          74
张三         83          93          74

（所影响的行数为 2 行）
*/

--2 加合计
/*
问题：在上述结果的基础上加平均分，总分，得到如下结果：
姓名 语文 数学 物理 平均分 总分 
---- ---- ---- ---- ------ ----
李四 74   84   94   84.00  252
张三 74   83   93   83.33  250
*/

--SQL SERVER 2000 静态SQL。
select 姓名 姓名,
  max(case 课程 when '语文' then 分数 else 0 end) 语文,
  max(case 课程 when '数学' then 分数 else 0 end) 数学,
  max(case 课程 when '物理' then 分数 else 0 end) 物理,
  cast(avg(分数*1.0) as decimal(18,2)) 平均分,
  sum(分数) 总分
from tb
group by 姓名

--SQL SERVER 2000 动态SQL。
declare @sql varchar(8000)
set @sql = 'select 姓名 '
select @sql = @sql + ' , max(case 课程 when ''' + 课程 + ''' then 分数 else 0 end) [' + 课程 + ']'
from (select distinct 课程 from tb) as a
set @sql = @sql + ' , cast(avg(分数*1.0) as decimal(18,2)) 平均分 , sum(分数) 总分 from tb group by 姓名'
exec(@sql)

--SQL SERVER 2005 静态SQL。
select m.* , n.平均分 , n.总分 from
(select * from (select * from tb) a pivot (max(分数) for 课程 in (语文,数学,物理)) b) m,
(select 姓名 , cast(avg(分数*1.0) as decimal(18,2)) 平均分 , sum(分数) 总分 from tb group by 姓名) n
where m.姓名 = n.姓名

--SQL SERVER 2005 动态SQL。
declare @sql varchar(8000)
select @sql = isnull(@sql + ',' , '') + 课程 from tb group by 课程
exec ('select m.* , n.平均分 , n.总分 from
(select * from (select * from tb) a pivot (max(分数) for 课程 in (' + @sql + ')) b) m , 
(select 姓名 , cast(avg(分数*1.0) as decimal(18,2)) 平均分 , sum(分数) 总分 from tb group by 姓名) n
where m.姓名 = n.姓名')

其他实例