水晶报表4.6的使用示例

2016-01-29 13:04 28 1 收藏

水晶报表4.6的使用示例,水晶报表4.6的使用示例

【 tulaoshi.com - ASP.NET 】

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

来源:https://www.tulaoshi.com/n/20160129/1488788.html

上一篇：由DataGrid翻页所导致的诸多问题的解决方案
下一篇： Flash MX pro的历史面板(2)

看过《水晶报表4.6的使用示例》的人还看了以下文章更多>>

iOS开发中UITabBarController的使用示例

标签：编程语言网络编程

首先我们看一下它的view层级图：代码如下： - (BOOL)application:(UIApplication *)application didFinishLaunchingWithOptions:(NSDictionary *)launchOptions { self.window = [[UIWindow alloc] initWithFrame:[[UIScreen mainScreen] bounds]]; // Override point for cus...

html5 offlline 缓存使用示例

标签： Web开发

如果想使用该api，必须保证服务器端配置相应的mime类型。拿tomcat为例，在打开Tomcat 6.0\conf\web.xml文件，在文件的最后面添加如下内容代码如下： mime-mapping extensionmanifest/extension mime-typetext/cache-manifest/mime-type /mime-mapping 尤其注意，extension的value是manifest，所以以后配置缓存文件的后缀必须跟他一...

关于try 和 throw 简单使用示例

标签：编程语言网络编程

代码如下： //每过一段时间，就总是会对try有点生疏，特别写了个程序来测试以下。加深印象。 // 退出一段代码(即某个Method，或者某个块)，有三种方法： throw，return，以及正常执行完。 // 有时候 throw是底层抛出来的，你不处理，默认就throw了。 // TestTry.java /** * 输出结果为： java.lang.Exception: test3() 抛出的异常 at ...

js基础:window.resizeBy()方法使用示例

标签： Web开发

(一).示例图片效果 (二).代码 html head titlewindow.resizeBy()函数/title script laguage="javascript" !-- function resizewin(dir,dist) { var winvert; var winhorz; if (dir == "vert"){ winhorz=0; winvert=dist; } else{ winvert=0; winhorz=dist; } window.resizeBy(winhorz,winvert); } //-- /script /head body bg...

js基础:windows.ResizeTo()方法使用示例

标签： Web开发

(二).代码 html head titlewindow.resizeTo()函数/title script laguage="javascript" !-- function resizewindow(form) { var x=form.X.value; var y=form.Y.value; window.resizeTo(x,y); } //-- /script /head body bgcolor="#6699ff" text="#000000" form name=form1 table border=0 align=center width="575" tr td colspan=3 align=...

查看更多精彩>>