繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP.NET > 水晶报表4.6的使用示例
- ASP.NET
- Script：WINDOWS Script 枚举运行中进程
- 使用Flex结合Webservice完成域名查询
- VSTS Team System 总算装好了。
- 用于部署数据库的 数据库初始化工具 xzSQLDeploy Tools V1.0 （for SQLServer） f...
- 一个将阿拉伯数字转换成中文大写的最简单算法
- SCRIPT：使用Windows Script 关闭和打开指定程序
- Script：使用WINDOWS脚本访问WEB SERVICES
- asp.net连接Access数据库
- VB中IIS Application发布可能出现的问题
- VB打包后的安装问题
- Nhibernate的数据分页技术（续）
- 使用API函数复制文件，可显示进度。
- VB打包技巧
- VB.NET实现DirectSound9 (9) 实现示波器
- VB.NET 实现DirectSound9 (10) 均衡器
- [水晶报表部署系列之一]轻松搞定水晶报表9.2打包
- DataGrid 中双向排序的一种办法
- 利用System.EventHandler来实现两个窗体间的事件调用
- 多线程应用程序中调用窗体的一点心得
- Smart Client之旅一：用B/S方式运行Exe应用程序
ASP.NET 中的 水晶报表4.6的使用示例
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 82 ::
收藏到网摘: n/a
Private Sub Command1_Click(Index As Integer)
With cr1 'cr1为报表控件
.PrinterDriver = Printer.DeviceName
.DiscardSavedData = True
'-------------------------------------------------
'连接方式一
.Connect = "DSN = drugdb;UID =sa;PWD =;"
'连接方式二
.Connect = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=evaluate;Data Source=SAMUNCLE"]
'连接方式三
Dim adocon As ADODB.Connection
Set adocon = New ADODB.Connection
adocon.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=drugdb;Data Source=SAMUNCLE"
adocon.ConnectionTimeout = 120
adocon.Open
'-------------------------------------------------
.Destination = crptToWindow '预览
.ReportSource = crptReport
.WindowHeight = Screen.Height
.WindowWidth = Screen.Width
.ReportFileName = App.Path + "\crystaltest47.rpt"
.WindowTitle = "标题"
.WindowState = crptMaximized '窗口最大化
.WindowLeft = 0
.WindowTop = 0
.Formulas(0) = ""
.Formulas(1) = ""
.Formulas(0) = "这是第一个参数！"
.Formulas(1) = "这是第二个参数！" & Chr(13) & Chr(10) & "我回行了"
.FetchSelectionFormula
.Action = 1
End With
评论 (0) All
