Atteindre une ligne d'une table pour AJOUT d'enregistrement

Question

Je cherche &#224; atteindre une ligne particuli&#232;re d'une table Access 2000 pour y ajouter des enregistrement mais je n'y arrive pas.

Private Sub AnyButton1_Click()
Dim rsDataTrunk As ADODB.Recordset


SQLstmt = "SELECT [N&#176;idtrunk], [idprojet], [NoProjet], [troncon], [qt&#233; fo], [longueur th&#233;orique], [6fo], [12fo], [d&#233;part], [fin], [cable], [compte1], [compte2], [morte] FROM [DataTrunk]Where [NoProjet]= '" & Text3.Text & "'"


'******************************************************************************
'Get the Records
Set rsDataTrunk = New ADODB.Recordset


rsDataTrunk.Open SQLstmt, connbd2, adOpenDynamic, adLockOptimistic, _
           adCmdText


Set DataGrid10.DataSource = rsDataTrunk


With rsDataTrunk
.AddNew
.Fields(3) = Text3
.Fields(12) = txtFields(37)



End With
For cnt = 1 To rsDataTrunk.RecordCount


    rsDataTrunk.Fields(3) = Text3.Text
    rsDataTrunk.Update
    rsDataTrunk.MoveNext
Next cnt
End Sub

olixelle · Answer

deja ce que tu veux faire n'a pas de sens, tu ajoutes pas une ligne "apres une autre", tu ajoutes une ligne "dans une table".
Apr&#232;s si tu veux que quand tu r&#233;cup tes donn&#233;es elle apparaisse &#224; une certaine position, a toi de mettre le order by&#232; correspondant.

Rollerman

econs · Answer

Exact : ta ligne s'ajoutera forc&#233;ment en fin de table. C'est la
requ&#234;te que tu vas faire sur la base qui d&#233;terminera dans quel ordre
tes donn&#233;es apparaitront.

Manu

Atteindre une ligne d'une table pour AJOUT d'enregistrement

2 réponses

Discussions similaires