這期內(nèi)容當中小編將會給大家?guī)碛嘘PVB.NET中如何操作MySQL數(shù)據(jù)庫,文章內(nèi)容豐富且以專業(yè)的角度為大家分析和敘述,閱讀完這篇文章希望大家可以有所收獲。
成都創(chuàng)新互聯(lián)-專業(yè)網(wǎng)站定制、快速模板網(wǎng)站建設、高性價比呼圖壁網(wǎng)站開發(fā)、企業(yè)建站全套包干低至880元,成熟完善的模板庫,直接使用。一站式呼圖壁網(wǎng)站制作公司更省心,省錢,快速模板網(wǎng)站建設找我們,業(yè)務覆蓋呼圖壁地區(qū)。費用合理售后完善,十載實體公司更值得信賴。
VB.NET操作MySql數(shù)據(jù)庫的一個例子
對DataSet進行操作
Public Shared Function MyODBCDataset
(ByVal ReqSQL As String, _ByVal LaBase As String, ByVal
Server As String, _ByVal Password As String, ByVal
User As String, _ByVal NomDataSet As String) As DataSet
'' Connexion à un server MySQL
''avec le Driver ODBC 3.51 avec
requette qui renvoie un datasetDim MyConString As String = _
"DRIVER={MySQL ODBC 3.51 Driver};
SERVER=" & Server _& ";DATABASE=" & LaBase & ";
UID=" & User _& ";PASSWORD=" & Password & ";
OPTION=3;"Dim MyODBCConnexion As New
OdbcConnection(MyConString)Try
Dim ds As New DataSet()
Dim cmd As OdbcDataAdapter = New
OdbcDataAdapter(ReqSQL, MyConString)
Dim MyCommand As New OdbcCommand()
Dim MyDataReader As OdbcDataReader
cmd.Fill(ds, NomDataSet)
MyODBCConnexion.Close()
Return ds
Catch MyOdbcException As OdbcException
''
HttpContext.Current.Response.
Write(MyOdbcException.ToString)Catch MyException As Exception
''
HttpContext.Current.Response.
Write(MyException.ToString)End Try
End Function
對函數(shù)的調(diào)用
Dim MonDatasetTemp As
DataSet = MySQL_Requettes
.MyODBCDataset(SQL,
constantes.ODBCBase,
constantes.ODBCServer,
constantes.ODBCPwd,
constantes.ODBCUser,
"MonDataset")
上述就是小編為大家分享的VB.NET中如何操作MySql數(shù)據(jù)庫了,如果剛好有類似的疑惑,不妨參照上述分析進行理解。如果想知道更多相關知識,歡迎關注創(chuàng)新互聯(lián)行業(yè)資訊頻道。