Hjälp med vb-script till asp-sida - uppdatera tabell med värden från en annan tabell

mankan

Godis är gott!
Gick med
28 Aug 2003
Ort
Det burgna Täby, stan på landet!
Hoj
Suzuki DR 650 SE 1999
Jag har en sida där jag presenterar styrelsen i en medlemsförening. Alla uppgifter om användarna kommer från en och samma databas men från två olika tabeller.

Namn på en styrelseledamot och dess funktion kommer från tabellen Styrelsen. Uppgifterna om medlemmarna kommer från tabellen RT_Familys. För att skilja användarna åt har alla ett användarnamn som är unikt för varje användare. Den tabellposten heter UName och finns i bägge tabeller.

Koden för sidan där styrelsen presenteras ser nu ut så här:

<%
'Nedstående kod sköter själva uppdateringen av tabellen Styrelsen.

SQL = "SELECT * From Styrelsen"
rs.Open SQL, Connection, adOpenStatic, adLockOptimistic
%>

<%
If Request.Form("Update") <> "" Then
RS("namn") = Request.Form("namn")
RS("funktion") = Request.Form("funktion")
RS("UName") = Request.Form("UName")
RS.update
End If
%>


<%'Nedstående avgör om sidan ska redigeras eller inte%>
<%If Request.QueryString("Edit") = "true" Then %>

<form method="POST" action="styrelsen.asp">
<input type="hidden" name="Update" value="<%=Request.QueryString("Edit")%>">

Ändra medlemmar i Rosa Tornets styrelse:<p>

Välj en funktion i listan:<br>
<SELECT NAME="funktion">
<OPTION></OPTION>

<%
'Eftersom jag ännu har en connection öppen mot tabellen Styrelsen loopar jag igenom dess poster så att man kan välja ut en av de aktuella posterna
Do while NOT rs.eof
%>

<OPTION><%=rs("funktion")%></OPTION>

<%
rs.MoveNext
Loop
rs.close
%>

</SELECT>

<p>

Välj ett namn i listan:<br>

<SELECT NAME="namn">
<OPTION></OPTION>

<%'Här öppnar jag en ny connection mot den tabell som innehåller alla uppgifter om medlemamrna, bla. användarnamn och fullt namn. Både mammor och pappor kan vara med, därav två olika options, och loopar igenom den.
SQL = "SELECT Mother, Father, UName From RT_Familys"
rs.Open SQL, Connection, adOpenStatic, adLockOptimistic
%>

<%
Do while NOT rs.eof
%>

<OPTION><%=rs("Mother")%></OPTION>
<OPTION><%=rs("Father")%></OPTION>

<%
rs.MoveNext
Loop
%>

</SELECT>

<p>
<font face="Arial" size="2"></font>
<input type="submit" value="Uppdatera">

<%
Else

rs.close

'Om sidan inte ska uppdateras eller redigeras presenteras dess styrelse enligt nedan. Jag kopplar medlemmarna i styrelsen mha. användarnamnet, annars skulle alla användare loopas igenom.

SQL = "SELECT * From Styrelsen, RT_Familys Where Styrelsen.UName = RT_Familys.UName"
rs.Open SQL, Connection, adOpenStatic, adLockOptimistic
%>

Rosa Tornets styrelse:<p>

<%
Do while NOT rs.eof
%>

<%
If rs("namn") = rs("Mother") Then
%>

<%=rs("funktion")%>:<br><A HREF="mailto:<%=rs("EMail")%>"><%=rs("namn")%></A><br>Telefon hem: <%=rs("PHome")%><br>Telefon arbete: <%=rs("MPWork")%><br>Mobil: <%=rs("MPMob")%><p>

<%
ElseIf rs("namn") = rs("Father") Then
%>

<%=rs("funktion")%>:<br><A HREF="mailto:<%=rs("EMail2")%>"><%=rs("namn")%></A><br>Telefon hem: <%=rs("PHome")%><br>Telefon arbete: <%=rs("FPWork")%><br>Mobil: <%=rs("FPMob")%><p>

<%End If%>

<%
rs.MoveNext
Loop
%>

<%'Nedstående rad talar bara om vem som ska få redigera sidan%>
<%If Session("access") = "SA" OR Session("access") = "Admin" Then%>

<font face="Arial" size="2"><A HREF="styrelsen.asp?Edit=true">Redigera sidan</A></font>

<%End If%>

<%End If%>

<%
rs.close
Connection.Close
Set rs = Nothing
Set Connection = Nothing
%>


Som jag har berättat tidigare så använder jag UName för att skilja medlemmarna åt, det är unikt för varje användare. Således använder jag den i min tabell Styrelsen för att inte alla medlemmar ska listas när jag visar styrelsen.

Har nu kommit så långt på min uppdateringssida att alla uppgifter uppdateras när jag skickar iväg sidan efter redigering UTOM just UName, vilket får till följd att den post jag redigerat inte presenteras på sidan eftersom just UName inte skrivs in i tabellen Styrelsen. Hur löser jag detta månne?

Jag måste komma på ett sätt att koppla UName till den mamma eller pappa jag väljer när jag listar medlemmarna när tabellen Styrelsen ska redigeras/uppdateras.

Jag har försökt att loopa igenom UName efter att jag loopar mammor och pappor men får inte till det.

Är det någon som ser vart jag har otur när jag tänker?

Mvh/Mankan
 
Nyheter
Yamaha R7-vinnarens rapport: ”Ett riktigt monster på kurviga landsvägar!”

På MC-mässan i vintras anor...

Nisse Hedlund bortgången

Den legendariske motorkonst...

En dag på dragstrippen

Efter att ha varit aktiv so...

Steve McQueens Scott Squirrel till salu

Detta Scott Flying Squirrel...

Dags för Strängnäs Bike Show!

Sista lördagen i augusti är...

Bikeweekend på Kjula denna helg

Den 22-23 augusti är det da...

Motorcycle Inferno #8

Den 5 september blir Laxhol...

Tiotusentals körde Mälaren Runt

Lördagen den 15 augusti gen...

Mälaren Runt fyller 40 år

Nu på lördagen den 15 augus...

Steve Holcombe klar för GGN!

Pressmeddelande 2026-08-10 ...

Back
Top