Notifikationer

Markér alle som læst Log ud

cayenne Nybegynder

08. marts 2002 - 13:50 Der er 13 kommentarer og
1 løsning

Hente data fra to tabeller til 1 drop down boks

Jeg har en redigeringsside i asp som viser poster fra en accessdatabase. Her kan folk rette i oplysningerne.
Men jeg vil gerne have at f.eks. mit navnefelt er en dropdown boks, som udover at vise navnet som hører til posten, også viser en navneliste fra en anden tabel, så brugeren kan vælge et andet navn, hvis ønsket.

Hvordan gør jeg det ? (Håber spørgsmålet er til at forstå :o)

Synes godt om

coltau Juniormester

08. marts 2002 - 15:45 #1

her er hvordan amn laver en dropdownliste der også viser den der er valgt.

<%
strSelected = RS("navn") ' Valgte navn fra tabel 1

' Vis dropdownliste
Response.Write("<select name='EditListe' size='1'>")
Set RS1 = Conn.Execute("SELECT navn FROM tabelnavne") ' Find navneliste fra tabelnavne
Do While Not RS1.EOF
if RS1 = strSelected then ' Er det denne der er valgt i listen
Response.Write("<option selected value='" & RS1("navn") & "'>" & RS1("navn") & "</option>")
else
Response.Write("<option value='" & RS1("navn") & "'>" & RS1("navn") & "</option>")
end if
RS1.MoveNext
Loop
Response.Write("</select>")
%>

Jeg kan ikke uddybe det nærmere da jeg ikke ved hvordan du gemmer hanvet i tabel1. Er det som tekst eller et Tal som refererer til tabelnavne

Synes godt om

cayenne Nybegynder

08. marts 2002 - 16:04 #2

Jeg gemmer ikke id numrene, men selve navnet i tabel 1. Jeg har lige prøvet din kode, men får kun en tom boks. Det er sikkert mig der har gjort noget forkert... Må prøve igen :o)

Synes godt om

coltau Juniormester

09. marts 2002 - 13:40 #3

Der er også en "UPS" i koden.
Denne linie:
if RS1 = strSelected then ' Er det denne der er valgt i listen
Skal ændres til:
if RS1("navn") = strSelected then ' Er det denne der er valgt i listen

Synes godt om

cayenne Nybegynder

11. marts 2002 - 13:20 #4

Jeg har prøvet at gøre som du skriver, men får stadig kun en tom boks og samtidig forsvinder de felter som kommer efter boksen. Hvad mon jeg gør galt ?

Synes godt om

coltau Juniormester

11. marts 2002 - 15:34 #5

Det er sikkert fordi din SQL-sætning ikke finder de navne der skal vises. ?

Set RS1 = Conn.Execute("SELECT navn FROM tabelnavne")

feltet, "navn" er de tekster der skal vises i listen og tabelnavn" er navnet på tabellen hvor deer i.

Synes godt om

cayenne Nybegynder

11. marts 2002 - 15:41 #6

Ja, men så langt har jeg forstået det. De felter der forsvinder nedenunder er på adresse osv. og min submit knap forsvinder også. Det forstår jeg ikke rigtigt. Er det muligt at det er loopet, der aldrig stopper ?
(Er meget glad for din hjælp, selv om jeg er lidt tungnem :o)

Synes godt om

coltau Juniormester

11. marts 2002 - 18:28 #7

Må jeg se koden. ?

Synes godt om

cayenne Nybegynder

12. marts 2002 - 10:09 #8

Her er den. Jeg bruger Frontpage 2000. Derfor står der fp foran fp_rs.

<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>Navn</title>
</head>

<body>


<%
fp_sQry="SELECT * FROM tbl_Adresse"
fp_sDefault=""
fp_sNoRecords="Der er ikke blevet returneret nogen poster."
fp_sDataConn="Adresseforsog"
fp_iMaxRecords=256
fp_iCommandType=1
fp_iPageSize=1
fp_fTableFormat=False
fp_fMenuFormat=False
fp_sMenuChoice=""
fp_sMenuValue=""
fp_iDisplayCols=3
fp_fCustomQuery=False
BOTID=0
fp_iRegion=BOTID
%>


<form METHOD="POST" action="Adresseforsog_UPDATE.asp">

<table BORDER="0">
<tr>
<td><b>Navn:</b></td>
<td>
<%
strSelected = fp_RS("Navn") ' Valgte navn fra tabel 1

