Question

fastreport在VB.NET使用

1.使用SQLSERVER数据库,在FASTREPORT动态填加数据.例如:我写了个查询,
SELECT A,B,C,D FROM MASTER,可以在FASTREPORT 中看到我的数据,并能打印
2.把FASTREPORT保存到SQLSERVER里
3.不要说DEHPHI里的,这些我在DEHPHI我都可以做到
4.答的好另加分.并说明你使用FASTREPORT的版本.
两个回答都不对,第一个是设置子的,这个我会,第二个语言不对,那就是版本也不对,谈不上了,DEHPHI我也用过这.还是谢谢你们

呵呵,主要是DELPHI有原代码,我也可以做也来,而VB.NET,没有原代码只有个DLL文件,没办法搞.

Answer 1

TMemoryStream *s;
try
{
s = new TMemoryStream;
frReport1->SaveToStream(s);
//以下代码为新增报表
Query1->SQL->Clear();
Query1->SQL->Add("insert into tb_report (r_id,r_desc,r_data) Values (报表编号,'报表说明',',:r_data)");
//Query1->ParamByName("r_sql")->AsString = FSQL;
Query1->ParamByName("r_data")->LoadFromStream(s,ftBlob);
Query1->Prepare();
Query1->ExecSQL();
//以下代码为更新报表
Query1->SQL->Clear()
Query1->SQL->Add("update tb_report set r_data=:r_data where r_id=报表编号");
Query1->ParamByName("r_data")->LoadFromStream(s,ftBlob);
Query1->Prepare();
Query1->ExecSQL();
}
__finally
{
delete s;
s = NULL;
}

----------
确实是语言不对啊.因为自己在看你的问题的时候,也尝试自己去做了.不过delphi用这种方法可行,其它的语言应该也不会查到哪去吧~