数据加载后保存数据到另外数据表中急急急急急急急急急急急急急急

Question

datagrid容器 数据加载后保存到另一个数据库表

sqlite数据库中加载一组数据到datagrid中。
现在把数据保存到sql server 数据库中。

Answer 1

Dim Con As New ADODB.Connection '定义ADO对象
Dim rs As New ADODB.Recordset

  Con.ConnectionString = "driver=SQL Server;server=192.168.1.127,1433;uid=sa;pwd=123456;database=ytodb"
    Con.Open





   DBName = App.Path & "\yto.db"

Set Cnn = New_c.Connection

Cnn.OpenDB DBName