Mysql 如何在vb.net中创建多个数据库

是否可以将多个数据库连接到一个程序

----------------------------
Using con As New Odbc.OdbcConnection
        con.ConnectionString =
                "Driver={Mysql odbc 3.51 Driver};Server=192.168.0.155;" &
                "DataBase=DB1;uid=root;pwd=gnsa;port=3306"
               con.Open()
        Using cmd As New Odbc.OdbcCommand
            cmd.Connection = con
            cmd.CommandText =
            "INSERT INTO [;DataBase=DB2;uid=root;pwd=gnsa;port=3306].[transfer_file] SELECT * FROM [DB1].[sta_trn_tfoliotran]"

            Dim rdr As Odbc.OdbcDataReader = cmd.ExecuteReader
            Do While rdr.Read
                Console.WriteLine(rdr("DB1_Text") & " | " & rdr("DB2_Text"))
            Loop
        End Using
        con.Close()
    End Using
----------------------------

---

我要在数据库1中获取数据，并想在数据库2中插入数据。

是的！这是可能的，我想你已经知道该怎么做了。我会给你一点建议。这样你的密码就不会乱了

Private Sub Button(sender As Object, e As EventArgs) Handles Button.Click
    'call the sub methods'
    retrieve_data() 
    insert_data()
End Sub

Private Sub retrieve_data()
    'Set your first database here'
    con.ConnectionString =
            "Driver={Mysql odbc 3.51 Driver};Server=192.168.0.155;" &
            "DataBase=DB1;uid=root;pwd=gnsa;port=3306"
    'Retrieve the data here'
End Sub

Private Sub insert_data()
    'Set the second database'
    con.ConnectionString =
            "Driver={Mysql odbc 3.51 Driver};Server=192.168.0.155;" &
            "DataBase=DB2;uid=root;pwd=gnsa;port=3306"
    'Insert your data here'
End Sub

---

当然有可能。您可以从数据库中检索数据而不插入任何数据吗？你当然可以。您可以在不检索任何数据的情况下将数据插入数据库。你当然可以。您可能已经知道如何做这两件事，所以您已经知道如何做您要做的事情。从CommandText中，您显然不知道SQL查询是如何工作的。