Avatar billede Meggel Novice
24. januar 2004 - 21:25 Der er 33 kommentarer og
2 løsninger

response.write rs1("clan") hvor fx id er 1

ja hvor gør man det. plz.. help..
Avatar billede websam Nybegynder
24. januar 2004 - 21:28 #1
Jeg er ikke helt med på hvad du mener
Avatar billede Meggel Novice
24. januar 2004 - 21:33 #2
hmm.. fx.. i min database. skal jeg havde "clan" ud som har id 1 fx.

du kan se et billede af det som jeg skal havde ud her..

http://fruth.prohest.dk/db.jpg
Avatar billede jnissen Nybegynder
24. januar 2004 - 21:34 #3
Din database forbindelse skal se fx sådan ud:

set conn = server.createobject("ADODB.connection")
path = Server.MapPath(".mdb")
conn.Open "DBQ="& path &";DefaultDir="& path & ";Driver={Microsoft Access Driver (*.mdb)}"
SQL = "SELECT * from tabelwhere id = " & Request.Querystring("ID")
set RS = Conn.Execute(SQL)

Så skal din side bare se sådan ud: side.asp?id=1
Avatar billede jnissen Nybegynder
24. januar 2004 - 21:36 #4
Hvis det altid er id 1, kan du gøre sådan:

set conn = server.createobject("ADODB.connection")
path = Server.MapPath(".mdb")
conn.Open "DBQ="& path &";DefaultDir="& path & ";Driver={Microsoft Access Driver (*.mdb)}"
SQL = "SELECT * FROM menu WHERE id = 1 "
set RS = Conn.Execute(SQL)
Avatar billede Meggel Novice
24. januar 2004 - 21:36 #5
jnissen.. det var ikke helt sådan..

men hvis jeg skal havde den til at stå i en table..
Avatar billede websam Nybegynder
24. januar 2004 - 21:41 #6
Skal det forståes på den måde at du vil liste alle navne fra tabellen på en side og man så derfra kan se hver enkelt ved klik på navnet eller er jeg helt tabt ? :o)

/Websam
Avatar billede jnissen Nybegynder
24. januar 2004 - 21:43 #7
Jeg er ikke helt med på hvad du mener. Er det sådan:'
<%
set conn = server.createobject("ADODB.connection")
path = Server.MapPath(".mdb")
conn.Open "DBQ="& path &";DefaultDir="& path & ";Driver={Microsoft Access Driver (*.mdb)}"
SQL = "SELECT * FROM tilmeld WHERE id = 1 "
set RS = Conn.Execute(SQL)
%>
<table width="250">
  <tr>
    <td>Nick</td>
    <td><%=rs("nick") %></td>
  </tr>
  <tr>
    <td>Clan</td>
    <td><%=rs("clan") %></td>
  </tr>
  <tr>
    <td>Irc</td>
    <td><%=rs("irc") %></td>
  </tr>
  <tr>
    <td>server</td>
    <td><%=rs("server") %></td>
  </tr>
</table>
Avatar billede Meggel Novice
24. januar 2004 - 21:50 #8
har sådan set lavet det selv nu..
jeg har lavet det sådan her
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("mindatabase.mdb")
Conn.Open DSN
sql1 = "Select * from tilmeld"
set rs1 = Conn.execute(sql1)

%>
<br><br><br><br>
<table cellpadding="0" cellspacing="2" border="1" bordercolor="#FFFFFF">

