删除回复 2007-8-2 9:17:30 删除一条得分回复,扣除结贴人信誉分2分,贴子ID:5506792;回复内容:1、VB.NET示例 '创建ATGridServer WEB服务器端组件对象 Dim ATGrid1 As New ATGridServer
'打开报表模板文件,其中testDBF.et是有WinTable报表设计器制作完成 If Not ATGrid1.OpenDocEx( "ETFiles/testDBF.et ") Then Response.Write( "不能装载报表模板 ") Response.End() End If
'通过行列获得单元格对象 Dim ppCell As New Cell ppCell = ATGrid1.GetCell(3, 2) If Not (ppCell Is Nothing) Then Response.Write( "单元格的别名: " & ppCell.Name) Response.Write( "单元格的别名: " & ppCell.AliasName) Response.Write( "单元格所在的别名集合的名字: " & ppCell.AliasSetName) Response.Write( "单元格所在的ETSet数据集名字: " & ppCell.ETSetName) Response.Write( "单元格所在的ETSet数据集字段的名字: " & ppCell.FieldName) End If
'输出为html页面 ATGrid1.ResponseHtml(false)
'释放ATGridServer WEB服务器端组件对象 ATGrid1.Close()
2、ASP示例 '创建ATGridServer WEB服务器端组件对象 Set ATGrid1 = new ATGridServer
'打开报表模板文件,其中testDBF.et是有WinTable报表设计器制作完成 If Not ATGrid1.OpenDocEx( "ETFiles/testDBF.et ") Then Response.Write "不能装载报表模板 " Response.End End If
'通过行列获得单元格对象 Set ppCell = New Cell ppCell = ATGrid1.GetCell(3, 2) If Not (ppCell Is Nothing) Then Response.Write "单元格的别名: " & ppCell.Name Response.Write "单元格的别名: " & ppCell.AliasName Response.Write "单元格所在的别名集合的名字: " & ppCell.AliasSetName Response.Write "单元格所在的ETSet数据集名字: " & ppCell.ETSetName Response.Write "单元格所在的ETSet数据集字段的名字: " & ppCell.FieldName End If
'输出为html页面 ATGrid1.ResponseHtml False
'释放ATGridServer WEB服务器端组件对象 ATGrid1.Close Set ATGrid1=Nothing
3、C#.NET示例 //创建ATGridServer WEB服务器端组件对象 ATGridServer ATGrid1 = new ATGridServer();
删除一条得分回复,扣除结贴人信誉分2分,贴子ID:5506792;回复内容:1、VB.NET示例
'创建ATGridServer WEB服务器端组件对象
Dim ATGrid1 As New ATGridServer
'打开报表模板文件,其中testDBF.et是有WinTable报表设计器制作完成
If Not ATGrid1.OpenDocEx( "ETFiles/testDBF.et ") Then
Response.Write( "不能装载报表模板 ")
Response.End()
End If
'通过行列获得单元格对象
Dim ppCell As New Cell
ppCell = ATGrid1.GetCell(3, 2)
If Not (ppCell Is Nothing) Then
Response.Write( "单元格的别名: " & ppCell.Name)
Response.Write( "单元格的别名: " & ppCell.AliasName)
Response.Write( "单元格所在的别名集合的名字: " & ppCell.AliasSetName)
Response.Write( "单元格所在的ETSet数据集名字: " & ppCell.ETSetName)
Response.Write( "单元格所在的ETSet数据集字段的名字: " & ppCell.FieldName)
End If
'输出为html页面
ATGrid1.ResponseHtml(false)
'释放ATGridServer WEB服务器端组件对象
ATGrid1.Close()
2、ASP示例
'创建ATGridServer WEB服务器端组件对象
Set ATGrid1 = new ATGridServer
'打开报表模板文件,其中testDBF.et是有WinTable报表设计器制作完成
If Not ATGrid1.OpenDocEx( "ETFiles/testDBF.et ") Then
Response.Write "不能装载报表模板 "
Response.End
End If
'通过行列获得单元格对象
Set ppCell = New Cell
ppCell = ATGrid1.GetCell(3, 2)
If Not (ppCell Is Nothing) Then
Response.Write "单元格的别名: " & ppCell.Name
Response.Write "单元格的别名: " & ppCell.AliasName
Response.Write "单元格所在的别名集合的名字: " & ppCell.AliasSetName
Response.Write "单元格所在的ETSet数据集名字: " & ppCell.ETSetName
Response.Write "单元格所在的ETSet数据集字段的名字: " & ppCell.FieldName
End If
'输出为html页面
ATGrid1.ResponseHtml False
'释放ATGridServer WEB服务器端组件对象
ATGrid1.Close
Set ATGrid1=Nothing
3、C#.NET示例
//创建ATGridServer WEB服务器端组件对象
ATGridServer ATGrid1 = new ATGridServer();
//打开报表模板文件,其中testDBF.et是有WinTable报表设计器制作完成
if(!ATGrid1.OpenDocEx( "ETFiles/testDBF.et "))
{
Response.Write( "不能装载报表模板 ");
Response.End();
}
//通过行列获得单元格对象
Cell ppCell = new Cell();
ppCell = ATGrid1.GetCell(3, 2);
if(ppCell != null)
{
Response.Write( "单元格的别名: " + ppCell.Name);
Response.Write( "单元格的别名: " + ppCell.AliasName);
Response.Write( "单元格所在的别名集合的名字: " + ppCell.AliasSetName);
Response.Write( "单元格所在的ETSet数据集名字: " + ppCell.ETSetName);
Response.Write( "单元格所在的ETSet数据集字段的名字: " + ppCell.FieldName);
}
//输出为html页面
ATGrid1.ResponseHtml(false);
//释放ATGridServer WEB服务器端组件对象
ATGrid1.Close();
ATGrid1=null;
4、JSP示例 (特别注意:jsp中属性名和其他语言属性名称不同,需用“Get+属性名”方法取得)
//创建ATGridServer WEB服务器端组件对象
ATGridServer ATGrid1 = new ATGridServer(pageContext);
//打开报表模板文件,其中testDBF.et是有WinTable报表设计器制作完成
if(!ATGrid1.OpenDocEx( "ETFiles/testDBF.et "))
{
out.print( "不能装载报表模板 ");
out.close();
}
//通过行列获得单元格对象
Cell ppCell = new Cell();
ppCell = ATGrid1.GetCell(3, 2);
==================================================================
就是啊,扣的莫名其妙啊
删除得分回复,扣结贴人的信誉分,CSDN这一条太不合理了,
但不知道为什么这个不合理规则一直存在~
删除得分回复,扣结贴人的信誉分,CSDN这一条太不合理了,
但不知道为什么这个不合理规则一直存在~
=============================================================
是啊,如果说我乱给分........
但是,我那贴子发了很久都没有人能解答啊,我怕太久不结帖的话被扣信誉分,所以我把贴子结了,给了每个回复人一点分,结果还竟然被扣信誉分了,晕啊~!viena() 维也纳(windows7) ,你要替我主持公道啊,,,55555~~