| |
|---|---|
| (点击题目可以在互联网中搜索该题目的相关内容) 日期:2006-9-25 23:40:43 来源: 作者: 点击: | |
|
我正准备用ADO对象(就是ADOODBC)进行处理,现在我已经能删除ACCESS数据库中的数据了,正在做定时删除指定时间范围的程序,完成后会告诉你的 匿名回复: 我也有点进展了,我们多交流一下,谢谢,QQ:32421159 匿名回复: Dim cnn As ADODB.Connection Dim rs As ADODB.Recordset 匿名回复: 大狗兄弟,留个QQ好吗,这里说话不方便 匿名回复: Dim sql As String Dim ConnectionString As String Dim DateNow As Date DateNow = System.CurrentDate DateNow = DateAdd("d", -3, DateNow) Dim strDateNow As String strDateNow = DateNow Set cnn = New ADODB.Connection Set rs = New ADODB.Recordset cnn.CursorLocation = adUseClient cnn.ConnectionString = "dsn=WWW;uid=;pwd=;database=WWW" cnn.Open 匿名回复: rs.CursorType = adOpenKeyset rs.LockType = adLockOptimistic rs.Open sql, cnn, adOpenDynamic Fix32.THISNODE.WZY_ADOAI = rs.RecordCount cnn.Close 匿名回复: 自己的问题自己解决!没什么人能主动关心一只狗的!! 先在IFIX的VB编辑器下工具->引用下添加对MICROSOFT ACTIVEX DATA OBJIECTS 2。7和crystal report9 activex designer及crystal report VIEWER CONTROL的引用,然后看我发给你的程序,其中兰色和粉色是有用的,粉色是重点,别忘了在IFIX画面编辑器下添加crystal report VIEWER CONTROL对象,也就是程序中的CRViewer1对象,添加方法是在工具箱中选择“插入OLE对象”,选择crystal report VIEWER CONTROL,一切OK!有关报表设计等问题可利用水晶报表编辑器搞定,查询方式就看你怎么整了,基本是想怎么整就怎么整,就这么简单! | |
| 上一篇: IFIX显示的是保存在水晶报表里的数据,如何刷新!! 下一篇: ifix:如何禁止excel报表被修改 |