<tr>
<td class="tdcols" valign="top" bordercolor="#000000" width="100">1. <% response.Write rs1("clan") %></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<tr>
<td class="tdcols" valign="top" bordercolor="#000000">2. <% rs1.movenext %><% response.Write rs1("clan") %></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<tr>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<tr>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<tr>
<td class="tdcols" valign="top" bordercolor="#000000">3. <% rs1.movenext %><% response.Write rs1("clan") %></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<tr>
<td class="tdcols" valign="top" bordercolor="#000000">4. <% rs1.movenext %><% response.Write rs1("clan") %></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<tr>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<tr>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<tr>
<td class="tdcols" valign="top" bordercolor="#000000">5. <% rs1.movenext %><% response.Write rs1("clan") %></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<tr>
<td class="tdcols" valign="top" bordercolor="#000000">6. <% rs1.movenext %><% response.Write rs1("clan") %></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<tr>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<tr>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<tr>
<td class="tdcols" valign="top" bordercolor="#000000">7. <% rs1.movenext %><% response.Write rs1("clan") %></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<tr>
<td class="tdcols" valign="top" bordercolor="#000000">8. <% rs1.movenext %><% response.Write rs1("clan") %></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<tr>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<tr>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<tr>
<td class="tdcols" valign="top" bordercolor="#000000">9. <% rs1.movenext %><% response.Write rs1("clan") %></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<tr>
<td class="tdcols" valign="top" bordercolor="#000000">10. <% rs1.movenext %><% response.Write rs1("clan") %></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<tr>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<tr>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<tr>
<td class="tdcols" valign="top" bordercolor="#000000">11. <% rs1.movenext %><% response.Write rs1("clan") %></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<tr>
<td class="tdcols" valign="top" bordercolor="#000000">12. <% rs1.movenext %><% response.Write rs1("clan") %></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<tr>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<tr>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<tr>
<td class="tdcols" valign="top" bordercolor="#000000">13. <% rs1.movenext %><% response.Write rs1("clan") %></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<tr>
<td class="tdcols" valign="top" bordercolor="#000000">14. <% rs1.movenext %><% response.Write rs1("clan") %></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<tr>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<tr>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<tr>
<td class="tdcols" valign="top" bordercolor="#000000">15. <% rs1.movenext %><% response.Write rs1("clan") %></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<tr>
<td class="tdcols" valign="top" bordercolor="#000000">16. <% rs1.movenext %><% response.Write rs1("clan") %></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
</table>
Avatar billede Meggel Novice
24. januar 2004 - 21:50 #9
men hvis alle 16 ikke bliver fyldt ud viser den fejl på siden
Avatar billede thesurfer Nybegynder
24. januar 2004 - 21:55 #10
do while not rs1.eof

' bla bla bla
rs1.movenext

loop

Se f.eks. lektion 19 ("Hent data fra databasen"):
http://html.dk/tutorials/asp/lektion19.asp
Avatar billede Meggel Novice
24. januar 2004 - 22:00 #11
thesurfer... amen jeg har ikke prøvet at lave det på den måde der før. og ved godt at man kan bruge den der.. men Hvor skal den være.. og bla bla..
Avatar billede websam Nybegynder
24. januar 2004 - 22:06 #12
Så skal den se således ud :

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("mindatabase.mdb")
Conn.Open DSN
sql1 = "Select * from tilmeld"
set rs1 = Conn.execute(sql1)

%>
<table cellpadding="0" cellspacing="2" border="1" bordercolor="#FFFFFF">
<%Do While Not Rs1.EOF%>
<tr>
<td class="tdcols" valign="top" bordercolor="#000000" width="100"><%= rs1("Id")%>. <%= rs1("clan")%></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<%
Rs1.MoveNext
Loop
%>
</table>

/Websam
Avatar billede thesurfer Nybegynder
24. januar 2004 - 22:09 #13
Jeg kan se 2 "skabeloner".. en hvor der er 3x td'er, og en hvor der er 11x tomme td'er.. Korrekt?
Avatar billede Meggel Novice
24. januar 2004 - 22:14 #14
kan godt ske jeg skal bruge lidt meget hjælp..

<%= rs1("Id")%>.

der skriver den ens id nummer og var ikke helt det jeg menet.. men den skal skrive 1. 2. 3. 4. 5. osv. istedenfor at den skriver id nummer..
Avatar billede thesurfer Nybegynder
24. januar 2004 - 22:15 #15
Så er spørgsmålet, hvad/hvorfor er der forskel på de 3x td, og de 11x td?
Skal det bare bruges til mellemrum?

mht <%= rs1("Id")%>. <%= rs1("clan")%>.. <%= rs1("Id")%> kan kun bruges hvis der ikke slettes, og oprettes klaner.. for så vil id nemlig stige, og så passer "antallet" ikke..

Eksempel:
Du sletter klan nr 5, og opretter en ny klan. Der er godt nok 16x id, men de går fra 1-4, og 6-17.. id 5 er jo slettet..

I Stedet kan man f.eks. bruge:

