compare recordset!

kan man lave en select distinct på fire felter ?
dvs hvis :
A  A  A  A
A  A  A  A  ' eksistere flere gange slet
A  B  A  B  ' den skal ikke slettes

eller andre ideeer , det er den samme tabel

Du skulle samle de 4 index'er i en ny kolonne, så står de jo som et samlet index og så er det nemt at finde dubletter, søge i osv. Du kan sagtens oprette et nyt felt i tabellen og så køre en opdateringsforespørgsel, som samler de fire index'er i dette felt.

I din formular kan du så skjule dit nye felt og samle de 4 index ved fremtidige indtastninger af de forskellige index!~)

Alle datane ligger i samme tabel, med et index på 4, som adskiller dem samt de resultater som forligger.
jeg har i alt 8 set som indholder fra 12 - 20.
jeg vil gerne have at de alle indholder samme indexes og de steder

kan du ikke forklare din løsning lidt nærmere

kan man ikke tage fat i en hel række i en recordset i stedet for rec.fields!asdad

Hvordan ser din tabel ud?~)

can you be more precise? You say you have a a recordset with a compound key (ammensatte nøgle) Do you mean a table?

Hvis dine 4 felter er en sammensat nøgle eller et indeks, der ikke tillader dubletter, kan du bare tilføje alle de poster du vil - Hvis der er dubletter vil Access IKKE tillade de tilføjes tabellen.

I kode kan do undgå at få fejlmeddelelsen ved:
docmd.setwarnings false

Niels

hmm...
jeg har noget kode som kan klare det !
men jeg har også et problem ved den:


rms.MoveFirst
rms1.MoveFirst
Do Until rms1.EOF
If ((rms1.Fields!BIl <> rms.Fields!BIl) And (rms.Fields!Person <> rms1.Fields!Person)) Then
    AddNew
    rms.Fields!BIl = rms1.Fields!BIl
    rms.Fields!Person = rms1.Fields!Person
    rms.Update
End If
    rms.MoveNext
    rms1.MoveNext
Loop





problemmet er  hvis rms ikke eksistere på et tidspunkt i min løkke ! så melder
den fejl.

If ((rms1.Fields!BIl <> rms.Fields!BIl)

are you trying to create a new table which only contains ONE copy of each of the records in the original table?
If so, make sure that the fields you have as the compound key are also unique and then as Niels states only one record will get copied over when you INSERT them!

og jeg vil jo gerne have at den skal adde når den ikke findes

det er den samme tabel, hvor laver 2 forskellige udtræk.

Try explaining in more detail the WHOLE problem!

jeg trore at man kan lave noget her så at sige
hvis rms1!bil = rms!bil eller rms!bil ikke findes  then
..........
.......

I am LOST!

How many tables do you have, one or two?

fordi min problem kommer af at rms løber tør og når den gøre det så skal den hoppe ind i :
  AddNew
    rms.Fields!BIl = rms1.Fields!BIl
    rms.Fields!Person = rms1.Fields!Person
    rms.Update
End If
    rms.MoveNext
    rms1.MoveNext
Loop

yuksel>If you want us to help then we need an explanationof the problem in detail. If you try making solutions yourself WITHOUT giving us more information then you are on your own!

jeg trore at man kan lave noget her så at sige
hvis rms1!bil = rms!bil eller rms!bil ikke findes  then
..........
.......

hvis man kan lave denne om til en if sætning så vil det virke.

jeg trore at man kan lave noget her så at sige
hvis rms1!bil = rms!bil eller rms!bil ikke findes  then
..........
.......


for den skal stadige addere til hvis rms. er løbbet tør

The code you show here 17/08-2005 13:56:46
is code which you have made to try and solve another problem, and it is THIS problem we are interested in. So if you STOP UP for a while and describe what you are attempting to do and we will try and help with that NOT the problem you have in the code you have made!

der går kludder i din løkke :(
lav et sammensat indeks eller nøgle på destinationstabellen

kør en alm sql:
INSERT INTO destinationstabel ( felt1, felt2 )
SELECT felt1, felt2
FROM FraTabellen

Er det ikke nemmere bare at køre en insert forespørgsel, som tilføjer de rows som kun findes i den tabel der sammenlignes med, sådan ca. sådan her?

currentdb.Execute "INSERT INTO TotalTabel (BI, Person) SELECT FROM DelTabel1 dt WHERE NOT EXISTS (SELECT * FROM TotalTabel WHERE BI=dt.BI AND Person=dt.Person)"

kjulius>THis is exactly what I would do, but before I make any suggestions it would be nice for yukel to verify what EXACTLY he wants.

terry--> Yeah, he has been kind of quiet for some time now, hasn't he? :-) But maybe, just maybe, this will sound his alarms and he will react. Anyway, you're right, it is kind of difficult to assess exactly what it is he wants done from his explanations. I'm pretty sure, though, that my code does what he wants done. Gut feeling, you know! :-)

Yes I have the same feeling, but I dont like using time when the person who palced the question deosnt give me the information I ask for!

terry--> You're right. Far too many questions remain open, because the guy posing the question leaves before the problem is resolved. That's kind of hard to accept if you invest time and resources trying to help the guy.
In this case, I've not been involved with the question until now, so I've not been feeling let down, but I can certainly appreciate your feeling of lack of response from yuksel.
At the same time, though, I have to say that your tough attitude as displayed in your messages at 13:57:21 and 14:00:37 may have scared him away. Not everyone reacts well to that kind of tirade.

well its how you interpret  my comments, I could have just said "... then I'm sorry, but I cant help", but then that could also be taken incorrectly!

But I know what you mean :o)

and this link may put things into perspective!
http://www.eksperten.dk/spm/640805

and kuksel has been around for  afew year snow, so I hope he "knows" me :o)

kuksel  = yuksel

Ahh, yes, I can see from where you display of grumpiness stems! :-)
Yet, as difficult as it might be, I think such display of temper is counterproductive.

hmmmm..... sorry for vente tiden guys,,,, der har været nogle små ting......

har i mellem tiden løst min problem, måske lidt anderledes men løst :).
Jeres input har været til gavn . derfor må gerne indlægge svar :)
takker endu gang

Godt du fandt tilbage... :-)

well if you could use anything from my input to this question then here's an answer, otherwise reject it.
mvh
Terry

.

If I could only hit the right button :o)

takker :)

selv tak