[ASP] Meerdere records tegelijk invoegen

[Verwijderd]

Ik heb te maken met een dbf-database (dBASE) en een Access-database. Door middel van een ASP-script probeer ik de dbf-database in de Access-database in te voegen. Nu lukt het invoegen van de eerste record inmiddels. Op één of andere manier werkt mijn loop echter niet, zodat ik de volgende foutmelding krijg:

------
Microsoft OLE DB Provider for ODBC Drivers error '80040e2f'

[Microsoft][ODBC Microsoft Access Driver] The changes you requested to the table were not successful because they would create duplicate values in the index, primary key, or relationship. Change the data in the field or fields that contain duplicate data, remove the index, or redefine the index to permit duplicate entries and try again.
------

Hieronder volgt mijn code:

<%

Dim adoCon
Dim adoCon2
Dim rs
Dim rs2

Set adoCon = Server.CreateObject("ADODB.Connection")
Set adoCon2 = Server.CreateObject("ADODB.Connection")

adoCon.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../fpdb/algemeen.mdb")
adoCon2.Open "DRIVER={Microsoft dBASE Driver (*.dbf)}; DriverID=277; DBQ=" & Server.MapPath("../fpdb/algemeen")

Set rs = Server.CreateObject("ADODB.Recordset")
Set rs2 = Server.CreateObject("ADODB.Recordset")
Set rs3 = Server.CreateObject("ADODB.Recordset")

rs3.Open "DELETE * FROM scheidsrechters", adoCon, 1, 2
rs.Open "SELECT * FROM scheidsrechters", adoCon, 1, 2
rs2.Open "SELECT * FROM I_srs.dbf", adoCon2, 1, 2

Do While NOT rs2.EOF
rs.addNew
rs("Bondsnummer")=rs2("BNR")
rs("Achternaam")=rs2("NAAM")
rs("Voorletters")=rs2("VLET")
rs("DistrictID")=rs2("DIS")
rs("ClubID")=rs2("CLB")
rs2.MoveNext
Loop

rs.Update

rs.Close
rs2.Close
Set rs = Nothing
Set rs2 = Nothing
Set adoCon = Nothing
Set adoCon2 = Nothing

%>

Weet iemand hoe het kan dat slechts de eerste record uit de dbf-database (I_srs.dbf) wordt ingelezen?

Alvast bedankt!

[Verwijderd]

De rs2.update moet in de loop. (denk ik )

[ Voor 22% gewijzigd door Verwijderd op 03-12-2003 12:59 ]

[Verwijderd]

Is al opgelost...

Had in de Accessdatabase de index op "Duplicaten niet toegestaan" gezet... Nu zijn duplicaten wel toegestaan, en werkt het weer