edit funktion i VBA

Check dine referencer

ja men hvilke skal jeg bruge ??? der er jo en krig at vælge imellem ??

Hvad er det præcis for en kommando, du ikke kan få til at virke?

rs.edit

Hvis du bruger Access 2000 eller XP, og derved bruge ADO i stedet for DAO, så er edit ikke nødvendigt. Recordsettet er altid i edit-mode.
.update er heller ikke nødvendigt, men anbefales alligevel.

.Findfirst findes heller ikke (hvis du skulle finde på at bruge den). Den er udskiftet med .Find i stedet.

Jeg kan både acces 97 og 2K.

Det går også galt når jeg bruger 2K. her er scriptet :

Public Function Opdater_txt()
    Dim tmp As String
    Dim db As Database
    Dim rs As Recordset
    Dim vagr_heading As String
    Dim varegruppe As String
   
    Set db = CurrentDb
    Set rs = db.OpenRecordset("master", dbOpenDynaset)
     
    tmp = ""
 
  While Not rs.EOF
  If tmp <> rs!varegruppe Then
  rs.Edit
  rs!vagr_heading = rs!varegruppe
  rs.Update
  tmp = rs!varegruppe
  End If
  rs.MoveNext
  Wend
  rs.Close
  Set rs = Nothing
End Function

prøv at skrive   
dim rs as ADO.Recordset istedet

Så vil den i hvert fald ikke virke....
HVis du skal skrive noget, så skal det være
Dim rs As DAO.Recordset

når ja sorry det var også det jeg mente :-)

I know :o)

juks triggede løsningen...

og løsningen var...:-) hvis nu andre løb ind i samme problem

det du skrev... ;-)

Dim rs As DAO.Recordset

hmm, det var nu ikke juks, som skrev det. Juks skrev ADO.Recordset, som er det modsatte, men også var forkert syntaks, da den så skulle have heddet ADODB.Recordset.

Men pyt med det :o)