Problems with version of Ms Access

You will often find problems with different versions of access, one of the issues is scripting language. It seems to change from danish to english every other version.

The reason your database freezes coulbd be problems with the danish æ,ø and å. and one solution might be to remove these form the base. I think this could be done with a script.

Hi bufferzone!
Your suggestion can not be the case. I have the swedish wersions of Access 2000 and 2003 and the swedish version of XP professional. Why does the first 10049 records go well? Another od thing is that if I first run, let's say 8000 records and then starts a new session of converting, it stops after 2050. I know that if I open a table and want so seek and replace, I can only do this with 9000 records at the time. I can change the MaxLocksPerFile value in the register to a higher value and then I can seek and replace the amount of records up to the new value.
Does my problem have to do with something simular?

can we see the code which you are using to convert?

This is the code I'm using:
Private Sub Convert_Click()
    On Error GoTo Err_Konvert
   
TopNyResapost:
        If (Forms!ResapostUnderforms!Nr > 0) Then
        GoTo TopResapost
        Else
        MsgBox "Konverteringen är klar"
        DoCmd.Close acForm, "Resapost"
        Exit Sub
        End If
TopResapost:
            Forms.Resapost.StartDat = Left(Forms.Resapost.DatStart, 4) & "-" & Mid(Forms.Resapost.DatStart, 5, 2) & "-" & Mid(Forms.Resapost.DatStart, 7, 2)
            Forms.Resapost.StartKl = Left(Forms.Resapost.TidStart, 2) & ":" & Mid(Forms.Resapost.TidStart, 3, 2)
            Forms.Resapost.SlutDat = Left(Forms.Resapost.DatSlut, 4) & "-" & Mid(Forms.Resapost.DatSlut, 5, 2) & "-" & Mid(Forms.Resapost.DatSlut, 7, 2)
            Forms.Resapost.SlutKl = Left(Forms.Resapost.TidSlut, 2) & ":" & Mid(Forms.Resapost.TidSlut, 3, 2)
            Forms.Resapost.Konv = 1

            DoCmd.Close acForm, "ResapostUnderforms"
            DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
            DoCmd.OpenForm "ResapostUnderforms", acNormal, , , acEdit, acHidden
        If (Forms.ResapostUnderforms.Nr > 0) Then
        DoCmd.GoToRecord acForm, "Resapost", acNext
        End If
       
        GoTo TopNyResapost
 
Exit_Konvert:
    Exit Sub
   
Err_Konvert:
            MsgBox Err.Description
        Resume Exit_Konvert

End Sub

I think you have a much better chance of updating the records in an update query. This would allow you to update all records in one go.

Just create a new query adding the table you want to update. Then choose Update query from the Query menu. Add the fields you want to update, and then in th eUpdate To field add the value you want to update to. For example


Left([DatStart],4) & "-" & Mid([DatStart],5,2) & "-" & Mid([DatStart],7,2)

and you may need to replace , with ;

thanks, hope it helped.

og god weekend

Yes, I have changed to an update question. Thanks for the idea.