winform(C#) 水晶报表制作方案

ylx1982 2007-08-01 05:51:10
数据库是 sql 2000 , 做的是一个MIS系统
使用dataset数据集
我的项目里要添加所有的报表吗?

有哪位达人做过请赐教,多谢
...全文
990 4 打赏 收藏 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
yyj135 2007-08-07
  • 打赏
  • 举报
回复
你可以把所有的报表放在一台或者若干台服务器上,然后把一个类型的报表放在一个目录,再将这个目录共享。当然这些客户端的用户需要有这个目录读取权限。
这个目录在系统里面是可以设置的。例如:
PUR \\192.168.254.19\Reports\Reports\PUR\
INV \\192.168.254.19\Reports\Reports\INV\
SAL \\192.168.254.19\Reports\Reports\SAL\
GL \\192.168.254.19\Reports\Reports\GL\
Delievry \\192.168.254.19\Reports\Reports\Delievry\
OutStore \\192.168.254.19\Reports\Reports\Store\
InStore \\192.168.254.19\Reports\Reports\Store\

写一个公共函数:
''' <summary>
''' 獲取報表路徑
''' </summary>
''' <param name="strMode">模組名稱</param>
''' <param name="strRPTName">報表名稱</param>
''' <returns></returns>
''' <remarks></remarks>
Public Function GetReportPath(ByVal strMode As String, ByVal strRPTName As String) As String
Try
Dim sql, reportPath As String
sql = "select Top 1 isnull(ListA,'')+'" + strRPTName + "' from dbo.BSC_OtherDefineB "
sql += "where ListCode='" + strMode + "' and ItemNo=(select Top 1 ID from dbo.BSC_OtherDefineA where ItemCode='ReportPath') "
reportPath = GetValue(sql)
Return reportPath
Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Exclamation, Msg.CompanyName)
End Try
End Function

现在你应该明白了吧?
  • 打赏
  • 举报
回复
正是因为要制作所以的报表,在VB时候看我同事为每个打印表格用水晶做报表搞的满头大汗,于是我就搞起了打印,所以只要传网格或数组就可以打印,方便
xwdd129 2007-08-02
  • 打赏
  • 举报
回复
一个MIS系统应该有很多报表要做吧, 你可以先分好类,再逐个设计每个报表,可以使用同一个dataset数据集
ylx1982 2007-08-01
  • 打赏
  • 举报
回复
或者给我一个Demo ,谢谢 ylx1982@126.com

4,818

社区成员

发帖
与我相关
我的任务
社区描述
.NET技术 图表区
社区管理员
  • 图表区社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