here is the code i am using to generate the random selection, only 1 at this time
Expand|Select|Wrap|Line Numbers
- <%
- randomize
- random_number1=int(rnd*156)+1
- %>
- <%
- On Error Resume Next
- Response.Expires=0
- Set yaketyConnection=Server.CreateObject("ADODB.Connection")
- DatabaseDetails="DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.Mappath("../private/yakety.mdb") & ";"
- yaketyConnection.Open DatabaseDetails
- yaketyQuery="SELECT * FROM celebs WHERE rndnumber='%"&random_number&"%'"
- Set yaketyRecordset=yaketyConnection.execute(yaketyQuery)
- %>
Expand|Select|Wrap|Line Numbers
- <DIV id="rnd1" class="rnd1"><img src="Pix/<%=yaketyRecordset("image")%>" width="100" height="100" alt="<%=yaketyRecordset("firstname")%> <%=yaketyRecordset("surname")%>"></DIV>