Truncate table xxx
bulk insert xxx from 'xxx'
update xxx set Y=0 where Y=1

            SDQ.ExecuteNonQuery()

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As _
  System.EventArgs) Handles Timer1.Tick
        Application.DoEvents()
End Sub
 
Public Sub Execute(ByVal Query As String, Optional ByVal Timeout As Integer = _
  60, Optional ByVal ConnectionString As String = "")
 
   Timer1.Enabled = True
   Try
      Dim sdc As SqlConnection
      If ConnectionString = "" Then
         sdc = New SqlConnection("Mein connection string zum SQL 2010 Server")
      Else
         sdc = New SqlConnection(ConnectionString)
      End If
      sdc.Open()
 
      Dim SDQ = New SqlCommand(Query, sdc)
      SDQ.CommandTimeout = Timeout
      SDQ.ExecuteNonQuery()
 
      sdc.Close()
   Catch ex As Exception
      Write2Log ex.Message, SQL        
   End Try
   Timer1.Enabled = false
End Sub

Joachim