Dim Myconnection As OleDbConnection
Dim ada As OleDbDataAdapter
Dim ds As DataSet Myconnection = New OleDbConnection("PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA Source=" & AppDomain.CurrentDomain.BaseDirectory & "alarmsys.mdb")
Myconnection.Open()
ada = New OleDbDataAdapter
ds = New DataSet
ada.SelectCommand = New OleDbCommand
ada.SelectCommand.Connection = Myconnection
ada.SelectCommand.CommandText = "SELECT ALARM.DATE FROM ALARM,town where ALARM.NOX = town.NOX AND ALARM.ZONE = town.ZONE"
ada.SelectCommand.CommandType = CommandType.Text
ada.Fill(ds, "alarm")
dgBJXX.DataSource = ds
dgBJXX.DataBind()
Dim ada As OleDbDataAdapter
Dim ds As DataSet Myconnection = New OleDbConnection("PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA Source=" & AppDomain.CurrentDomain.BaseDirectory & "alarmsys.mdb")
Myconnection.Open()
ada = New OleDbDataAdapter
ds = New DataSet
ada.SelectCommand = New OleDbCommand
ada.SelectCommand.Connection = Myconnection
ada.SelectCommand.CommandText = "SELECT ALARM.DATE FROM ALARM,town where ALARM.NOX = town.NOX AND ALARM.ZONE = town.ZONE"
ada.SelectCommand.CommandType = CommandType.Text
ada.Fill(ds, "alarm")
dgBJXX.DataSource = ds
dgBJXX.DataBind()
解决方案 »
- 关于存在验证控件情况下的页面跳转
- 再次开帖,求解
- .NET版权问题
- 如何 用企业管理器连接远程的数据库
- asp.net ViewState 超時
- 关于[MethodImplAttribute(MethodImplOptions.Synchronized)]的问题??????????
- 哪里能下载到web方式做报表的代码,学习用?
- 一个菜鸟问题,100送上
- ASP.NET页面设计!图片显示问题!
- .NET点击button 弹出一个自定义的div,并且要传入几个值到div的txtCode中,但是点击button之后页面加载div就消失不见了
- 在sql语句中如何用正则表达式?请给几个例子 谢谢!
- 做个招聘系统的CSDN朋友进来一下
"SELECT ALARM.DATE FROM ALARM,town where ALARM.NOX = town.NOX AND ALARM.ZONE = town.ZONE"改为
"SELECT ALARM.DATE AS ALARM FROM ALARM,town where ALARM.NOX = town.NOX AND ALARM.ZONE = town.ZONE"