网站建设资讯

NEWS

网站建设资讯

VB.NET中如何操作MySql数据库

这期内容当中小编将会给大家带来有关VB.NET中如何操作MySQL数据库,文章内容丰富且以专业的角度为大家分析和叙述,阅读完这篇文章希望大家可以有所收获。

成都创新互联-专业网站定制、快速模板网站建设、高性价比呼图壁网站开发、企业建站全套包干低至880元,成熟完善的模板库,直接使用。一站式呼图壁网站制作公司更省心,省钱,快速模板网站建设找我们,业务覆盖呼图壁地区。费用合理售后完善,十载实体公司更值得信赖。

VB.NET操作MySql数据库的一个例子

对DataSet进行操作

  1. Public Shared Function MyODBCDataset
    (ByVal ReqSQL As String, _  

  2. ByVal LaBase As String, ByVal 
    Server As String, _  

  3. ByVal Password As String, ByVal 
    User As String, _  

  4. ByVal NomDataSet As String) As DataSet  

  5. '' Connexion à un server MySQL   

  6. ''avec le Driver ODBC 3.51 avec 
    requette qui renvoie un dataset  

  7. Dim MyConString As String = _ 

  8. "DRIVER={MySQL ODBC 3.51 Driver};
    SERVER=" & Server _  

  9. & ";DATABASE=" & LaBase & ";
    UID=" & User _  

  10. & ";PASSWORD=" & Password & ";
    OPTION=3;"  

  11. Dim MyODBCConnexion As New 
    OdbcConnection(MyConString)  

  12. Try  

  13. Dim ds As New DataSet()  

  14. Dim cmd As OdbcDataAdapter = New   

  15. OdbcDataAdapter(ReqSQL, MyConString)  

  16. Dim MyCommand As New OdbcCommand()  

  17. Dim MyDataReader As OdbcDataReader  

  18. cmd.Fill(ds, NomDataSet)  

  19. MyODBCConnexion.Close()  

  20. Return ds  

  21. Catch MyOdbcException As OdbcException  

  22. ''   

  23. HttpContext.Current.Response.
    Write(MyOdbcException.ToString)  

  24. Catch MyException As Exception  

  25. ''   

  26. HttpContext.Current.Response.
    Write(MyException.ToString)  

  27. End Try  

  28. End Function  

对函数的调用

  1. Dim MonDatasetTemp As 
    DataSet = MySQL_Requettes
    .MyODBCDataset(  

  2. SQL,  

  3. constantes.ODBCBase,   

  4. constantes.ODBCServer,   

  5. constantes.ODBCPwd,   

  6. constantes.ODBCUser,   

  7. "MonDataset") 

上述就是小编为大家分享的VB.NET中如何操作MySql数据库了,如果刚好有类似的疑惑,不妨参照上述分析进行理解。如果想知道更多相关知识,欢迎关注创新互联行业资讯频道。


分享题目:VB.NET中如何操作MySql数据库
文章链接:http://cdweb.net/article/ppeood.html