Ø 在.NET中利用FORMULAONE实现动态报表技术(二)
4. 读入的模板用二进制流的形式存入数据库中，F1提供一个WriteToBlobEx(),和WriteToBlob()方法,帮助文档中定义的语法为：
phBlob = F1Book1.WriteToBlobEx (nReservedBytes)
本来可以很轻松的把模板文件写入二进制流，但转换了.NET可调用的组件后定义的语法成了：
public virtual new System.Int32 WriteToBlobEx ( System.Int16 nReservedBytes )
phBlob类型成了System.Int32类型！因此我们只能转用另外的方法。首先把当前模板保存也一临时文件
//把当前模板保存到临时文件
axF1Book1.WriteEx("F1Temp.VTS",TTF160.F1FileTypeConstants.F1FileFormulaOne6);
再利用.NET函数转换成二进制流, 之后再删除临时文件.
//取得临时文件二进制流
byte[] Data = FileToByte("F1Temp.VTS");
//删除临时文件
File.Delete("F1Temp.VTS");
//文件－－> Byte[]
private byte[] FileToByte(string FileName)
{
byte[] FileData;
try
{
using (FileStream fs = File.OpenRead(FileName))
{
FileData = new byte[fs.Length];
fs.Read(FileData,0,(int)fs.Length);
}
}
catch (Exception e)
{
MessageBox.Show("把文件生成二进制流错误！原因："+e.Message);
return null;
}
return FileData;
}
取得二进制流后，判断数据库中是不是已经有此模板，如果已经有此模板则对其进行更新，否则进行新增操作。
新增操作代码如下：
#region 插入当前模板到数据库
strSQL = "Insert Into Report_List_Data(num,rpt_id,rpt_name,user_name,rpt_date,rpt_data)";
strSQL += " Values(@PKID,@rptID,@rptName,@rptUserName,GetDate(),@rptData)";
SqlCommand command = new SqlCommand(strSQL,funcLib.aConn);
//插入参数
SqlParameter paramPKID = new SqlParameter("@PKID",SqlDbType.Int);
paramPKID.Value = GetPKID("Report_List_Data","num");
command.Parameters.Add( paramPKID );
SqlParameter paramRptID = new SqlParameter("@rptID",SqlDbType.Int);
paramRptID.Value = tplInfo[1];
command.Parameters.Add(paramRptID);
SqlParameter paramRptName = new SqlParameter("@rptName",SqlDbType.NVarChar);
paramRptName.Value = tplInfo[0];
command.Parameters.Add(paramRptName);
SqlParameter paramRptUserName = new SqlParameter("@rptUserName",SqlDbType.NVarChar);
paramRptUserName.Value = "HY";
command.Parameters.Add(paramRptUserName);
SqlParameter paramRptData = new SqlParameter("@rptData",SqlDbType.Image);
paramRptData.Value = Data;
command.Parameters.Add(paramRptData);
if(funcLib.aConn.State!=ConnectionState.Open) funcLib.aConn.Open();
command.ExecuteNonQuery();
}
catch (Exception err)
{
MessageBox.Show("插入当前模板不成功！原因："+err.Message);
return;
}
#endregion
对模板进行更新操作代码如下所示：
#region 把修改后的模板保存到数据库
try
{
strSQL = "Update Report_List_Data Set rpt_data = @rptData where rpt_id = "+tplInfo[1] + " and rpt_name = '"+tplInfo[0]+"'";
SqlCommand command = new SqlCommand(strSQL,funcLib.aConn);
//插入参数
SqlParameter paramRptData = new SqlParameter("@rptData",SqlDbType.Image);
paramRptData.Value = Data;
command.Parameters.Add( paramRptData );
if(funcLib.aConn.State!=ConnectionState.Open) funcLib.aConn.Open();
command.ExecuteNonQuery();
break;
}
catch (Exception err)
{
MessageBox.Show("保存当前模板不成功！原因："+err.Message,"错误");
return;
}
#endregion
注：其中funcLib为对数据库操作的基类funcLib.aConn为取得当前连接的实例，GetPKID("Report_List_Data","num")函数功能是取得指定表名和其主键字段名的最大主键值。
