Totalt tilt där uppe idag
Får sluta jobba dygnet runt tror jag
Har ett formulär där två recordset tar fram allt.
<form name="form4" method="post" action="layout.asp?action=savemenu">
<%
SQL="Select * From System"
Set pr=Conn.Execute(SQL)
SQL="Select * From Pages Order By Indexname ASC"
Set pa=Conn.Execute(SQL)
Do Until pa.EOF
%>
<tr>
<td class="ie" width="25%"><a href="../index.asp?page=<%=pa("PagesID")%>" target="_blank"><%=pa("Indexname")%></a></td>
<td class="ie" width="16%">
<input type="radio" name="Indexside" value="<%=pa("PagesID")%>"<% If pa("PagesID")=pr("Indexside") Then %> checked<% End If %>>
</td>
<td class="ie" width="21%">
<input type="hidden" name="PagesID" value="<%=pa("PagesID")%>"><input type="text" name="Menunum" size="2" maxlength="2" Value="<%=pa("Menunum")%>">
</td>
<td class="ie" width="17%"><%=pa("Created")%> </td>
<td class="ie" width="21%"><%=pa("Modified")%> </td>
</tr>
<%
pa.MoveNext
Loop
pa.Close
Set pa=Nothing
pr.Close
Set pr=Nothing
%>
<tr>
<td class="ie" colspan="5"><input type="submit" name="Submit" value="Spara">
</td>
</tr>
</form>
</table>
<%
End If
If Request.QueryString("action")="savemenu" then
SQL="Update just det, vad???
%>
Nu skall alla posterna i databasen uppdateras med den nya infon som fyllts i! Varje rad är ju ett nytt rs med en textruta som kan fyllas i och en radiobox som bara kan vara ikryssad i en av recordsetten! Hur ska update satsen se ut?
Normalt skulle jag skriva
Update Pages Set Menunum='"& Request.Form("Menunum") &"' Where PagesID='"& Request.Form("PagesID") &"'
Men hur gör jag när det är flera ID som ska uppdateras?
Nu är jag lite trött här (har andats avgaser hela dagen ) men finns det ingenting gemensamt med dom olika fälten som skall uppdateras i databasen som du kan lägga in i din WHERE sats?
Ifall man bara ser till textboxen(radioboxen funkar som den ska, och uppdaterar en annan databas) så skall allt in i "Menunum" i varje post i db:n, men med olika värden, dvs textbox värdet för varje recset!
Vad jag kan se så är det enda sättet att köra en "for" sats och en split, men är lite kass på det fortfarande
Hmmm... Samma problem jag hade för ett litet tag sedan...
Mitt förslag:
Loopa sql-satsen för varje id....
Ungefär så här
For each PagesID in request.form("PagesID")
Update Pages Set Menunum='"& Request.Form("Menunum") &"' Where PagesID='"& Request.Form("PagesID") &"'
Next
For each PagesID in request.form("PagesID")
SQL="Update Pages Set Menunum='"& Request.Form("Menunum") &"' Where PagesID='"& Request.Form("PagesID") &"'"
Next
Conn.Execute(SQL)
och det här:
For each PagesID in request.form("PagesID")
SQL="Update Pages Set Menunum='"& Request.Form("Menunum") &"' Where PagesID='"& Request.Form("PagesID") &"'"
Conn.Execute(SQL)
Next
menunums=Request.Form("Menunum")
pagesids=Request.Form("PagesID")
menunums=split(menunums,", ")
pagesids=split(pagesids,", ")
for t=0 to ubound(menunums)
menunum=menunums(t)
pageid=pagesids(t)
SQL="Update Pages Set Menunum='"& menunum &"' Where PagesID='"& pagesid &"'"
Conn.Execute(SQL)
Next
men posterna uppdateras fortfarande inte
inga felmeddelanden...
