大橙子网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
这期内容当中小编将会给大家带来有关VB.NET中如何操作MySQL数据库,文章内容丰富且以专业的角度为大家分析和叙述,阅读完这篇文章希望大家可以有所收获。
成都创新互联-专业网站定制、快速模板网站建设、高性价比呼图壁网站开发、企业建站全套包干低至880元,成熟完善的模板库,直接使用。一站式呼图壁网站制作公司更省心,省钱,快速模板网站建设找我们,业务覆盖呼图壁地区。费用合理售后完善,十载实体公司更值得信赖。
VB.NET操作MySql数据库的一个例子
对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
对函数的调用
Dim MonDatasetTemp As
DataSet = MySQL_Requettes
.MyODBCDataset(SQL,
constantes.ODBCBase,
constantes.ODBCServer,
constantes.ODBCPwd,
constantes.ODBCUser,
"MonDataset")
上述就是小编为大家分享的VB.NET中如何操作MySql数据库了,如果刚好有类似的疑惑,不妨参照上述分析进行理解。如果想知道更多相关知识,欢迎关注创新互联行业资讯频道。