xianxingdlg.cpp

价格生成系统 热水器生产厂家价格管理、设备类型管理系统

a=55*m_a1-47.5+7.5*m_a4;
v=atof(m_feng)/(a/24.5+1-m_a4);
m_bu=(55*m_a1-47.5+7.5+m_a4)*v/24.5;
s_bu=m_bu/atof(t_feng);
m_zong=atoi(num)*atoi(m_num);
//a[1]=m_zong;	
m_jisuan=m_zong;
w_zong=m_jisuan*atof(m_wencha);
//a[0]=w_zong;
w_ji=w_zong*1;
w_1=w_ji/860.0/atof(m_xiaolv);
//a[2]=w_1;
gonglv1=p_dian;
UpdateData(false);
break;}
}	
}	
}

void CXianxingDlg::OnOk2() 
{
UpdateData(true);
//AfxOleInit();
 CString m_str[200];
m_str[20].Empty();

 m_str[20].Format("d:\\Yornik2\\系统图\\%d-%d.dwg",tai+tai1,shuliang[2]);
m_str[22]="d:\\Yornik2\\输出文件\\系统图10.dwg";
if(!CopyFile(m_str[20],m_str[22],0))
MessageBox("没有此文件!");
else 
{
//*****
 //变量定义
 _Application app;    
 Workbooks books;
 _Workbook book;
 Worksheets sheets;
 _Worksheet sheet;
 Range range;
 Range iCell;
 Range unionRange;

 LPDISPATCH lpDisp;    
 COleVariant vResult;
 COleVariant
        covTrue((short)TRUE),
        covFalse((short)FALSE),
        covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);    
 
 


 
 
 //*****
 //创建Excel 2000服务器(启动Excel)
 if(!app.CreateDispatch("Excel.Application"))
{
  AfxMessageBox("无法启动Excel服务器!");
    return;
 }
 
 app.SetVisible(TRUE);          //使Excel可见
 app.SetUserControl(TRUE);      //允许其它用户控制Excel
 

 //*****   
 //打开c:\1.xls
 books.AttachDispatch(app.GetWorkbooks());
 lpDisp = books.Open("d:\\Yornik2\\输出文件\\选型计算3.xls",      
   covOptional, covOptional, covOptional, covOptional, covOptional,
   covOptional, covOptional, covOptional, covOptional, covOptional,
   covOptional, covOptional );   
 //lpDisp = books.Add(covOptional);

     
 //*****
 //得到Workbook
 book.AttachDispatch(lpDisp);
 
 
 //*****
 //得到Worksheets 
 sheets.AttachDispatch(book.GetWorksheets()); 
 
 
 //*****
 //得到当前活跃sheet
 //如果有单元格正处于编辑状态中，此操作不能返回，会一直等待
 lpDisp=book.GetActiveSheet();
 sheet.AttachDispatch(lpDisp); 
  


 //读取已经使用区域的信息，包括已经使用的行数、列数、起始行、起始列

 Range usedRange;
 usedRange.AttachDispatch(sheet.GetUsedRange());
 range.AttachDispatch(usedRange.GetRows());
 long iRowNum=range.GetCount();                   //已经使用的行数
 
 range.AttachDispatch(usedRange.GetColumns());
 long iColNum=range.GetCount();                   //已经使用的列数
  
 long iStartRow=usedRange.GetRow();               //已使用区域的起始行，从1开始
 long iStartCol=usedRange.GetColumn();            //已使用区域的起始列，从1开始

 //读取第一个单元格的值
range.AttachDispatch(sheet.GetCells()); 
 range.AttachDispatch(range.GetItem (COleVariant((long)1),COleVariant((long)1)).pdispVal );
vResult =range.GetValue();
 CString str;
 if(vResult.vt == VT_BSTR)       //字符串
 {
  str=vResult.bstrVal;
 }
 else if (vResult.vt==VT_R8)     //8字节的数字 
 {
  str.Format("%f",vResult.dblVal);
 }
 else if(vResult.vt==VT_DATE)    //时间格式
 {
  SYSTEMTIME st;
     VariantTimeToSystemTime(vResult.date, &st);
 }
 else if(vResult.vt==VT_EMPTY)   //单元格空的
 {
  str="";
 }  
 /*
 //*****
 //读取第一个单元格的对齐方式，数据类型:VT_I4
 //读取水平对齐方式
 for(int k1=1;k1<50;k1+=2)
	 for(int k2=1;k2<15;k2++)
	 {
 range.AttachDispatch(sheet.GetCells());
 iCell.AttachDispatch((range.GetItem (COleVariant(long(k1)), COleVariant(long(k2)))).pdispVal);
 vResult.lVal=0;
iCell.SetHorizontalAlignment(COleVariant((long)-4108));
 vResult=iCell.GetHorizontalAlignment();
 if(vResult.lVal!=0)
 {
  switch (vResult.lVal)
  {
  case 1:      //默认
   break;
  case -4108:  //居中
   break;
  case -4131 : //*左
   break;
  case -4152 : //*右
   break;
  }
 
 }
  
 //垂直对齐方式
 iCell.AttachDispatch((range.GetItem (COleVariant(long(k1)), COleVariant(long(k2)))).pdispVal);
 vResult.lVal=0;

iCell.SetVerticalAlignment(COleVariant((long)-4108));
 vResult=iCell.GetVerticalAlignment();
 if(vResult.lVal!=0)
 {
  switch (vResult.lVal)
  {
  case -4160 :  //*上
   break;
  case -4108 :  //居中
   break;
  case -4107 :  //*下
   break;
  }
 
 }
 range.AttachDispatch(range.GetItem (COleVariant((long)k1),COleVariant((long)k2)).pdispVal );
range.Merge(COleVariant((short)1));
range.SetWrapText(COleVariant((short)1));
}
 range.AttachDispatch(sheet.GetCells()); 
 unionRange.AttachDispatch(range.GetItem (COleVariant((long)1),COleVariant((long)1)).pdispVal );
 unionRange.AttachDispatch(unionRange.GetResize(COleVariant((long)2),COleVariant((long)1)));
 unionRange.Merge(COleVariant((long)0));   //合并单元格
 range.AttachDispatch(sheet.GetCells()); 
 unionRange.AttachDispatch(range.GetItem (COleVariant((long)1),COleVariant((long)2)).pdispVal );
 unionRange.AttachDispatch(unionRange.GetResize(COleVariant((long)2),COleVariant((long)7)));
 unionRange.Merge(COleVariant((long)0));   //合并单元格
range.SetItem(COleVariant((long)1),COleVariant((long)2),COleVariant("热泵系统选型计算"));
for(int i=9;i<30;i++)
{range.AttachDispatch(sheet.GetCells()); 
 unionRange.AttachDispatch(range.GetItem (COleVariant((long)1),COleVariant((long)i)).pdispVal );
 unionRange.AttachDispatch(unionRange.GetResize(COleVariant((long)2),COleVariant((long)1)));
 unionRange.Merge(COleVariant((long)0));   //合并单元格
}
range.AttachDispatch(sheet.GetCells()); 
 unionRange.AttachDispatch(range.GetItem (COleVariant((long)3),COleVariant((long)1)).pdispVal );
 unionRange.AttachDispatch(unionRange.GetResize(COleVariant((long)1),COleVariant((long)4)));
 unionRange.Merge(COleVariant((long)0));   //合并单元格*/
 range.SetItem(COleVariant((long)3),COleVariant((long)1),COleVariant("根据贵单位提供资料,热水使用人数N为")); 
m_str[0].Format("%d",atoi(num));
 m_str[0]+=CString("个");
 range.SetItem(COleVariant((long)3),COleVariant((long)5),COleVariant(m_str[0]));
 /*
 range.AttachDispatch(sheet.GetCells()); 
 unionRange.AttachDispatch(range.GetItem (COleVariant((long)3),COleVariant((long)6)).pdispVal );
 unionRange.AttachDispatch(unionRange.GetResize(COleVariant((long)1),COleVariant((long)2)));
 unionRange.Merge(COleVariant((long)0));   //合并单元格*/
  m_str[1].Format("%d",atoi(m_num));
 m_str[1]+=CString("L/人");
 range.SetItem(COleVariant((long)3),COleVariant((long)6),COleVariant("热水使用定额P:"));
range.SetItem(COleVariant((long)3),COleVariant((long)8),COleVariant(m_str[1]));
/*
for(int j=4;j<58;j+=2)
{range.AttachDispatch(sheet.GetCells()); 
 unionRange.AttachDispatch(range.GetItem (COleVariant((long)j),COleVariant((long)2)).pdispVal );
 unionRange.AttachDispatch(unionRange.GetResize(COleVariant((long)2),COleVariant((long)2)));
 unionRange.Merge(COleVariant((long)0));   //合并单元格
 range.AttachDispatch(sheet.GetCells()); 
 unionRange.AttachDispatch(range.GetItem (COleVariant((long)j),COleVariant((long)5)).pdispVal );
 unionRange.AttachDispatch(unionRange.GetResize(COleVariant((long)2),COleVariant((long)4)));
 unionRange.Merge(COleVariant((long)0));   //合并单元格
 range.AttachDispatch(sheet.GetCells()); 
 unionRange.AttachDispatch(range.GetItem (COleVariant((long)j),COleVariant((long)1)).pdispVal );
 unionRange.AttachDispatch(unionRange.GetResize(COleVariant((long)2),COleVariant((long)1)));
 unionRange.Merge(COleVariant((long)0));   //合并单元格
 range.AttachDispatch(sheet.GetCells()); 
 unionRange.AttachDispatch(range.GetItem (COleVariant((long)j),COleVariant((long)4)).pdispVal );
 unionRange.AttachDispatch(unionRange.GetResize(COleVariant((long)2),COleVariant((long)1)));
 unionRange.Merge(COleVariant((long)0));   //合并单元格
range.AttachDispatch(sheet.GetCells()); 
 unionRange.AttachDispatch(range.GetItem (COleVariant((long)j),COleVariant((long)9)).pdispVal );
 unionRange.AttachDispatch(unionRange.GetResize(COleVariant((long)2),COleVariant((long)1)));
 unionRange.Merge(COleVariant((long)0));   //合并单元格
 range.AttachDispatch(sheet.GetCells()); 
 unionRange.AttachDispatch(range.GetItem (COleVariant((long)j),COleVariant((long)10)).pdispVal );
 unionRange.AttachDispatch(unionRange.GetResize(COleVariant((long)2),COleVariant((long)1)));
 unionRange.Merge(COleVariant((long)0));   //合并单元格
 range.AttachDispatch(sheet.GetCells()); 
 unionRange.AttachDispatch(range.GetItem (COleVariant((long)j),COleVariant((long)11)).pdispVal );
 unionRange.AttachDispatch(unionRange.GetResize(COleVariant((long)2),COleVariant((long)1)));
 unionRange.Merge(COleVariant((long)0));   //合并单元格
 range.AttachDispatch(sheet.GetCells()); 
 unionRange.AttachDispatch(range.GetItem (COleVariant((long)j),COleVariant((long)12)).pdispVal );
 unionRange.AttachDispatch(unionRange.GetResize(COleVariant((long)2),COleVariant((long)1)));
 unionRange.Merge(COleVariant((long)0));   //合并单元格
 range.AttachDispatch(sheet.GetCells()); 
 unionRange.AttachDispatch(range.GetItem (COleVariant((long)j),COleVariant((long)13)).pdispVal );
 unionRange.AttachDispatch(unionRange.GetResize(COleVariant((long)2),COleVariant((long)1)));
 unionRange.Merge(COleVariant((long)0));   //合并单元格
 range.AttachDispatch(sheet.GetCells()); 
 unionRange.AttachDispatch(range.GetItem (COleVariant((long)j),COleVariant((long)14)).pdispVal );
 unionRange.AttachDispatch(unionRange.GetResize(COleVariant((long)2),COleVariant((long)1)));
 unionRange.Merge(COleVariant((long)0));   //合并单元格
 range.AttachDispatch(sheet.GetCells()); 
 unionRange.AttachDispatch(range.GetItem (COleVariant((long)j),COleVariant((long)15)).pdispVal );
 unionRange.AttachDispatch(unionRange.GetResize(COleVariant((long)2),COleVariant((long)1)));
 unionRange.Merge(COleVariant((long)0));   //合并单元格
 range.AttachDispatch(sheet.GetCells()); 
 unionRange.AttachDispatch(range.GetItem (COleVariant((long)j),COleVariant((long)16)).pdispVal );
 unionRange.AttachDispatch(unionRange.GetResize(COleVariant((long)2),COleVariant((long)1)));
 unionRange.Merge(COleVariant((long)0));   //合并单元格
 range.AttachDispatch(sheet.GetCells()); 
 unionRange.AttachDispatch(range.GetItem (COleVariant((long)j),COleVariant((long)17)).pdispVal );
 unionRange.AttachDispatch(unionRange.GetResize(COleVariant((long)2),COleVariant((long)1)));
 unionRange.Merge(COleVariant((long)0));   //合并单元格
}
range.AttachDispatch(sheet.GetCells()); 
 unionRange.AttachDispatch(range.GetItem (COleVariant((long)58),COleVariant((long)1)).pdispVal );
 unionRange.AttachDispatch(unionRange.GetResize(COleVariant((long)2),COleVariant((long)10)));
 unionRange.Merge(COleVariant((long)0));   //合并单元格
 */
range.SetItem(COleVariant((long)4),COleVariant((long)1),COleVariant("M总"));
range.SetItem(COleVariant((long)4),COleVariant((long)2),COleVariant("日总用水量"));
range.SetItem(COleVariant((long)4),COleVariant((long)4),COleVariant("kg"));
range.SetItem(COleVariant((long)4),COleVariant((long)5),COleVariant("M总=N(个)×P(L/人)"));
range.SetItem(COleVariant((long)4),COleVariant((long)9),COleVariant(m_zong));
range.SetItem(COleVariant((long)6),COleVariant((long)1),COleVariant("M计算"));
range.SetItem(COleVariant((long)6),COleVariant((long)2),COleVariant("计算用水量"));
range.SetItem(COleVariant((long)6),COleVariant((long)4),COleVariant("kg"));
range.SetItem(COleVariant((long)6),COleVariant((long)5),COleVariant(m_jisuan));
//range.SetItem(COleVariant((long)5),COleVariant((long)9),COleVariant("M计算"));
range.SetItem(COleVariant((long)8),COleVariant((long)1),COleVariant("W总"));
range.SetItem(COleVariant((long)8),COleVariant((long)2),COleVariant("总耗能"));
range.SetItem(COleVariant((long)8),COleVariant((long)4),COleVariant("kcal"));
range.SetItem(COleVariant((long)8),COleVariant((long)5),COleVariant("W总=  c*M计算*△t"));
range.SetItem(COleVariant((long)8),COleVariant((long)9),COleVariant(w_zong));
range.SetItem(COleVariant((long)8),COleVariant((long)10),COleVariant("c＝１"));
range.SetItem(COleVariant((long)10),COleVariant((long)1),COleVariant("W机"));
range.SetItem(COleVariant((long)10),COleVariant((long)2),COleVariant("机器名义耗能"));
range.SetItem(COleVariant((long)10),COleVariant((long)4),COleVariant("kcal"));
range.SetItem(COleVariant((long)10),COleVariant((long)5),COleVariant("W机=η*W总"));
range.SetItem(COleVariant((long)10),COleVariant((long)9),COleVariant(w_ji));
range.SetItem(COleVariant((long)10),COleVariant((long)10),COleVariant("η:1-1.2"));
range.SetItem(COleVariant((long)12),COleVariant((long)1),COleVariant("W1"));
range.SetItem(COleVariant((long)12),COleVariant((long)2),COleVariant("机器日耗电量"));
range.SetItem(COleVariant((long)12),COleVariant((long)4),COleVariant("kwh"));
range.SetItem(COleVariant((long)12),COleVariant((long)5),COleVariant("W1=W机／860／η2"));
range.SetItem(COleVariant((long)12),COleVariant((long)9),COleVariant(w_1));
range.SetItem(COleVariant((long)12),COleVariant((long)10),COleVariant("860kcal/kwh"));
m_str[2].Format("%f%%",atof(m_xiaolv)*100);
range.SetItem(COleVariant((long)12),COleVariant((long)11),COleVariant(m_str[2]));
range.SetItem(COleVariant((long)14),COleVariant((long)2),COleVariant("选型设备"));
int index =m_shebei.GetCurSel();
int index2 =m_shebei1.GetCurSel();
if(index>=0&&index2>=0)
{m_shebei.GetLBText(index,m_str[3]);
m_str[3]+=CString("热泵机组");
range.SetItem(COleVariant((long)14),COleVariant((long)5),COleVariant(m_str[3]));
range.SetItem(COleVariant((long)14),COleVariant((long)9),COleVariant((float)tai));

range.SetItem(COleVariant((long)14),COleVariant((long)10),COleVariant("台"));
m_shebei1.GetLBText(index2,m_str[3]);
m_str[3]+=CString("热泵机组");
range.SetItem(COleVariant((long)16),COleVariant((long)5),COleVariant(m_str[3]));
range.SetItem(COleVariant((long)16),COleVariant((long)9),COleVariant((float)tai1));

range.SetItem(COleVariant((long)16),COleVariant((long)10),COleVariant("台"));
}

if(index2>=0&&index==-1)
{
m_shebei1.GetLBText(index2,m_str[3]);
m_str[3]+=CString("热泵机组");
range.SetItem(COleVariant((long)14),COleVariant((long)5),COleVariant(m_str[3]));
range.SetItem(COleVariant((long)14),COleVariant((long)9),COleVariant((float)tai1));

range.SetItem(COleVariant((long)14),COleVariant((long)10),COleVariant("台"));
	range.SetItem(COleVariant((long)16),COleVariant((long)5),COleVariant(""));
range.SetItem(COleVariant((long)16),COleVariant((long)9),COleVariant(""));

range.SetItem(COleVariant((long)16),COleVariant((long)10),COleVariant(""));
}
if(index>=0&&index2==-1)
{m_shebei.GetLBText(index,m_str[3]);
m_str[3]+=CString("热泵机组");
range.SetItem(COleVariant((long)14),COleVariant((long)5),COleVariant(m_str[3]));
range.SetItem(COleVariant((long)14),COleVariant((long)9),COleVariant((float)tai));

range.SetItem(COleVariant((long)14),COleVariant((long)10),COleVariant("台"));
	range.SetItem(COleVariant((long)16),COleVariant((long)5),COleVariant(""));
range.SetItem(COleVariant((long)16),COleVariant((long)9),COleVariant(""));

range.SetItem(COleVariant((long)16),COleVariant((long)10),COleVariant(""));

}