Ændring af kode Acc97/Acc2000

Ændrer lige point til 30
Linien rs.editmode, hed i Access 97
rs.edit - skal den overhovedet hedde rs.editmode i access 2000?

I havent used ADO so much but where are you moving with .move 0 ?

.movefirst is the first record
.MoveLast the last
.MoveNext the next

.move 1 is the same (I think) as .moveNext

.EditMode indicates the editing status of the current record, it doesnt let you edit the record.

use:
.(\"FieldName\").Value = \"Some Junk\"

.Update

or

.Update \"FieldName\", \"Some Junk\"

Hej Terry
Har prøvet dine forslag, men det hjælper ikke, det er lige præcis de to linier med ?? det kniber med? Gode forslag??

Private Sub OpdaterMaintenance_Click()
Dim rs As ADODB.Recordset
  Set rs = New ADODB.Recordset
  With rs
    Set .ActiveConnection = CurrentProject.Connection
    .Open \"Select * From TB_Company\"
    .MoveFirst
??    rs!lettertxt1 = Lettertxt1
??    .Update
  End With
rs.Close
End Sub

Point ændret til 60

Private Sub OpdaterMaintenance_Click()
Dim rs As ADODB.Recordset
  Set rs = New ADODB.Recordset
  With rs
    Set .ActiveConnection = CurrentProject.Connection
    .Open \"Select * From TB_Company\"
    .MoveFirst
    .(\"lettertxt1\") = Lettertxt1
    .Update
  End With
rs.Close
End Sub

You can also send the dB and I will take a look.
dkTeBrSa@europe.lego.com

Desværre, følgende giver syntaxerror:

.(\"lettertxt1\") = Lettertxt1

Is .(\"lettertxt1\") a field in your database? also, is the Lettertxt1 a field on a form. Try chaning it to me.Lettertxt1, but it shouldnt be necessary!

Nu OK til første linie, men anden linie giver en fejl, den ønskede handling understøttes ikke af oblektet:
Me.Lettertxt1 = Lettertxt1 \' OK
.Update                    \' Fejl

it looks as though the record set may not be updateable. You may be able to test this with

If rs.supports(adUpdate) Then msgbox \"Updateable\"

I will look at it if you can send me the dB!

Hej Terry
Den er ikke updateable. Koden er hentet fra en appl. i Access 97 og der er der en linei efter .movefirst der hedder edit. Den må være afløseren for den der mangler her?

Databasen er i øvrigt noget rod, fordi jeg er ved at hente en masse Access 97 moduler ind i Access 2000, derfor har jeg ikke sendt den (endnu), men har du et bud på Edit?

In ADO it isnt necessary to specify edit ADO knows that it is an existing record so you just need to alter the field and then .update.

I have a similar problem here, will get back when I have soleved it!

Mange tak

seems its necessary to give the lock mode!

.Open \"Select * From TB_Company\",,,adLockOptimistic
   

Jeg takker mange gange for hjælpen.

your welcome :o)