Notifikationer

Markér alle som læst Log ud

tommyf Nybegynder

17. december 2000 - 17:39 Der er 15 kommentarer og
3 løsninger

Alle me

Hej forstyre lige lidt... hvordan får jeg den til at stille dem alle sammen op under hinanden?
http://www.123ferie.dk/x/sommerhus.asp?husid=1
F.eks
http://www.123ferie.dk/x/sommerhus.asp?husid=all

Så den viser ALLE husene efter hinanden på en lang række?

På en liste ligesom her:
http://www.123ferie.dk/dansk/byer/amtoft.htm

Så trykker man og går videre til det enkelte hus.

Synes godt om

tommyf Nybegynder

17. december 2000 - 17:40 #1

Ups, forkert kategori, ser lige om der er nogen der kan finde ud af det aligevel.

Synes godt om

stigc Nybegynder

17. december 2000 - 17:42 #2

du skal have skrevt om i din asp koden!

Hvis du ligger det her gør jeg det gerne!

Synes godt om

tommyf Nybegynder

17. december 2000 - 17:43 #3

<%

Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.MapPath(\"sommerhuse.mdb\")

SQLstmt = \"SELECT * FROM sommerhus WHERE \"& Request(\"husid\")

Conn.Execute (SQLstmt)

Set rs = conn.Execute(SQLstmt)

husid = rs(\"Husid\")
by = rs(\"by\")
billede = rs(\"Billede\")
beskrivelse = rs(\"Beskrivelse\")

%>

Synes godt om

stigc Nybegynder

17. december 2000 - 17:44 #4

15 point er jo ikke meget!

Det kræver alligevel lidt arbejde!
Jeg gidder ikke at lave så der kommer en lille beskrivelse, og et link videre. Men gerne så de udskrives alle sammen på en side!.......

Synes godt om

tommyf Nybegynder

17. december 2000 - 17:45 #5

Det er kun det med at alle skal udskrives på en side, det andet har jeg lavet.

Synes godt om

stigc Nybegynder

17. december 2000 - 17:45 #6

det er ikke hele din side! Hvor er resten?

Synes godt om

tommyf Nybegynder

17. december 2000 - 17:46 #7

SQLstmt = \"SELECT * FROM sommerhus WHERE \"& Request(\"husid\")
Det er vel den der må laves om til noget alle husene opfylder... eller blank eller hvad man nu gør.

Synes godt om

tommyf Nybegynder

17. december 2000 - 17:46 #8

<html>

<head>
<title>Adresser</title>

<%

Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.MapPath(\"sommerhuse.mdb\")

SQLstmt = \"SELECT * FROM sommerhus WHERE \"& Request(\"husid\")

Conn.Execute (SQLstmt)

Set rs = conn.Execute(SQLstmt)

husid = rs(\"Husid\")
by = rs(\"by\")
billede = rs(\"Billede\")
beskrivelse = rs(\"Beskrivelse\")

%>

<p> </p>
<div align=\"center\">
<center>
<table border=\"1\" cellspacing=\"1\" width=\"90%\">
<tr>
<td width=\"100%\">By : <%=By%>
</td>
</tr>
<tr>
<td width=\"100%\">Beskrivelse <%=Beskrivelse%>

</td>
</tr>
<tr>
<td width=\"100%\"><a href=\"http://www.123ferie.dk/x/index.asp?husid=<%=Husid%>&ejerid=<%=Husid%>\">Se flere
informationer samt billede af dette hus. Tryk her. </a></td>
</tr>
</table>
</center>
</div>

</html>

Synes godt om

stigc Nybegynder

17. december 2000 - 17:47 #9

nej desværre kan du ikke gøre sådan. Du er nød til at lave et loop rundt om koden der skriver tabllen ud!

Synes godt om

jalle Nybegynder

17. december 2000 - 17:47 #10

IF husid=\"\" THEN
sql = (\"select * from tabelnavn/forespørgsel\")
ELSE
Din tidligere kode.
END IF

Synes godt om

tommyf Nybegynder

17. december 2000 - 17:47 #11

Tænk lige ved at eksperten sætte et par \';\' for meget.

Synes godt om

stigc Nybegynder

17. december 2000 - 17:55 #12

noget ligende det her:

Hvis du skrilver all i id\'et skulle alle komme ud

<html>

<head>
<title>Adresser</title>

<%

Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.MapPath(\"sommerhuse.mdb\")

SQLstmt = \"SELECT * FROM sommerhus WHERE \"& Request(\"husid\")

Conn.Execute (SQLstmt)

Set rs = conn.Execute(SQLstmt)

husid = rs(\"Husid\")
by = rs(\"by\")
billede = rs(\"Billede\")
beskrivelse = rs(\"Beskrivelse\")

%>

\'******************************************************************************

if Request(\"husid\")=\"all\" then

SQLstmt = \"SELECT * FROM sommerhus\"
Conn.Execute (SQLstmt)
Set rs = conn.Execute(SQLstmt)

do while NOT rs.eof

husid = rs(\"Husid\")
by = rs(\"by\")
billede = rs(\"Billede\")
beskrivelse = rs(\"Beskrivelse\")

%>

<p> </p>
<div align=\"center\">
<center>
<table border=\"1\" cellspacing=\"1\" width=\"90%\">
<tr>
<td width=\"100%\">By : <%=By%>
</td>
</tr>
<tr>
<td width=\"100%\">Beskrivelse <%=Beskrivelse%>

</td>
</tr>
<tr>
<td width=\"100%\"><a href=\"http://www.123ferie.dk/x/index.asp?husid=<;%=Husid%>&ejerid=<%=Husid%>\">Se flere
informationer samt billede af dette hus. Tryk her. </a></td>
</tr>
</table>
</center>
</div>

<% rs.movenext
loop

else

\'******************************************************************************

<p> </p>
<div align=\"center\">
<center>
<table border=\"1\" cellspacing=\"1\" width=\"90%\">
<tr>
<td width=\"100%\">By : <%=By%>
</td>
</tr>
<tr>
<td width=\"100%\">Beskrivelse <%=Beskrivelse%>

</td>
</tr>
<tr>
<td width=\"100%\"><a href=\"http://www.123ferie.dk/x/index.asp?husid=<;%=Husid%>&ejerid=<%=Husid%>\">Se flere
informationer samt billede af dette hus. Tryk her. </a></td>
</tr>
</table>
</center>
</div>

</html>

<% end if %>

Synes godt om

tommyf Nybegynder

17. december 2000 - 18:21 #13

Min siger at der mangler et \"do\"
http://www.123ferie.dk/x/sommerhuse2.asp?husid=alle

Synes godt om

tommyf Nybegynder

17. december 2000 - 18:21 #14

Burde man ikke på en eller anden måsde let kunne vælge alle?http://www.123ferie.dk/x/sommerhus.asp?husid=1/100 eller sådan noget?

Synes godt om

stigc Nybegynder

17. december 2000 - 18:23 #15

nej desværre!

jeg havde glemt at lukke:

<% rs.movenext
loop

else

skla være:

<% rs.movenext
loop

else

%>

Synes godt om

tommyf Nybegynder

17. december 2000 - 18:33 #16

Mangler stadig en \'do\'

Synes godt om

jalle Nybegynder

17. december 2000 - 18:44 #17

Jeg vil anbefale dig denne her. Hvis den ikke kan finde et husid, så tager den alle data, men ellers tager den kun data fra husid.

<html>

<head>
<title>Adresser</title>

<%

Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.MapPath(\"sommerhuse.mdb\")

IF Request(\"husid\") = \"\" THEN
SQLstmt = \"SELECT * FROM sommerhus\"
ELSE
SQLstmt = \"SELECT * FROM sommerhus WHERE \"& Request(\"husid\")
END IF

Conn.Execute (SQLstmt)

Set rs = conn.Execute(SQLstmt)

do while NOT rs.eof

husid = rs(\"Husid\")
by = rs(\"by\")
billede = rs(\"Billede\")
beskrivelse = rs(\"Beskrivelse\")
rs.movenext
loop

%>

<p> </p>
<div align=\"center\">
<center>
<table border=\"1\" cellspacing=\"1\" width=\"90%\">
<tr>
<td width=\"100%\">By : <%=By%>
</td>
</tr>
<tr>
<td width=\"100%\">Beskrivelse <%=Beskrivelse%>

</td>
</tr>
<tr>
<td width=\"100%\"><a href=\"http://www.123ferie.dk/x/index.asp?husid=<;%=Husid%>&ejerid=<%=Husid%>\">Se flere
informationer samt billede af dette hus. Tryk her. </a></td>
</tr>
</table>
</center>
</div>

</html>

Synes godt om

tommyf Nybegynder

18. december 2000 - 22:34 #18

Hehe.. kunne ikke få nogen af dem til at du, nå der er kursus på torsdag så kan jeg måske få lidt hjælp *s*.
20point til hver for hjælpenb :)

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

Se alle it-kurser fra Computerworld Kurser

IT-kurser om Microsoft 365, sikkerhed, personlig vækst, udvikling, digital markedsføring, grafisk design, SAP og forretningsanalyse.

Se alle it-kurser

Flere spørgsmål fra Andet netværk kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
proxy server Af dcedata1977 i Andet netværk	3	20/12/202515:17	01/06/202612:18
CCNA Af Nojsa i Andet netværk	1	09/12/202519:29	11/12/202507:23
Manglende driver til netværksdongle Af trav4u2 i Andet netværk	25	16/11/202516:39	23/11/202515:14
Oneplus bloototh Af johnnylassen i Andet netværk	12	18/09/202512:55	05/10/202512:02
Skype telefon nummer Af Nørdnot i Andet netværk	1	14/04/202514:30	14/04/202515:25

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