i am trying to make a page that goes to the next recorset when i click on a button so the page only shows one record at a time, this is for updating so i need to be able to go to the next recodset from the page that updates the database also.
the code for the page that i have which lists all the records is as follows
Expand|Select|Wrap|Line Numbers
- <%@LANGUAGE=VBSCRIPT%>
- <%voiceid=Request.Querystring("id")%>
- <%
- Response.Expires=0
- Set YaketyConnection=Server.CreateObject("ADODB.Connection")
- DatabaseDetails="DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.Mappath("database.mdb") & ";"
- YaketyConnection.Open DatabaseDetails
- YaketyQuery="SELECT * FROM mp3 INNER JOIN celebs ON mp3.celebid = celebs.idnumber WHERE mp3.celebid = "&voiceid&""
- Set YaketyRecordset=YaketyConnection.execute(YaketyQuery)
- %>
- <HTML>
- <HEAD>
- <TITLE>Update Record</TITLE>
- <SCRIPT language="javascript" src="admincheck.js"></SCRIPT>
- <SCRIPT src="../../Scripts/AC_RunActiveContent.js" type="text/javascript"></SCRIPT>
- </HEAD>
- <BODY>
- <BR>
- <TABLE width="90%" border="1" align="center">
- <%
- Do Until(yaketyRecordset.EOF)
- %>
- <%
- If Not yaketyRecordset.EOF Then %>
- <TR>
- <TD valign="top">
- <FORM action="updateok.asp" method="post">
- <P align="center"><SPAN class="headertextCopy">UPDATE RECORD</SPAN><SPAN><BR>
- <BR>
- <FONT color="#FF0000">DO NOT USE ANY PUNCTATION</FONT></SPAN></P>
- <TABLE width="100%" border="0" cellspacing="0" cellpadding="0" bordercolor="#CCFFFF" class="background">
- <TR>
- <TD class="admintext" align="right">filename</TD>
- <TD colspan="2" align="left" class="admintext"><INPUT name="filename" type="text" id="filename" value="<%=YaketyRecordset("filename")%>" size="100"></TD>
- </TR>
- <TR>
- <TD class="admintext" width="25%" align="right"><P> </P> </TD>
- <TD colspan="2" align="left" class="admintext"><SCRIPT type="text/javascript">
- AC_FL_RunContent( 'data','../pages/player_mp3.swf','type','application/x-shockwave-flash','width','50','height','20','movie','../pages/player_mp3','bgcolor','#ef007b','flashvars','mp3=../search/<%=yaketyRecordset("surname")%>/<%=yaketyRecordset("filename")%>.mp3&showvolume=0&showslider=0&showstop=1&width=50&bgcolor1=ef007b&bgcolor2=ef007b&buttonovercolor=000000' ); //end AC code
- </SCRIPT>
- <NOSCRIPT>
- <OBJECT data="../pages/player_mp3.swf" type="application/x-shockwave-flash" width="50" height="20">
- <PARAM name="movie" value="../pages/player_mp3.swf" />
- <PARAM name="bgcolor" value="#ef007b" />
- <PARAM name="FlashVars" value="mp3=../search/<%=yaketyRecordset("surname")%>/<%=yaketyRecordset("filename")%>.mp3&showvolume=0&showslider=0&showstop=1&width=50&bgcolor1=ef007b&bgcolor2=ef007b&buttonovercolor=000000" />
- </OBJECT>
- </NOSCRIPT></TD>
- </TR>
- <TR>
- <TD class="admintext" width="25%" align="right">search terms</TD>
- <TD class="admintext" width="25%" align="left">
- <TEXTAREA name="new_information" cols="100" rows="5"><%=YaketyRecordset("mp3type")%></TEXTAREA> </TD>
- </TR>
- </TABLE>
- <DIV align="center">
- <INPUT name="id_number" type="text" value="<%=YaketyRecordset("idnumbermp3")%>">
- <BR>
- <INPUT type="submit" name="Submit" value="Submit">
- <INPUT type="button" name="reset" value="Reset">
- </DIV>
- </FORM>
- </TD>
- </TR>
- <% yaketyRecordset.MoveNext
- End If
- %>
- <%
- Loop
- %>
- </TABLE>
- <BR> <%
- YaketyRecordset.Close
- YaketyConnection.Close
- %>
- </BODY>