http://www.wzjcw.net/vbgood/taishan/index.html有代码可以参考
解决方案 »
- VB6.0使用正则表达式的问题
- vb 生成安装文件如何在进行安装时选择软件的语言?我用的是wise installation9
- 如何用VB 来更改某个站点的主机头(域名)?
- 诚恳邀请,用。NET框架为程序开发工具的学习伙伴与我共同完成“理解。net体系的全过程”
- 如何固定DataReport报表的打印
- 急!在线(MSFlexGrid)
- 托盘区图标右键单击时出现的菜单命令为什么不能加上快捷字母?
- 查询统计与表格显示
- 向斑竹提问:急!!!!!关于vb调用autocad画图。在VB里通过部件autocad drawing来结合autocad开发,请问怎样才能把所画的autocad图向保存图片一样保存到数据库里(保存图片的功能已经可以实现)
- 哪有VB的EBook可下载?
- 请问在程序vb中追加一个字段,进来有份(分)?
- 谁知道那里有关于 水晶报表的 帮助文档。很急。它是怎么动态和数据库连接的。好象没有打印设置。
Private Sub cmdnewsearch_Click()
If DataEnvironment1.rsCommandnew.State <> adStateClosed Then
DataEnvironment1.rsCommandnew.Close
End If
DataEnvironment1.Commands.Item(2).CommandText = "Select * from dbo.select_new where fixdate between" & "'" & DTPnewmeter1.Value & "'" & "and" & "'" & DTPnewmeter2.Value & "'"With DataGridnew
Set .DataSource = DataEnvironment1
.DataMember = "commandnew"end sub
可是报表显示的还是以前的数据