i = 1
do while not rs1.eof
' bla bla bla
%>
<td class="tdcols" valign="top" bordercolor="#000000" width="100"><%= i & ". " & rs1("clan")%>

<%
rs1.movenext
i = i +1
loop


osv..
Avatar billede Meggel Novice
24. januar 2004 - 22:15 #16
thesurfer sådan ca.. det passer meget godt..
Avatar billede thesurfer Nybegynder
24. januar 2004 - 22:18 #17
fruth> Hvad er meningen 3x td og 11x td?
Avatar billede Meggel Novice
24. januar 2004 - 22:19 #18
thesurfer.. ja.. ved jeg heller ikke.. var en ven som ville vise hvordan det ca skulle være..
Avatar billede Meggel Novice
24. januar 2004 - 22:22 #19
jeg takker for hjælpen...
Avatar billede websam Nybegynder
24. januar 2004 - 22:23 #20
Ok den havde jeg ikke lige fanget og med thesurfer's tillæg så bliver det noget i denne stil :

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("mindatabase.mdb")
Conn.Open DSN
sql1 = "Select * from tilmeld"
set rs1 = Conn.execute(sql1)

%>
<table cellpadding="0" cellspacing="2" border="1" bordercolor="#FFFFFF">
<%
i = 1
Do While Not Rs1.EOF
%>
<tr>
<td class="tdcols" valign="top" bordercolor="#000000" width="100"><%= i&". "rs1("clan")%></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
<td class="tdcols" valign="top"></td>
</tr>
<%
Rs1.MoveNext
i = i + 1
Loop
%>
</table>

/Websam
Avatar billede Meggel Novice
24. januar 2004 - 22:29 #21
yes. har givet jer begge point... :D
Avatar billede thesurfer Nybegynder
24. januar 2004 - 22:32 #22
hmm? Du har givet points til websam og jnissen..?
Avatar billede Meggel Novice
24. januar 2004 - 22:39 #23
ups. thesurfer. tænket ikke lige over at der var 3.. sry..
Avatar billede thesurfer Nybegynder
24. januar 2004 - 22:39 #24
Det gør ikke noget.. det kan jo ske..
Avatar billede Meggel Novice
24. januar 2004 - 22:41 #25
det går jo nok alt sammen ;)
Avatar billede jnissen Nybegynder
24. januar 2004 - 22:43 #26
thesurfer-> Jeg kan godt undvære mine point, og du hjalp også mere end mig.
Skal jeg oprette et spg så du kan få de point?
Avatar billede Meggel Novice
24. januar 2004 - 22:48 #27
jnissen han fik noget karma istedenfor.. :D
Avatar billede Meggel Novice
24. januar 2004 - 22:50 #28
spm.. hvordan gør man så der kun kan være 16 tilmeldet og ikke x antal...
Avatar billede Meggel Novice
24. januar 2004 - 22:50 #29
sådan noget ala to i = 16 eller hva ?
Avatar billede thesurfer Nybegynder
24. januar 2004 - 23:07 #30
jnissen> Mht points.. nej tak, men tak for tilbudet :)

fruth> Hvad mener du? Skal den kun vise 16 klaner, eller skal der kun kunne være 16 klaner i database?
Avatar billede Meggel Novice
24. januar 2004 - 23:08 #31
kun 16 klaner altså når der er 16 må der ikke komme flere..
Avatar billede thesurfer Nybegynder
24. januar 2004 - 23:14 #32
"komme flere".. :)
Betyder det:
1) Må ikke udskrives flere, selvom der muligvis er flere klaner i databasen
2) Der kan ikke indsættes mere end 16 klaner i database.

Hvis det er nr 1:
if i <> 16 then i = i + 1
Avatar billede thesurfer Nybegynder
24. januar 2004 - 23:24 #33
rettelse:
if i = 16 then exit loop
Avatar billede thesurfer Nybegynder
24. januar 2004 - 23:25 #34
eller også hedder den Exit Do eller Exit While :)
Kan ikke lige huske det..
Avatar billede Meggel Novice
25. januar 2004 - 08:59 #35
Exit Do
den virkede
Avatar billede 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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

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

IT-JOB

Netcompany A/S

Network Engineer

Politiets Efterretningstjeneste

Fullstack softwareudvikler i PET

Paychex Europe

Scrum Master

Everllence

Data Engineer