Gå videre til næste, hvis et id har været brugt, derefter loope

Du kan lave noget round-robin-agtigt....

Når du skal indsætte en ny kunde, ser du på hvilket forhandler id den foregående kunde fik - så slår du op i forhandler tabellen, top 1 over forhandlere hvor id er større end id fra den foregående kunde.
Får du en record tilbage skal den nye kunde have det forhandler id, er recordsettet tomt, skal han have forhandler id fra den første forhandler (select top 1 fra forhandler order by id)

Hvordan gør jeg det helt konkret ?

hvor konkret mener du? Har du lavet dele af koden eller??

Hej igen...
Ja jeg har lavet noget.... Men jeg har neget svært ved at gennemskue hvordan jeg skal få det til at virke...

<%
if request.servervariables("CONTENT_LENGTH") <> 0 then 'spørger om der bliver data tilsendt
tabelnavn = "enroll"
id = Request.Form("id")

Set QueryIndslag = (Connect.Execute("Select * from "& tabelnavn &""))

'laver recordsættet til db
set opdatering = server.createobject("ADODB.recordset")
query ="select * from "& tabelnavn &""
opdatering.open query, connect, adopenstatic, adlockoptimistic

'opretter ny linie i db og indskriver tilsendt data

opdatering.addnew
opdatering("dato") = time
opdatering("navn") = trim(request.form("navn"))
opdatering("nick") = trim(request.form("nick"))
opdatering("email") = trim(request.form("email"))
opdatering("land") = trim(request.form("land"))
opdatering("order") = trim(request.form("order"))
opdatering("forhandler") = trim(request.form("forhandler"))
opdatering.update
opdatering.close
%>

<%

else 'hvis der ikke bliver tilsendt data

id = Request.QueryString("id")

%>
    <table width="300" cellpadding="2" cellspacing="0" border="0" align="center">
<form action="default.asp?id1=4" method="post">
<%
Set QueryNavn = (Connect.Execute("Select "& varsql &" from formular"))
%>
        <tr>
            <td width="100">Standard <input name="order" type="radio" value="standard"></td>
            <td width="100">Advantage <input name="order" type="radio" value="advantage"></td>
            <td width="100">Prestige <input name="order" type="radio" value="prestige"></td>
        </tr>
        <tr>
            <td><%=QueryNavn("navn"& sprog2 &"")%> :</td>
            <td align="right" colspan="2"><input name="navn" type="text" size="40" class="mem"></td>
        </tr>
        <tr>
            <td><%=QueryNavn("nick"& sprog2 &"")%> :</td>
            <td align="right" colspan="2"><input name="nick" type="text" size="40" class="mem"></td>
        </tr>
        <tr>
            <td><%=QueryNavn("email"& sprog2 &"")%> :</td>
            <td align="right" colspan="2"><input name="email" type="text" size="40" class="mem"></td>
        </tr>
        <tr>
            <td><%=QueryNavn("land"& sprog2 &"")%> :</td>
            <td align="right" colspan="2"><input name="land" type="text" size="40" class="mem"></td>
        </tr>
____________________________________________________________________________________
Her trækker jeg forhandleren !
____________________________________________________________________________________
<%
Set QueryEnr = (Connect.Execute("Select * from enroll"))

Set QueryForhandler = (Connect.Execute("Select Top 1 * from forhandler"))
%>
        <tr>
            <td>Id <%=QueryForhandler("forId")%></td>
            <td align="right" colspan="2"><input name="forhandler" type="hidden" value="<%=QueryForhandler("id")%>"></td>
        </tr>
        <tr>
            <td>&nbsp;</td>
            <td align="right" colspan="2"><input type="reset" value="Reset" class="knap">&nbsp;<input type="submit" value="Send" class="knap"></td>
        </tr>
</form>
    </table>
<% end if%>


Kan du gennemskue det ?

Jeg skal lige kigge på det når jeg får et ledigt øjeblik... :)

Jeg har endnu ikke fået nogen respons på spørgsmålet... er der nogen der kan hjælpe ?

lukker sp. ingen svar