???? ??????

????????????????????????????????????????linkreport??????????????vb?????????????????????????????????????????????????????????
???????????
???????????????????
?????
DataSet Ds=new DataSet();
string Sql="Select '' CheckBox,FID,ProjectName,CostCategory,DayCost,MonthCost,YearCost from AgileReportTest_1";
DataAccess.dataSet(Sql,????,ref Ds);
AgileReport.SingleReport aSingleReport=new SingleReport("????","ReportTemplates/Account.cll",Ds.Tables[0],2,1,false);
????????????????????????????????????
?????
onload???
function window_onload()
{
try
{
var aAgileReport=new AgileReport("Cell52",Form1.HdRequestPage.value,false);
if(aAgileReport!=null)
{
aAgileReport.LoadReport();
document.Form1.Cell52.SetColHidden(2,2);
for(var i= 3; i<=Form1.Cell52.GetRows(0)-1;i++)
{
document.Form1.Cell52.SetCheckCell(1,i,0,"",2);
//????????? ???????????????
document.Form1.Cell52.SetCellDigital(2,i,0,0); //??????????
document.Form1.Cell52.SetCellInput(2,i,0,5);//???????
document.Form1.Cell52.SetCellAlign(1,i,0,32+4);//??????
}
}
}
catch(E)
{
alert(E.message);
}
}
???????
function SaveValue()
document.Form1.Cell52.SaveEdit()
set xmlDoc=CreateObject("Microsoft.XMLDOM")
set xmlBody= xmlDoc.createElement("Body")
For i= 3 to Form1.Cell52.GetRows(0)-1
set xmlRow= xmlDoc.createElement("rows")
dim ischecked
ischecked=Form1.Cell52.GetCellDouble2(1,i,0)
if ischecked=1 then
For j= 2 to Form1.Cell52.GetCols(0)-1
dim hdvalue
hdvalue=Form1.Cell52.GetCellString(j,i,0)
set xmlChild=xmlDoc.createElement("columns")
xmlChild.text=hdvalue
xmlRow.appendChild xmlChild
Next
end if
xmlBody.appendChild xmlRow
Next
xmlDoc.appendChild xmlBody
set HttpSend=CreateObject("Microsoft.XMLHTTP")
HttpSend.open ",?????;POST","WebSaveForm.aspx",false
HttpSend.send xmlDoc
strReturn=HttpSend.ResponseText
msgbox strReturn
end function
????????WebSaveForm.aspx??try
{
System.Xml.XmlDocument postedXml=new System.Xml.XmlDocument();
postedXml.Load(Request.InputStream);
string sql="";
if(postedXml.SelectSingleNode("Body")!=null)
{
System.Xml.XmlNode xmlbody = postedXml.SelectSingleNode("Body");
foreach (System.Xml.XmlNode xmlrows in xmlbody.ChildNodes)
{
string str="";
foreach (System.Xml.XmlNode xmlcolumns in xmlrows.ChildNodes)
{
string values=xmlcolumns.InnerText.Replace("'","''");//??????
str+=(str==""?" select ":",???;,")+ "'"+values+ "'";
}
if(str!="")
{
sql+=(sql==""?"":" union all ")+str;
}
}
if(sql!="")
{
sql="delete from AgileReportTest_1 insert into AgileReportTest_1(FID,ProjectName,CostCategory,DayCost,MonthCost,YearCost) "+sql;//????????????
Morrowsoft.Library.MrDBAccess.BeginTransaction();
Morrowsoft.Library.MrDBAccess.ExecuteNonQuery(sql);
Morrowsoft.Library.MrDBAccess.CommitTransaction();
this.Response.Write("?????");
}
}
}
catch(Exception ex)
{Morrowsoft.Library.MrDBAccess.RollbackTransaction();
this.Response.Write(ex.Message);
}????????

• ???? ????????????
• ????? ????9??????3???????
• ?? ???????????
• ???? ???????
• nike dunks ?????????????

（点击查看原文/来源链接）