大家好!今天让小编来大家介绍下关于dodb需要引用什么控件问题,以下是小编对此问题的归纳整理,让我们一起来看看吧。

文章目录列表:

dodb需要引用什么控件 第1张

本文目录adodb需要引用什么控件adodb需要引用什么控件ADODB访问数据库的一种方式,引用ADODB就可以用它访问数据库如一段访问SQL数据库的方式:Dim ConnString As String = "Provider=SQLOLEDB;Data Source=" & DataSource & ";Persist Security Info=True;Password=" & Password & ";User ID=" & UserID & ";Initial Catalog=" & InitialCatalog        Conn.Open(ConnString)        ’连接数据库        Dim FindU = "select * from Mo_DrawXY where GateCount like ’" & CStr(Form3.LstVew_Nozle.Items.Count) & "%’ and addTime 》 ’" & CStr(DateTimePicker.Value) & "’"  ’SQL语句        Rs.Open(FindU, Conn.ConnectionString, 2, 3)        ’连接数据表        ’Mo_DrawXY        If Rs.EOF = False Then            Rs.MoveFirst()            Do While Rs.EOF = False  ’修改记录                Dim EqtTF As Boolean = False  ’默认不是相等的                Dim sqlxObj As Object = (Rs.Fields("Mo_GateX").Value)                Rs.MoveNext()            Loop        End If        Rs.Close()        Conn.Close()。

本文目录

adodb需要引用什么控件

ADODB访问数据库的一种方式,引用ADODB就可以用它访问数据库

如一段访问SQL数据库的方式:

Dim ConnString As String = "Provider=SQLOLEDB;Data Source=" & DataSource & ";Persist Security Info=True;Password=" & Password & ";User ID=" & UserID & ";Initial Catalog=" & InitialCatalog        Conn.Open(ConnString)        ’连接数据库        Dim FindU = "select * from Mo_DrawXY where GateCount like ’" & CStr(Form3.LstVew_Nozle.Items.Count) & "%’ and addTime 》 ’" & CStr(DateTimePicker.Value) & "’"  ’SQL语句        Rs.Open(FindU, Conn.ConnectionString, 2, 3)        ’连接数据表        ’Mo_DrawXY        If Rs.EOF = False Then            Rs.MoveFirst()            Do While Rs.EOF = False  ’修改记录                Dim EqtTF As Boolean = False  ’默认不是相等的                Dim sqlxObj As Object = (Rs.Fields("Mo_GateX").Value)                Rs.MoveNext()            Loop        End If        Rs.Close()        Conn.Close()

以上就是小编对于dodb需要引用什么控件问题和相关问题的解答了,dodb需要引用什么控件的问题希望对你有用!

收藏(0)