devo scrivere nel campo "ordinamento" di tutti i record
un numero che aumenta di uno record per record
e parte da uno...


Ho inserito questo codice
ma mi da errorre sql in sintassi mancanze


codice:
  
Dim x, n As Integer
        n = 0
        For x = 1 To 10000 Step 1
            n = n + 1
            Dim myconna As OleDbConnection
            Dim cmda As OleDbCommand
            Dim dra As OleDbDataReader
            ' Apro la connessione
            Dim stra As String = AccessDataSource1.ConnectionString
            myconna = New OleDbConnection(stra)
            myconna.Open()
            ' Lancio una query nell'oggetto commando di OleDB

            cmda = New OleDbCommand("update links set ordinamento = '" & n & "' order by ordinamento ", myconna)



            ' Eseguo la query in un datareader
            dra = cmda.ExecuteReader()
            ' Mostro i dati a video

            dra.Close()
            myconna.Close()
        Next x