coffee

/***********  导入Excel
SELECT *
FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0',
  'Data Source="c:\test.xls";User ID=Admin;Password=;Extended properties=Excel 5.0')...xactions

/*动态文件名
declare @fn varchar(20),@s varchar(1000)
set @fn = 'c:\test.xls'
set @s ='''Microsoft.Jet.OLEDB.4.0'',
''Data Source="'+@fn+'";User ID=Ad

1、添加工具栏资源ID为IDR_TOOLBAR
2、在对话框的类定义中加：
 CToolBar m_ToolBar;
3、在OnInitDialog中或其它合适的消息响应中加如下代码：（函数可查看MSDN）
 
 m_ToolBar.Create(this); //创建工具栏
 m_ToolBar.LoadToolBar(IDR_TOOLBAR);//加载工具栏
 
 //得出控件条大小.
 CRect rect;
 CRect rectNow;
 GetClientRect(rect);
 RepositionBars(AFX_IDW_CONTROLBAR_FIRST,AFX_IDW_CONTROLBAR_LAST,0,reposQuery,rectNow);

 //放置控件条位置
 CPoint ptOffset(rectNow.left-rect.l

对话框中添加工具栏及工具栏上的Button响应UPDATE_COMMAND_UI消息

在对话框程序中添加工具栏其实很简单，网上能找到很多的例子。一般的步骤就是：1、在资源中添加工

具栏资源；2、在对话框类中定义一个工具栏变量；3、在对话框的OnInitDialog函数中Create工具栏。程

序如下：
在对话框类中定义工具栏成员变量：
CToolBar m_ToolBar;
在OnInitDialog函数中Create之：
if(!m_ToolBar.CreateEx(this, TBSTYLE_FLAT,

WS_CHILD|WS_VISIBLE|CBRS_TOP|CBRS_GRIPPER|CBRS_TOOLTIPS|CBRS_SIZE_DYNAMIC)
  ||!m_ToolBar.LoadToolBar(IDR_TOOLBAR_GRAPHICS))
 {
  TRACE0(_T("创建工具条失败\n"));
  return

对库里某一记录行进行复制，只修改其中的主键，其它数据都不变，如何实现？  
   
  比如：  
  表A，有字段djbh,xsh,fs，其中djbh与xsh是联合主键  
  已经存在记录  
  djbh     xsh     fs  
  ----     ---     ---  
  A01         1       50  
   
  我打算把这个记录复制，生成如下的记录：  
  djbh     xsh     fs  
  ---- &nb

//声明

CBCGPProp *pGroup1；

//创建属性

if(pGroup1!=NULL) m_wndPropList.DeleteProperty(pGroup1);

pGroup1 = new CBCGPProp(_T("基本属性"));
CBCGPProp *UpType = new CBCGPProp(_T("上面"),(_variant_t) _T(""),_T(""),ID_UP);
UpType->AddOption(_T(TypeStr[0]));
UpType->AddOption(_T(TypeStr[1]));
UpType->AddOption(_T(TypeStr[2]));
pGroup1->AddSubItem(UpType);

CBCGPProp *DownType = new CBCGPProp(_T("下面"),(_variant_t) _T(""),_T(""),ID_DOWN);
DownType->AddOption(_T(TypeSt