none
使用代码向access数据库里添加表格 RRS feed

  • 问题

  • 如何向access 数据库里添加表格呢?

    一定要用ado才行吗?

    可不可以使用OleDbConnection连接然后使用OleDbCommand进行添加呢?

    还有其数据库操作方法吗?

    2010年12月6日 9:26

答案

  • 你好

    其實是可以

    或者你可以參考以下的Code

     Dim objConn As New OleDbConnection

            Dim objComm As New OleDbCommand

            '設定這個SQL Connection 的SQL Connection string

            objConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=D:\MyInterest\db1.mdb;" 'ConStr是 SQL Connection的字串

     

            Try

                '設定這個SQL Command 的SQL 建立TABLE 的例子

                objComm.CommandText = "CREATE TABLE ABC (ID NUMBER, COLName TEXT)"

                '設定這個SQL Command的 Connection

                objComm.Connection = objConn

                '打開SQL Connection

                objConn.Open()

                '執行這個SQL 指令

                objComm.ExecuteNonQuery()

                '完成後出現一個Pop Up Message 出

                MsgBox("OK")

     

            Catch ex As Exception

                '當有錯誤發生時出現一個 Pop Up Message 說明錯誤

                MsgBox(ex.Message)

            Finally

     

                objComm = Nothing

                '關閉SQL Connection

                objConn.Close()

                objConn = Nothing

     

            End Try

    数据库操作方法

    可以參考以下URL

    http://msdn.microsoft.com/zh-cn/library/system.data.oledb.oledbcommand(v=VS.100).aspx

    Please correct me if my concept is wrong


    Chi
    2010年12月6日 13:29
    版主

全部回复

  • 你好

    其實是可以

    或者你可以參考以下的Code

     Dim objConn As New OleDbConnection

            Dim objComm As New OleDbCommand

            '設定這個SQL Connection 的SQL Connection string

            objConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=D:\MyInterest\db1.mdb;" 'ConStr是 SQL Connection的字串

     

            Try

                '設定這個SQL Command 的SQL 建立TABLE 的例子

                objComm.CommandText = "CREATE TABLE ABC (ID NUMBER, COLName TEXT)"

                '設定這個SQL Command的 Connection

                objComm.Connection = objConn

                '打開SQL Connection

                objConn.Open()

                '執行這個SQL 指令

                objComm.ExecuteNonQuery()

                '完成後出現一個Pop Up Message 出

                MsgBox("OK")

     

            Catch ex As Exception

                '當有錯誤發生時出現一個 Pop Up Message 說明錯誤

                MsgBox(ex.Message)

            Finally

     

                objComm = Nothing

                '關閉SQL Connection

                objConn.Close()

                objConn = Nothing

     

            End Try

    数据库操作方法

    可以參考以下URL

    http://msdn.microsoft.com/zh-cn/library/system.data.oledb.oledbcommand(v=VS.100).aspx

    Please correct me if my concept is wrong


    Chi
    2010年12月6日 13:29
    版主
  • 的确可以,但是遇到新的问题:

    我现在有个新生成的dataset,里面的数据表是从其它地方临时导入的,我想把这张临时导入的数据表存入已有的access数据库,该怎么设置commandtext呢?

    2010年12月7日 3:08