Adding random numbers to a field

[Clunietp]

code for random, 1 - 2 digit whole numbers:

Dim tmp As Long

Randomize

tmp = Rnd() * 100

Debug.Print tmp


just take tmp, and add it to a field in a current recordset (RS)

rs.fields("MyField").value = rs.fields("MyField").value & tmp


HTH

Tom

[John Long]

Is it possible to add a random number to the end of a field? If so what is the easiest way?

John