Selecting 4 Records At Random From A Table

Hi All,

Any ideas on how I do the following.

I have a table with 1500 records in it.

I want to select at random 4 of these records and append them into another table along with some other data that the query will not pick up, in this case Pilot and Month.

I guess I am having to go the VBA route but dont have a clue on how to do it.

Cheers in anticipation.

Andy.

INSERT INTO Assignments ( flightcode, aircraft, depart, destin, pilotcode, [Month] )
SELECT Schedule.Flightcode, Schedule.Aircraft, Schedule.Departure, Schedule.Destination, [pilot] AS Expr1, [MONTH] AS Expr2
FROM Schedule
WHERE (((Schedule.Departure) Like "man*"));