INSERT with Random SELECT

Question

INSERT with Random SELECT

Navigation

#1 by (2 votes)

0

I have a table with a lot of information and an empty one.

I need to make an INSERT on this empty table with just one information from the other table, but SELECT must be random.

I'm using the following line in VBA:

db.Execute "INSERT INTO tbl_Sorteio SELECT TOP 1 RE, Name_Employee, Case_Number, [Date], [Time], Supervisor, Comment, Client ORDER BY Rnd(Case_Number)"

But I got the following error message:

Remembering, I'm using Access 2013.

sql vba ms-access

asked by anonymous 30.09.2018 / 08:15

1 answer

How to save FastReport report to PDF in silent mode? Detect field type sent in POST PHP

score 2 · Answer 1

I added the FROM clause that was missing and I started filtering the Case_Number instead of sorting the result by it; see if the command below resolves:

db.Execute "INSERT INTO tbl_Sorteio SELECT TOP 1 RE, Name_Employee, Case_Number, [Date], [Time], Supervisor, Comment, Client FROM tbl_Sorteio WHERE Case_Number = Rnd(Case_Number)"