' Vis dropdownliste
Response.Write("<select name='Navnefelt' size='1'>")
Set RS1 = Conn.Execute("SELECT Navn FROM tbl_navn") ' Find navneliste fra tabelnavne
Do While Not RS1.EOF
if RS1("Navn") = strSelected then ' Er det denne der er valgt i listen
Response.Write("<option selected value='" & RS1("Navn") & "'>" & RS1("Navn") & "</option>")
else
Response.Write("<option value='" & RS1("Navn") & "'>" & RS1("Navn") & "</option>")
end if
RS1.MoveNext
Loop
Response.Write("</select>")
%>

</td>
</tr>
<tr>
<td><b>Adresse:</b></td>
<td><input TYPE="TEXT" NAME="Adresse" SIZE="40" VALUE="<%=FP_FieldHTML(fp_rs,"Adresse")%>"></td>
</tr>
<tr>
<td><b>Adresse_id:</b></td>
<td><input TYPE="TEXT" NAME="Adresse_id" SIZE="40" VALUE="<%=FP_FieldHTML(fp_rs,"Adresse_id")%>"></td>
</tr>
<tr>
<td COLSPAN="2"><br>
<input TYPE="Submit" NAME="fp_submit"><input TYPE="Reset" NAME="fp_reset"></td>
</tr>
</table>
</form>
<hr>



</body>

</html>

Synes godt om

coltau Juniormester

12. marts 2002 - 12:04 #9

Jeg kan forestille mig at den fejler på denne linie:

strSelected = fp_RS("Navn") ' Valgte navn fra tabel 1

Jeg mener ikke at du kan bruge fp_RS da den kun eksistere i include-filen: 

Du kan da i første omgang prøve at lave denne linie:
strSelected = ""
bare for at se om ikke det er det.

Synes godt om

cayenne Nybegynder

12. marts 2002 - 12:09 #10

Har lige prøvet det, men det giver det samme resultat.
Hvis jeg ikke skriver fp_rs, så får jeg denne fejl:
Microsoft VBScript runtime error '800a000d'

Type mismatch: 'rs'

/inline/almen/service/DRresearch/closed/Medarbejdere/Fravaer/forsog/Adresseforsog.asp, line 56

Synes godt om

coltau Juniormester

12. marts 2002 - 13:48 #11

Linie 56 er jo netop den linie du skulle ændre til:

strSelected = ""

der står jo ikke noget om 'rs'

I øvrigt kan jeg se at du anvender fp_rs længere nede i koden. Det betyder at ovenstående linie kan ændres til dette:

strSelected = FP_FieldHTML(fp_rs,"navn")

jeg håber du er med. Hvis du skal anvende felter fra udtrækket: fp_rs skal du ikke anvende fp_rs("navn") men en funktion der hedder: FP_FieldHTML(fp_rs,"navn")

Synes godt om

cayenne Nybegynder

13. marts 2002 - 15:52 #12

Har prøvet med strSelected = "" Det gør bare ingen forskel.
Og jeg forstår stadig ikke hvorfor det resulterer i at resten af min formular "forsvinder". Nå, jeg er nok bare en klovn :o(
Men tusind tak for din hjælp. Du får pointene for dit besvær, det fortjener du :o)

Synes godt om

coltau Juniormester

13. marts 2002 - 17:32 #13

Nej - dit største problem er at du forsøger arbejde videre med en kode der er dannet af frontpage. Hvis du skal kunne gøre det - skal du vide nøjagtig hvordan frontpage danner koden og det er vist et større kursus - hvis nogen overhovedet ved det.

Synes godt om

th20 Nybegynder

07. marts 2004 - 13:02 #14

Hejsa
Jeg har lige prøvet den kode af som coltau skrev tidligere. Jeg får også type mismatch når jeg bruger rs("navn"), men bruger jeg "" virker min kode fint. Har det nogen stor betydning af jeg bare bruger "" ?

Synes godt om

Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Lost focus Af bsn i ASP	1	07/11/202415:34	01/01/202514:58
ASP classic Af bsn i ASP	8	28/10/202423:11	30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP	5	23/05/202409:56	24/05/202400:02
Optimer MySql table med ASP Af poulmadsen i ASP	4	26/04/202417:16	26/04/202418:37
JSON Af ingeman i ASP	3	07/04/202417:53	08/04/202412:09

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS