当前位置: 首页 > 图文教程 > 网络编程 > ASP.NET > 水晶报表4.6的使用示例

ASP.NET
asp.net GridView控件中模板列CheckBox全选、反选、取消
asp.net GridView 删除时弹出确认对话框(包括内容提示)
asp.net DropDownList 三级联动下拉菜单实现代码
asp DataTable添加列和行的三种方法
Asp.net 页面调用javascript变量的值
asp.net 长文章通过设定的行数分页
asp.net 定时间点执行任务的简易解决办法
asp.net 页面延时五秒,跳转到另外的页面
asp.net 动态输出透明gif图片
asp.net DataList与Repeater用法区别
asp.net Javascript获取CheckBoxList的value
asp.net程序在调式和发布之间图片路径问题的解决方法
asp.net下生成英文字符数字验证码的代码
asp.net 页面版文本框智能提示JSCode (升级版)
ASP.NET URL伪静态重写实现方法
ASP.NET 2.0 中Forms安全认证
asp.net 动态添加多个用户控件
asp.net Repeater显示父子表数据,无闪烁
asp.net 无法获取的内部内容,因为该内容不是文本 的解决方法
asp.net GridView排序简单实现

ASP.NET 中的 水晶报表4.6的使用示例


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 218 ::
收藏到网摘: 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