Jag har vet hur man lägger till nya rader i en Access-databas, se nedan, men hur gör man om man vill uppdatera eller ta bort en rad i databasen? För editering gäller rs.Edit och sedan rs.Update Tack för tipset, men jag behöver nog lite hjälp med att ställa mig på rätt rad. Jag har inte provat att bläddra framåt å bakåt i databasen ännu. Har du något exempel som jag kan titta på så kanske jag förstår lättare.Hjälp med DAO och Access
Dim wk As Workspace
Dim DB As Database
Dim rs As Recordset
Dim strSQL As String
On Local Error GoTo ErrHandler
If cmbFartygsnamn.Text <> "" Then
Set wk = Workspaces(0)
Set DB = wk.OpenDatabase("\\ISP\Download\Test.mdb", False, False)
strSQL = "SELECT DateTime, Boat, Number FROM Tabell_1"
Set rs = DB.OpenRecordset(strSQL, dbOpenDynaset)
rs.AddNew
rs!DateTime = Date
rs!Boat = cmbFartygsnamn.Text
rs!Number = "123"
rs.Update
rs.Close
cmbFartygsnamn.Text = ""
UpdateHist
End If
Set wk = Nothing
Set DB = Nothing
Set rs = NothingSv: Hjälp med DAO och Access
För radering är det rs.Delete, rs.Update
Tänk på att för både editering och radering så måste du ställt dig på den post som du skall radera eller uppdatera för annars blir det tokigt. För att ställa sig på en specifik rad har du säkert redan fixat genom att kunna bläddra dig framåt å bakåt.
/PelleSv: Hjälp med DAO och Access
I vanliga fall så brukar jag använda ADO men detta projektet är lite speciellt. Är det SQL-frågan jag måste formulera om för att hitta rätt rad att radera eller uppdatera?