로컬 시스템의 데이터를 Web SQL Server에 액세스 할 수 있습니까?

Question

회사 직원의 청구 내역을 유지 관리하는 Windows 양식 애플리케이션이 있습니다. 응용 프로그램은 MS Access 데이터베이스에 데이터를 저장하고 조작합니다. 직원이 웹 사이트에서 월별 보고서를 볼 수 있도록 SQL Server 웹 데이터베이스에 모든 데이터를 보내야합니다. 내 코드는 다음과 같습니다

Private Sub UploadData() 
    Dim conn as New OleDb.OleDbConnection("Connection String Ms Access DB") 
    Dim SCON = New SqlConnection(" Web SQL Sever Connection") 
     Try 
      SCON.Open() 
     Catch ex As Exception 
      MsgBox(ex.Message) 
      Exit Sub 
     End Try 
    Dim Qcmd As New SqlCommand("select query", SCON) 
    Dim Cmd As New OleDbCommand("select id,acc,newacc,city,name,billduedateamt,oldbalance from Records where city = 'Delhi'", conn) 
    Dim Mrdr As OleDbDataReader = Cmd.ExecuteReader 
     Try 
      While Mrdr.Read 
       Qcmd.CommandText = "Insert into billing (acc,newacc,city,name,billduedateamt,oldbalance) Values (" + _ 
         Mrdr.Item(0) + "," + Mrdr.Item(1) + ... Up to So On ")" 
       Qcmd.ExecuteNonQuery() 
      End While 
     Catch ex As Exception 
      MsgBox(ex.Message) 
     Finally 
      If SCON.State <> ConnectionState.Closed Then 
       SCON.Close() 
      End If 
      conn.Close() 
     End Try 

End Sub 

그것은 그렇게 할 더 나은 코드가 너무 느린가 있어요?

Answer 1

코드 보여주는 대량 복사의 일부 짧다.

private static void PerformBulkCopyDifferentSchema() 
{ 
    string connectionString = @"Server= 
     localhost;Database=Northwind;Trusted_Connection=true"; 
    DataTable sourceData = new DataTable(); 
    // get the source data 
    using (SqlConnection sourceConnection = 
        new SqlConnection(connectionString)) 
    { 
     SqlCommand myCommand = 
      new SqlCommand("SELECT TOP 5 * 
      FROM Products_Archive", sourceConnection); 
     sourceConnection.Open(); 
     SqlDataReader reader = myCommand.ExecuteReader(); 
     // open the destination data 
     using (SqlConnection destinationConnection = 
        new SqlConnection(connectionString)) 
     { 
      // open the connection 
      destinationConnection.Open(); 
      using (SqlBulkCopy bulkCopy = 
       new SqlBulkCopy(destinationConnection.ConnectionString)) 
      { 
       bulkCopy.ColumnMappings.Add("ProductID", "ProductID"); 
       bulkCopy.ColumnMappings.Add("ProductName", "Name"); 
       bulkCopy.ColumnMappings.Add("QuantityPerUnit", "Quantity"); 
       bulkCopy.DestinationTableName = "Products_TopSelling"; 
       bulkCopy.WriteToServer(reader); 
      } 
     } 
     reader.Close(); 
    } 
} 

Answer 2

데이터를 삽입하는 경우 .NET의 SqlBulkCopy 클래스를 통해 표시되는 SQL Server의 대량 복사 기능을 사용하십시오. 데이터 어댑터를 사용하여 DataTable에 Access의 데이터를 채운 다음 SqlBulkCopy을 사용하여 최대한 빨리 SQL Server에 lot을 삽입하십시오. 이 같은

Answer 3

시도 뭔가 : 여기

Private Sub UploadData() 
Dim conn as New OleDb.OleDbConnection("Connection String Ms Access DB") 
Dim SCON = New SqlConnection(" Web SQL Sever Connection") 
    Try 
     SCON.Open() 
    Catch ex As Exception 
     MsgBox(ex.Message) 
     Exit Sub 
    End Try 
Dim Qcmd As New SqlCommand("select query", SCON) 
Dim Cmd As New OleDbCommand("select id,acc,newacc,city,name,billduedateamt,oldbalance from Records where city = 'Delhi'", conn) 

Dim Mrdr As OleDbDataReader = Cmd.ExecuteReader 
    Try 
     Dim sqlInsert as String="Insert into billing (acc,newacc,city,name,billduedateamt,oldbalance) " 
     While Mrdr.Read 
      sqlInsert = sqlInsert + " Values (" + _ 
        Mrdr.Item(0) + "," + Mrdr.Item(1) + ... Up to So On ")" 

     End While 
     Qcmd.CommandText = sqlInsert 
      Qcmd.ExecuteNonQuery() 
    Catch ex As Exception 
     MsgBox(ex.Message) 
    Finally 
     If SCON.State <> ConnectionState.Closed Then 
      SCON.Close() 
     End If 
     conn.Close() 
    End Try 

End Sub