16. februar 2002 - 13:43
Der er
15 kommentarer og 1 løsning
Simpel sql ?
Hej Jeg har en db hvor jeg gerne vil vise første record i rs kaldet GroupID Nedenunder på en ny linie vil jeg så vise første record i rs StudText Nedenunder på en ny linie vil jeg så gerne vise den anden record i rs GroupID Nedenunder på en ny linie vil jeg så gerne vise den anden record i rs StudText osv osv ..... Jeg går ud fra jeg skal bruge Do og Loop her ??? Min kode følger ..... <% ' Databaseforbindelse - husk at angive sti til din database Set Conn = Server.CreateObject("ADODB.Connection") DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; " DSN = DSN & "DBQ=" & Server.MapPath("tab.mdb") Conn.Open DSN ' SQL forespørgsel strSQL = "Select * from table1" ' Udfør forespørgsel (rs indeholder nu resultatet) Set rs = Conn.Execute(strSQL) ' Gå til næste Record i rs rs.MoveNext ' Fortsæt indtil rs er gennemløbet (EOF = End Of File) While Not rs.EOF ' Udskriv værdien af kolonnen Fornavn Response.Write rs("GroupID") & "<br>" ' SQL forespørgsel strSQL = "Select * from table1" ' Udfør forespørgsel (rs indeholder nu resultatet) Set rs = Conn.Execute(strSQL) ' Gå til næste Record i rs rs.MoveNext ' Udskriv værdien af kolonnen Fornavn Response.Write rs("StudText") & "<br>" ' Luk databaseforbindelse Conn.Close Set Conn = Nothing %>
Annonceindlæg tema
Cloud & AI
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
16. februar 2002 - 13:52
#1
<% ' Databaseforbindelse - husk at angive sti til din database Set Conn = Server.CreateObject("ADODB.Connection") DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; " DSN = DSN & "DBQ=" & Server.MapPath("tab.mdb") Conn.Open DSN ' SQL forespørgsel strSQL = "Select * from table1" ' Udfør forespørgsel (rs indeholder nu resultatet) Set rs = Conn.Execute(strSQL) ' Fortsæt indtil rs er gennemløbet (EOF = End Of File) While Not rs.EOF ' Udskriv værdien af kolonnen Fornavn Response.Write rs("GroupID") & "<br>" ' Udskriv værdien af kolonnen Fornavn Response.Write rs("StudText") & "<br>" rs.movenext loop ' Luk databaseforbindelse Conn.Close Set Conn = Nothing %>
16. februar 2002 - 13:52
#2
svar
16. februar 2002 - 14:00
#3
Nej dette er ikke hvad jeg vil have. Dette viser først ALLE records i rs GroupID og jeg vil kun have det viser den FØRSTE som jeg har skrevet ok ?
16. februar 2002 - 14:02
#4
1:record 1 fra rs Group ID 2: record 1 fra rs StudText 3: record 2 fra rs Group ID 4: record 2 fra rs Studtext
16. februar 2002 - 14:03
#5
skal den bare vise den første post i databasen og ikke andet
16. februar 2002 - 14:05
#6
1. linie skal der stå 1. post fra kolonen Group ID 2. linie skal der stå 1. post fra kolonen StudText 3. linie skal der stå 2. post fra kolonen Group ID 4. linie skal der stå 2. post fra kolonen StudText osv. er det sådan..?? Hvis ja skal du bare bruge det jeg skrev
16. februar 2002 - 14:07
#7
Ja det er .... Ok tester ....
16. februar 2002 - 14:09
#8
No der er fejl Der opstod en Microsoft VBScript-kompileringsfejl fejl '800a040e' 'Loop' uden 'Do' /final_tut/retrieve.asp, linje 28 loop ^
16. februar 2002 - 14:10
#9
Her er linie 28 loop
16. februar 2002 - 14:10
#10
<% ' Databaseforbindelse - husk at angive sti til din database Set Conn = Server.CreateObject("ADODB.Connection") DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; " DSN = DSN & "DBQ=" & Server.MapPath("tab.mdb") Conn.Open DSN ' SQL forespørgsel strSQL = "Select * from table1" ' Udfør forespørgsel (rs indeholder nu resultatet) Set rs = Conn.Execute(strSQL) ' Fortsæt indtil rs er gennemløbet (EOF = End Of File) Do While Not rs.EOF ' Udskriv værdien af kolonnen Fornavn Response.Write rs("GroupID") & "<br>" ' Udskriv værdien af kolonnen Fornavn Response.Write rs("StudText") & "<br>" rs.movenext loop ' Luk databaseforbindelse Conn.Close Set Conn = Nothing %>
16. februar 2002 - 14:10
#11
prøv igen! Det hedder: Do While ..... kode loop
16. februar 2002 - 14:12
#12
prøv igen ? det virker jo nu ....s
16. februar 2002 - 14:14
#13
" prøv igen! Det hedder: Do While ..... kode loop " ..var bare en kommentar til den rettelse jeg lavede i kommentaren lige før
16. februar 2002 - 14:20
#14
ergo kan jeg godt lukke sp. nu ik ??????
16. februar 2002 - 14:22
#15
jo......du har jo fået det til at virke..
16. februar 2002 - 14:23
#16
good tak tak s
Kurser inden for grundlæggende programmering